SMPP Problem

[delphilord]

I have a problem
Runnig demo project for delphi -SMPP- It always return 0 for getresult (no error) But do not connect to server . (isconnected property is always 0)
Last error is always 0 even If I try www.www.www as url!No error and no Real connection.

[delphilord]

Also I must Add this:
Running demo when I press connect I got Access violotion Error.I traced code and And I saw this code generetaes error:
objSmpp.GetErrorDescription( Result )
I changed the get result routine from:

function TFormSmpp.GetResult () : Integer;
begin
Result := objSmpp.LastError;

EditResult.Text := IntToStr ( Result ) + ' : ' + objSmpp.GetErrorDescription( Result );
end;

To :

function TFormSmpp.GetResult () : Integer;
begin
Result := objSmpp.LastError;

EditResult.Text := IntToStr ( Result );
end;

To avoid this problem

But as isaid before,No connection.getresult is always 0 and isconnected is always false (0 instead of -1)
Thanks