Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

try except


Нуб ©   (2007-02-26 14:53:00) 

Ай нид хелп фром ю
try
Label2.Caption := ' x2 + 2xy + 1 = ' + IntToStr(sqr(a,b))
except
  on EConvertError do ShowMessage('sdfsdf');
end;

не перехватывает ошибку в чем ошибка, в синтаксике ?


S@shka   (2007-02-26 15:22:00) [1]


> try
> Label2.Caption := ' x2 + 2xy + 1 = ' + IntToStr(sqr(a,b))
> except
>   on EConvertError do ShowMessage('sdfsdf');
> end;


А здесь нет ошибки, твоя функция SQR - возвращает Integer

Где тут что может случиться?


novill   (2007-02-26 15:17:00) [2]

В блок except добавь строчку

on e:exception do showmessage('На самом деле ошибка класса '+e.classname+' с сообщением '+e.message);

И запускай не из-под дебаггера.


Нуб   (2007-02-26 15:12:00) [3]

Удалено модератором
Примечание: мат. оскорбления. и... а сам то ты что делаеш?


clickmaker   (2007-02-26 15:08:00) [4]


> шовмесадж не срабатывает а пишет фак ю

как же не срабатывает, если все-таки пишет?
И правильно пишет, кстати


Нуб   (2007-02-26 15:07:00) [5]

function TForm1.sqr(x: integer; y: integer): Integer;
begin
result:= x*x + 2*x*y + 1;
end;

x,y не ввожу , х и у у меня это эдиты


Нуб   (2007-02-26 15:05:00) [6]

Удалено модератором


Игорь Шевченко   (2007-02-26 15:03:00) [7]

Нуб   (26.02.07 14:53)

ит из импоссибл ту хелп бикоз ю диднт провайд инаф солид инфомейшн то энсер ё квесчн


novill   (2007-02-26 14:58:00) [8]

> в чем ошибка
Ошибка где-то между сиденьеми клавиатурой :)

что за функция sqr c двумя параметрами? что за типы переменных?


Наверх

Титульная страница Поиск, карта сайта Написать письмо