くだすれDelphi（超初心者用）その18
■ このスレッドは過去ログ倉庫に格納されています
0039デフォルトの名無しさん
NGNGモーダルなんだから
procedure TForm1.FormClick(Sender: TObject);
begin
Memo1.Lines.Add('PopUpEnter');
PopupMenu1.Popup(Mouse.CursorPos.X, Mouse.CursorPos.Y);
Memo1.Lines.Add('PopUpOut');
end;
で十分。ただし、AutoPopup は false にして。
■ このスレッドは過去ログ倉庫に格納されています