Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Button verschieben?


Davidandflash - Mo 26.08.02 21:25
Titel: Button verschieben?
:shock:

Ich würde gerne einen Button bewegen. Was muss ich dafür tun ich finde keinen Befehl, bzw. eine Eigenschaft des Buttons, die ich verändern müsste um die Position eines Buttons festzulegen.


Cashels - Mo 26.08.02 21:29

Setze einfach die Eigenschaft Left und Top deines Buttons... Könnt man mit ein bischen Probieren aber auch selbst rauskriegen, oder :wink:

Gruss,
Tom


Davidandflash - Di 27.08.02 18:48

Danke. Wenn ich Lust hätte das auszuprobieren würde ich wohl kaum ins Forum gehen :idea:


DeCodeGuru - Di 27.08.02 19:02

hey, des is aber ein bisschen die falsche einstellung :wink: Cashels hat dir nämlich eine gute antwort gegeben. :)


GPF - Di 27.08.02 19:22

Rufe einfach folgende Prozedur im OnMouseDown Ereignis auf:


Quelltext
1:
2:
3:
4:
5:
6:
7:
procedure MoveObject(Sender: TObject; X, Y: Integer); 
const 
  SC_DragMove = $F012; 
begin 
  ReleaseCapture; 
  (Sender as TControl).Perform(WM_SysCommand, SC_DragMove, 0); 
end;


Cashels - Mi 28.08.02 10:24

Davidandflash hat folgendes geschrieben:
Danke. Wenn ich Lust hätte das auszuprobieren würde ich wohl kaum ins Forum gehen :idea:

Dann stell nächstes mal bitte deine Frage so dass jeder sie richtig versteht, dann kriegst du auch von mir die passende Antwort. Angrunzen denk ich ist in diesem forum jedenfalls nicht angebracht.

Gruss,
Tom


DeCodeGuru - Do 29.08.02 08:33

Zitat:
Angrunzen denk ich ist in diesem forum jedenfalls nicht angebracht.


das hat er sicher nicht so gemeint. Jeder hat schließlich mal einen schlechten tag :wink: