Hi All,

I'm using Synapse on a cross-plataform project, with Lazarus/FPC

On Linux, I always got "Error 9" with this simple code:

Var
  Sock : TBlockSocket ;
  Error : Integer ;
begin
  Sock := TBlockSocket.Create;

  Sock.Connect( 'localhost', '3050' ) ;
  Error := Sock.LastError ;
  Memo1.Lines.Add('Connect Error: '+IntToStr(Error)+
' - '+Sock.GetErrorDesc(Error));
  Sock.CloseSocket;
  Error := Sock.LastError ;
  Memo1.Lines.Add('Close Error: '+IntToStr(Error)+
' - '+Sock.GetErrorDesc(Error));

  Sock.Free
end;


Connect Error: 9 - Bad file number
Close Error: 9 - Bad file number


The same code runs OK on Win32 + Lazarus/FPC

I use Mandriva 2009 and 
Free Pascal Compiler version 2.2.5 [2009/04/10] for i386



The function: GetLocalIPs always return only 127.0.0.1 on Linux ?

 
[]s Daniel

Conheça o Projeto ACBr - Automaçao Comercial Brasil
DJSystem a Loja Patrocinadora do ACBr


      Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com
------------------------------------------------------------------------------
Crystal Reports - New Free Runtime and 30 Day Trial
Check out the new simplified licensing option that enables 
unlimited royalty-free distribution of the report engine 
for externally facing server and web deployment. 
http://p.sf.net/sfu/businessobjects
_______________________________________________
synalist-public mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/synalist-public

Reply via email to