Ver Mensaje Individual
  #1  
Antiguo 25-08-2006
ANG4L ANG4L is offline
Miembro
 
Registrado: nov 2005
Posts: 67
Reputación: 21
ANG4L Va por buen camino
Post (TreeView) De idTCPServer -> idTCPClient

Buenas, tengo una cuestion !
Tengo que enviar un TreeView del servidor al cliente, lo hice de la siguiente manera, pero el cliente no parece de terminar el proceso, a ver si me dicen donde puede estar el error

En el server
Código Delphi [-]
Ciudad:=TFileStream.Create('Ciudad.dat',fmCreate or fmShareCompat);
TreeView1.SaveToStream(Ciudad);
AThread.Connection.OpenWriteBuffer;
AThread.Connection.WriteStream(Ciudad);
AThread.Connection.CloseWriteBuffer;
Ciudad.Free;

En el cliente
Código Delphi [-]
Archivo:= TFileStream.Create('Ciudad.dat',fmCreate or fmOpenWrite);
idTCPClient1.ReadStream(Archivo, -1, true);
TreeView1.LoadFromStream(Archivo);
Archivo.Free;

Saludos !
__________________
Moment of chaos....
Responder Con Cita