|
Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: JvPanel zur Laufzeit skalieren
19. Dez 2011, 08:21
Delphi-Quellcode:
type
TJvPanel=Class(JVPanel.TJvPanel)
procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer);override;
End;
TForm1 = class(TForm)
JvPanel1: TJvPanel;
procedure JvPanel1ChangedHeight(Sender: TObject; ChangedSize: Integer);
private
{ Private-Deklarationen }
.................
................
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
|