[DELPHI] Przesyłanie danych przez socket.

[maxil]

Witam.

Mam problem z przesłaniem danych przez sockety.

Piszę prosty komunikator internetowy typu Klient/Serwer.

Chcę przesłać dane wpisane w dwóch editach

próbowałem w ten sposób:

 

CODETab[0] := Edit1.Text;

Tab[1] := Edit2.Text;

Klient.Socket.SendText(Tab);

 

ale nie chce mi wysyłać. Macie może jakiś pomysł jak tego dokonać?

Proszę o wyrozumiałość gdyż dopiero uczę się Delphi.

Z góry dziękuję za pomoc.

[Toster]

katalog demos i tam poszukaj przykladu do prostego chata. Wiem ze jest taki ale nie pamietam nazwy.

 

poaztym nie piszesz co sie dzieje poza tym ze nie dziala, nie ma bledu ?

 

no i jeszcze uzywasz SendText ktory przyjmuje stringa o ile mnie pamiec nie myli a wkladasz mu Tab ktory na moj gust jest jakas tablica ? bo deklaracji zmiennych tez nie podales wiec nie mam pojecia co to jest Tab ani Klient...

[maxil]

W katalogu Demos jest program `Net Chat` ale on działa na zasadzie wysłania tekstu jako string a to wiem jak zrobić a ja chcę zrobić takie coś:

 

CODEprocedure TForm1.Button1Click(Sender: TObject);

var

Tab : array[0..1] of String;

begin

Klient.Active := True;

Tab[0] := Edit1.Text;

Tab[1] := Edit2.Text;

Klient.Socket.SendText(Tab);

end;

 

a ten Klient to jest komponent z zakładki internet o nazwie ClientSocket (ScktComp)

błąd jaki otrzymuję podczas kompilacji to:

 

CODE[Error] Unit1.pas(36): Incompatible types: 'String' and 'Array'

[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'

 

nie mam pomysłu jak inaczej przesłać tą tablicę lub w jakiś inny sposób wysłać dane razem.

[LordLost]

String to nie tablica(Edit: No może nie do końca, ale każdy wie o co chodzi ), Jak chcesz przesłać tekst to połącz Edit1.Text+'znak rozdzielający'+Edit2.Text i przy odbiorze rozdziel, lub użyj SendBuf.

[maxil]

String to nie tablica, Jak chcesz przesłać tekst to połącz Edit1.Text+'znak rozdzielający'+Edit2.Text i przy odbiorze rozdziel, lub użyj SendBuf.

 

dzięki na taki sposób nie wpadłem

oczywiście działa świetnie !