Динамическое создание объектов

← →
peugeot605 (2003-02-02 18:13) [0]

В процессе выполнения необходимо создать массив TStringGrid и по индексу отображать его элементы внутри панели Panel4 на форме Form1.
Делаю так:
var sgcDetail : Array of TStringGrid;
...
SetLength(sgcDetail, NZak+1);
For k:=1 to NZak do begin
sgcDetail[k] := TStringGrid.Create(Panel4);
With sgcDetail[k] do begin
Align := alClient;
RowCount := 4;
ColCount := 2;
FixedRows := 1;
FixedCols := 1;
Visible := True;
Show;
end;
end;

Ничего не отображается. В чем бикоз?

← →
uw (2003-02-02 18:24) [1]

sgcDetail[k].Parent := Panel4;

Динамическое создание объектов Найти похожие ветки