TTimer

[Китос]

У меня есть таймер который запускается кнопкой, а выключаться он должен сторонней процедурой проверки. Но если вставить в эту процедуру строку: Timer1.enabled:=false;
то компилятор говорит: "undeclared identifier: 'Timer1' ". Что делать?
Заранее спасибо.

[Человек_Борща]

Закинь на форму компонент Timer

[Аватар]

Сообщение от Человек_Борща

Закинь на форму компонент Timer

ТС же пишет, что он у него есть. Код покажи

[Китос]

procedure proverka();
var
I: Integer;
pr: boolean;
begin
pr:=true;
for I := 1 to 15 do
if (MOB[i].Left<>p[i].x) or (MOB[i].Top<>p[i].y) then
pr:=false;
if pr then
begin
Timer1.enabled:=false;
messagedlg('Вы выиграли!'+#13#10+'Ваше время: '+inttostr(seconds div 60)+'мин'+
':'+inttostr(seconds mod 60)+'сек'+#13#10+
'Закончить игру?',mtWarning,[mbYes,mbRetry],mrCancel);
seconds:=0;
end;

end;

[Silver_S]

После слова public, на следующей строке введите "procedure proverka;" и нажмите Ctrl+Shift+C. Появится заготовка процедуры, куда и вобьете свой код.

[Китос]

Ого, спасибо помогло)