Form verschieben

Inferno · Beiträge: 76

Hi leute !

Hab da mal ne Frage

Wie kann man eine Form verschieben die keine Titelleiste hat.

Also ich hab ne form mit Borderstyle = bsNone und hab da ein image drauf jetzt will ich praktisch die form also das image anfassen und damit die position der form verändern.

Danke schonmal im voraus

Bye

SMI · Beiträge: 106 Win95-2003 / Debian / Suse D1/D3/D6/D7

markieren

Quelltext

1:
2:
3:
4:
5:
6:

procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
    releasecapture;
    sendmessage(form1.Handle, WM_NCLBUTTONDOWN, 2, 0);
end;

Ich hoffe das meintest du

SMI

_________________
Wenn es im Jahre 1879 schon Computer gegeben hätte, würden diese vorausgesagt haben, daß man infolge der Zunahme von Pferdewagen im Jahre 1979 im Pferdemist ersticken würde.
(John C. Edwards, brit. Zukunftsforscher)

Inferno · Beiträge: 76

Jo genau das habe ich gesucht

Danke!

aber hab da mal noch ne frage

ist es möglich beim versieben den rand des fensters auszublenden?
wenn ned is ned schlimm ich wollts bloß mal wissen

Bye

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme