Цитата:
|
Сообщение от lostbananan
Я нашел какой кусок кода вызывает ошибку:
Код:
Text[4] := TLabel.Create(Form1);
Text[4].Parent :=Form1;
Text[4].Caption := 'Борги';
Text[4].Left := 435;
Grid[4] := TDrawGrid.Create(Form1);
Grid[4].Parent := Form1;
Grid[4].Left := 421;
Grid[4].RowCount := 1;
Grid[4].ColCount := 1;
Grid[4].Enabled := false;
Grid[4].DefaultColWidth := 100;
Grid[4].DefaultRowHeight := 6*debts;
Grid[4].Width := 100;
Grid[4].Height := 6*debts;
Grid[4].Top := 600-Grid[4].Height+20;
Grid[4].ScrollBars := ssNone;
Grid[4].Tag := 5;
Grid[4].OnDrawCell:=DrawGrid1DrawCell;
Но вот что здесь может вызвать ошибку НЕ ПОНИМАЮ!
|
Причем ошибку вызвает даже только:
Код:
Text[4] := TLabel.Create(Form1);
А вот
Код:
Text[3] := TLabel.Create(Form1);
ошибки не вызывает.
P.S.
Код:
Grid : array[0..16] of TDrawGrid;
Text : array[0..16] of TLabel;
Помогите, люди добрые!!!