Показать сообщение отдельно
  #8  
Старый 24.03.2013, 18:41
lostbananan lostbananan вне форума
Начинающий
 
Регистрация: 05.01.2013
Сообщения: 119
Репутация: 10
По умолчанию

Цитата:
Сообщение от 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;
Помогите, люди добрые!!!
Ответить с цитированием