Caption der TForm ändern

[delphinia]

Hallo

ich suche Freeware/OpenSource Komponenten, mit denen man die Caption der TForm ändern kann sowie eigene Buttons (Grafiken hinzufügen) benutzten kann!

Bis jetzte fand ich immer nur welche die nur das eine konnten oder Sharware waren - kann mir kemand helfen und kennt so eine Komponente?

[cruiser]

Hm... eigener Style? Wie wär folgendes?

mit GetWindowLong und SetWindowLong die Form-Caption ausblenden (die Parameter müsst ich noch nachschlagen). Wenn du auch auf den 3D-Rand verzichten kannst reicht TForm.BorderStyle auf bsNone zu setzen.

folgender Code in den OnMouseDown Events der Labels/Images die deine Form bilden lässt jene wie eine Titlebar funktionieren:

Delphi-Quellcode:

if Button = mbleft then
begin
  ReleaseCapture;
  {Hier dein Form-Bezeichner ->}TForm{<-}.Perform(WM_SysCommand, $F012, 0);
end;

Buttons:

Ich persönlich favorisiere für sowat Speedbuttons auf Flat gesetzt.
Die Schriftart 'Marlett' liefert die nötigen Close/minimize-Grafiken als Font

Funktionen der Buttons:
Application.Close
Application.Minimize
TForm.Maximize
TForm.Restore

Edit: wie man runde Ecken erstellt steht in der CodeLibrary

[delphinia]

habe ne Komponente gefunden

Es geht mir auch darum das man das fenster in der grösse ändenr kann und das trotzem zB. die battens an der richtigen Position bleiben (minimieren, Help, Close button)

Na ja und dann auch die Vaption sich mit vergrössert udn kleiner OK - man könnte nen Image auf Auozise stellen aber dann muss immer eine Grafik drinn sein, die egal in welcher Imagegrösse immer gleichgut aussieht


na aber danke

[tigerman33]

Zitat von delphinia:

Na ja und dann auch die Vaption sich mit vergrössert udn kleiner OK - man könnte nen Image auf Auozise stellen aber dann muss immer eine Grafik drinn sein, die egal in welcher Imagegrösse immer gleichgut aussieht

hä?