arkadaşlar bende delphiye yeni başladım 3 ay kadar
ilk başladığım zaman clientsocket ve serversocket lerle epey bir pratik yaptım
aklıma bir soru takıldı ,
aklıma takılan şey normalde client socket belirlediğimiz porta veri yazmasında bir sorun yok,
peki serversocket, porta veri yazabilirmi, yani server socket edit1 deki texti porta nasıl yazabilir, yazarsa clientsocket bunu serversocketten hangi komutla alabilir...
------------------------------------
Sorum bu ?
Çok takıldığım bir konu. normalde klasik yöntemde clientsocket serversocketin olduğu porta veri yazıyor istediğim şey bu değil,
istediğim şey ise serversocketin kendi portuna veri yazmasını sağlamak...
bunu nasıl yapabilirim, yardımcı olursanız sevinirim
Socket Hakkında ilginç bir durum
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
Socket Hakkında ilginç bir durum
http://www.delphibasics.co.uk/RTL.asp?Name=DaysBetween
http://www.neonhaber.com/Static/mega-co ... index.html
www.delphican.con
Function PARSE( text, ilk, son:String ): String; //
begin
Delete(Text, 1, pos(ilk, Text) + Length(ilk)-1);
Result := Copy(Text, 1, Pos(Son, Text)-1);
end;
http://www.neonhaber.com/Static/mega-co ... index.html
www.delphican.con
Function PARSE( text, ilk, son:String ): String; //
begin
Delete(Text, 1, pos(ilk, Text) + Length(ilk)-1);
Result := Copy(Text, 1, Pos(Son, Text)-1);
end;
serversocket1.socket.connections[strtoint(edit1.text)].sendtext((edit2.text);
bunu ile edit2de olan veriyi edit1de yazan numaralı bağlantıya gönderebilirsin
bunu ile edit2de olan veriyi edit1de yazan numaralı bağlantıya gönderebilirsin
En son Extended tarafından 01 Oca 2008 09:57 tarihinde düzenlendi, toplamda 1 kere düzenlendi.
Çok teşekkür ederim
Bunu kendime göre uyarladım çalıştı
Elinize sağlık
oldu valla .)
Bunu kendime göre uyarladım çalıştı
Elinize sağlık
oldu valla .)
http://www.delphibasics.co.uk/RTL.asp?Name=DaysBetween
http://www.neonhaber.com/Static/mega-co ... index.html
www.delphican.con
Function PARSE( text, ilk, son:String ): String; //
begin
Delete(Text, 1, pos(ilk, Text) + Length(ilk)-1);
Result := Copy(Text, 1, Pos(Son, Text)-1);
end;
http://www.neonhaber.com/Static/mega-co ... index.html
www.delphican.con
Function PARSE( text, ilk, son:String ): String; //
begin
Delete(Text, 1, pos(ilk, Text) + Length(ilk)-1);
Result := Copy(Text, 1, Pos(Son, Text)-1);
end;