|
Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: TScrollBox
18. Sep 2012, 13:43
Delphi-Quellcode:
var
i:Integer;
begin
for I := 0 to 100 do
With Tpanel.create(self) do
begin
Height := 20;
Caption := 'Panel' + IntToStr(I);
Parent := Scrollbox1;
align := alTop;
Top := 10000;
end;
end;
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
|