[Alegun]

Сообщение от Вовка

...в чем дело не пойму подскажи как правильно написать исключение

Да что ж, добавить блоки try..finally..end;..except..end; это проблема что ли а вылет кстати, может быть ещё и из-за повторных срабатываний таймера, желательно делать

Код:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Timer1.Enabled:= false;
If IsConnectedToInternet then
.....
....
...
Timer1.Enabled:= true;
end ;