Ошибки в коде

[Виктория1990]

procedure TUGraffaficz.Timer1Timer(Sender: TObject);
begin
if Flag then ServerRod.Animate(Image671, Time)
else frMain.Animate(Image671, Time);
if Time >= 4*1000/Timer1.Interval then Timer1.Enabled:= false;
end;

[Error] Schedule.pas(47): Undeclared identifier: 'Flag'
[Error] Schedule.pas(47): Missing operator or semicolon
[Error] Schedule.pas(48): Undeclared identifier: 'Animate'

[Serge_Bliznykov]

перевести сообщения об ошибках Вы не пробовали?

Сообщение от Виктория1990

Undeclared identifier: 'Flag'

необъявленный идентификатор Flag (Вы забыли объявить переменную Flag или она не видна в данной процедуре

Сообщение от Виктория1990

[Error] Schedule.pas(48): Undeclared identifier: 'Animate'

Нет такого метода на форме Animate.

[Виктория1990]

Сообщение от Serge_Bliznykov

перевести сообщения об ошибках Вы не пробовали?


необъявленный идентификатор Flag (Вы забыли объявить переменную Flag или она не видна в данной процедуре



Нет такого метода на форме Animate.

ага, спасибо.