Registriert seit: 21. Apr 2005
Ort: Spremberg
455 Beiträge
Turbo Delphi für Win32
|
Re: TButton in TCustomControl setzen
23. Jan 2006, 13:03
Delphi-Quellcode:
Procedure TKaFontButton.CreateWnd;
Begin
Inherited;
FButton.Left := Width - FButton.Width + 1;
FButton.Top := 1; // Top schiebt es auch dem Anzeige bereich, im Control beginnt Canvas wieder bei (0;0)
End;
Da sprach der Stumme zum Blinden: "Du wirst sehen ..."
oder
Wer lesen kann, ist klar im Vorteil!
|