Indy Server/Client --> Tstringlist

[feinpus]

Bir bilgisyardan diğerine kendi oluşturduğum bir veri paketi içerisinde Tstringlist kullanıyorum ancak bu veriyi diğer tarafa ya gönderemiyorum yada okuyamıyorum.

Kod: Tümünü seç

  type
  CLexelist = Packed Record
  Liste : TStringList;
  CLuser : String[25];
  CLcomp : String[25];
  end;

Gelen Veriyi okumaya çalıştığım yer ise;

Kod: Tümünü seç

procedure TForm1.IdTCPServer1Execute(AThread: TIdPeerThread);
var
cliste : CLexelist;
begin
AThread.Connection.ReadBuffer(cliste,SizeOf(cliste));
memo1.Lines.Add(cliste.CLuser);
memo1.Lines.Add(cliste.CLcomp);

with cliste do
begin
Liste:=TStringList.Create;
ListBox1.Items.Assign(Liste);
end;

end;

bu şekilde çalıştırdığımda listbox a gelmesi gereken bilgiler kayboluyor...

[feinpus]

client teki listbox içerisindeki nesneleri server tarafına aktarmak için bi alternatif sunacak var mı ?

satır satır göndermek istemiyorum doğrusu gerçi bir kerede yollayamazsam son çare olarak bunu deneyeceğim ama son bir kere daha sorayım dedim.