PopUpMenu lige på en mouseover

Tags:    delphi

User
Bruger #402 @ 08.11.01 16:31
Hej. Jeg såger efter en metode så man bruge OnmouseOver eventen til at åbne en Tpopupmenu på.
Ligesom start menuen nede i bunden af skærmen...

{Jeg er faktisk ved at lave et brugersystem til mig, og min far :D}



1 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 2 karma
Sorter efter stemmer Sorter efter dato
User
Bruger #455 @ 08.11.01 19:29
Jeg "leger" at der er en TEdit du vil have Popupmenuen til at åbne på:

procedure TForm1.Edit1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
Popupmenu1.Popup;
end;

Så må du selv bestemme hvad du vil have i Popupmenuen.

Mikkel Larsen Pedersen



t