Topic: ошибка в чем может быть
помогите в чем может быть стала ошибка вылетать такая
ссылается на код
Timer.OnTimer := @OnTimer;
procedure OnTimer;
begin
Form1.Label2.Caption := FormatDateTime('c', Now);
end;
вставил код и за чего начала выскакивать
begin
z := Form1.TableGrid1.RowCount - 1;
for i := 0 to z do
begin
if Form1.TableGrid1.Cells[9,i] = 'Да' then Form1.TableGrid1.Cell[0,i].Color := $F0CAA6
else if Form1.TableGrid1.Cells[9,i] = '' then Form1.TableGrid1.Cell[0,i].Color := $00E3F2F2;
end;
end;