Обработчик ошибок.

[Dj_smart]

У меня проблема: Есть memo и туда юзер вписывает свои строчки(команды).
В каждой строчке есть число например :

Go 10 
Up 15
Left 6

и так далее...
НО вдруг юзер додумается не поставить дето число и окно вылетит с ошибкой. Как это обойти? То есть не обрабатывать строчку на наличие числа а контролировать область и вдруг ошибка то выполнить свои действия вместо стандвртных.Заранее благодарен.

[dimonbest]

try
сдесь ошибка
except
если ошибка то выполнится этот код
end

[Dj_smart]

если код на 200 строчек ( в программе) то так?

try
200 сторчек кода...
except
если ошибка то выполнится этот код
end

[dimonbest]

Ошибка может возникнуть в любой из 200 строк? Тогда так.
Может есть еще какой то способ, не знаю...

[Dj_smart]

Там такая структура:

for n:=1 to 10 do begin
возможная ошибка
end;
for n:=1 to 10 do begin
возможная ошибка
end;
for n:=1 to 10 do begin
возможная ошибка
end;
for n:=1 to 10 do begin
возможная ошибка
end;
for n:=1 to 10 do begin
возможная ошибка
end;
for n:=1 to 10 do begin
возможная ошибка
end;
for n:=1 to 10 do begin
возможная ошибка
end;
for n:=1 to 10 do begin
возможная ошибка
end;

[Dj_smart]

И одним циклом никак нельзя.
Там циклы разные, то я так, скопировал.

[mutabor]

Есть такая хорошая функция StrToIntDef, отличается от простой StrToInt тем что можно указать параметр по умолчанию (StrToIntDef - Default), на тот случай если введенные данные не являются числом.

[Dj_smart]

Спасибо mutabor! Сильно выручил!

[FaTaL]

Ну если строка полюбому должна оканчиваться на число, то можно сделать так: прочитать строку, проверить символы после пробела на чисал и если это числа, то делать что вам надо, а если нет, то .... сами думайте.
В помощь Вам функция Pos.

[Dj_smart]

Я какраз Pos использую. нахожу команду, прибавляю длину команды и получаю число в строке:
sw - строка

q1:=strtoint(copy(sw,pos('Down',sw)+4,128))

Но поскольку иногда вылазит ошибка по халатности юзера то так:

q1:=strtointDef(copy(sw,pos('Down',sw)+4,128),0)