Entwickler-Ecke

Sonstiges (Delphi) - Form verschieben ohne Taskleiste ?


Nowo - Di 10.10.06 20:26
Titel: Form verschieben ohne Taskleiste ?
Hallo

ich habe z.B. eine Form die keine Taskleiste hat.
Sie soll trotzdem verschiebbar sein.

Klar... nach ca.10 sekunden googlen fand ich das:


Delphi-Quelltext 
1:
2:
3:
4:
5:
 
procedure TForm1.WMNCHitTest (var M: TWMNCHitTest);
begin
  inherited;
  if M.Result = htClient then M.Result := htCaption;
end;


so... schonmal ein Anfang.
Nun kann ich das Formular mit allem verschieben was kein Objekt ist.
Aber ich will es so haben... das es sich NUR verschieben lässt wenn man ein bestimmtes "Image" anklickt/anwählt/OnMousDown.


PS: der Grund: ich habe mir eine eigene Taskleiste als Dild eingefügt.
Und bei "Drag" auf dem Bild soll sich halt das Formular
verschieben lassen.


Hoffe ihr könnt mir helfen

mfG Nowo


Marco D. - Di 10.10.06 20:28
Verwechselst du Taskleiste mit Titelleiste? :mahn:


_frank_ - Di 10.10.06 20:33

Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
9:
 
procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  if ssLeft in Shift then 
  begin
    ReleaseCapture;
    Self.Perform(WM_NCLBUTTONDOWN,HTcaption,0);
  end;
end;


HTH Frank


Nowo - Di 10.10.06 20:55
So Antworten liebe ich ^^
:!: Danke Frank :!:
Funkioniert einwandfrei !!! :D


(ähm kleine Frage am Rand... fällt mir grade ein und will dafür aber keinen neuen Thread erstellen:
Wie kann ich die Startposition einer Form bestimmt ? also wo auf dem Bildschirm sie erscheinen soll wenn sie
gestartet wird )


_frank_ - Di 10.10.06 21:06
TForm.Left/Top??
(Position auf poDesigned)

HTH Frank


Nowo - Di 10.10.06 21:11
ähm ja.. vielen Danke aber ich meinte eher.. sowas wie X-Achse Y-Achse.
Oder z.B. das sich das 2te fenster IMMER neben dem ersten öffnet...


_frank_ - Di 10.10.06 21:16
du kannst doch left/top vor dem Anzeigen ändern und da z.b. an ein anderes Form anpassen


Delphi-Quelltext 
1:
2:
3:
 
form2.top:=form1.top;
form2.left:=form1.left+form1.width;
form2.show;


Hoffe, ich hab dich richtig verstanden, wenn nicht musst du dein Problem weiter erläutern...

Gruß Frank


Nowo - Di 10.10.06 21:29
Jop, vielen vielen Dank.

Alles funkioniert.


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!