FreePascal.ru

Ну конечно же! Огромное спасибо!

Привет всем!
Есть код:

type
TCell = class( TObject )
T: TTimer;
constructor Create;
procedure WorkOnTimer( Sender: TObject );
destructor Destroy;
end;

var
Cell: TCell;

implementation

constructor TCell.Create;
begin
inherited Create;
T := TTimer.Create( nil ...

Всё работает, спасибо!

Привет всем!
Перешёл с win32 на linux и столкнулся с проблемой, после вызова IdIcmpClient1.Ping выдаёт exception SocketError #1. При использовании PingSend из Synapse Ping.PingTime = -1. У кого-нибудь есть рабочий пример пинговалки для linux без использования Indy и Synapse?
Спасибо.

ОС: Ubuntu 9 ...