Zitat von
glunzl:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
aDP: Array [0..15] of TDatPanel ;
i : integer ;
begin
for i := 0 to 15 do begin
aDP[i] := TDatPanel.Create(ScrollBox);
aDP[i].Parent := Scrollbox ;
aDP[i].Height := DatPanel. // <---------- Hier wird mich nicht mein Property "MinPanelHeight" angeboten
aDP[i].Top := i * aDP[i].Height ;
aDP[i].Width := Scrollbox.ClientWidth ;
end ;
end ;
Was soll denn hier Datpanel sein. Als Objekt ist das gar nicht definiert, sondern bei Dir nur als
Unit...
Versuchs also mal so:
aDP[i].Height := aDP[i].MinPanelHeight ;