цикл if... then..else

[DeDoK]

Вопрос: почему при написании кода

procedure TForm1.ResultTimerTimer(Sender: TObject);
var
Popadanie : integer;
begin
Popadanie:=StrToInt(Label3.Caption);
if Popadanie=10 then begin
Timer1.Enabled:=false;
ShowMessage('Игра окончена: 10/10');
end;
end;

программа при запуске сразу выводит это сообщение. Как сделать корректную проверку
типа если popadanie = 10 то остановить таймер1 и показать сообщение.

[dr.Chas]

ну это не цикл а ветвление.
Срабатывает потому что Label3.caption равно 10.

[Ozerich]

программа при запуске сразу выводит это сообщение

Так как он у тебя включен.Отключить enabled:=false;

Как сделать корректную проверку
типа если popadanie = 10 то остановить таймер1 и показать сообщение.

как ты сделал так и делай

[Arkuz]

что-то нифига я вас тут не понимаю... Скинь исходник...

[Ozerich]

Исходник в первом посте.
+поставь в свойствах у таймера Enabled:=false

[Лубышев]

не лучше ли так?

Timer1.Enabled:=false;
.....
.....
.....
//Че то включило таймер
Timer1.Enabled:=true;
....
procedure TForm1.ResultTimerTimer(Sender: TObject);
begin
StrToIntDef(Label3.Caption,0)>=10// вдруг окажется так что попаданий больше :) 
then begin
Timer1.Enabled:=false;
ShowMessage('Игра окончена:'+StrToIntDef(Label3.Caption,0)+'/10');
end;
end;

Думаю так все же будет лучше работать

[_SERGEYX_]

А для чего здесь таймер вообще???
При попадании пишем

if Popadanie >= 10 Then
begin
label3.caption :='0'; 
showmessage("Игра окончена");
exit;
end else
label3.caption:= inttostr(Popadanie);
// и играем дальше

[DeDoK]

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

А для чего здесь таймер вообще???

_SERGEYX_ а каким макаром тогда проверять если значение label3 очень часто меняется? буквально каждую секунду

[mihali4]

Попробуйте такой вариант:

procedure TForm1.ResultTimerTimer(Sender: TObject);
begin
Timer1.Enabled:=false;
StrToIntDef(Label3.Caption,0)>=10// вдруг окажется так что попаданий больше :) 
then
ShowMessage('Игра окончена:'+StrToIntDef(Label3.Caption,0)+'/10') else
Timer1.Enabled:=True;
end;
end;

А вновь таймер у вас должен запускаться при старте новой игры.
Вообще-то, считается хорошим тоном в первую очередь выключать таймер по его собственному срабатыванию, а уж потом, в результате анализа неких условий, принимать решение о его включении вновь.