Einzelnen Beitrag anzeigen

Benutzerbild von Aurelius
Aurelius

Registriert seit: 29. Jan 2007
Ort: Erfurt
753 Beiträge
 
Delphi 7 Personal
 
#4

Re: Dockables Forms, wie im Compiler oder Visual Studio?

  Alt 14. Feb 2008, 08:52
Nochmal zum Verständnis: möchtest du die Form an sich wo andocken und am Rand verschwinden lassen oder Komponenten innerhalb der Form (wie ein Panel etc)?

Wenn es dir um die Form geht wäre wohl sowas wie JvFormMagnet am besten. Ist es zweiteres könntest du einfach im OnMouseMove des Formulars die Mausposition überprüfen und, wenn beide Werte eine best. Grenze erreichen, das Panel einblenden lassen
Delphi-Quellcode:
procedure OnMouseMove(...);
begin
   if (x < Grenzwert_X) and ( y < Grenzwert_Y) then
   begin
      //evtl noch ein Flag definieren damit der Timer weiß
      //welches Panel etc eingeblendet werden soll
      Timer1.Enabled := TRUE;
   end;
end;

procedure Timer;
begin
   Panel.Width := Panel.Width + 1;
   if Panel.Width >= Width_Grenzwert then Timer.Enabled := FALSE;
end;
ausgeführt, das selbe nochmal beim Ausblenden
Jonas
  Mit Zitat antworten Zitat