Delphi Dünyası Facebook'ta

Duyurular

Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

« önceki sonraki »
Sayfa: [1]   Aşağı git

Gönderen Konu: iki bilgisayar arası text gönderimi  (Okunma sayısı 1265 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı cheshme

  • Delphi 1 Level 2
  • **
  • İleti: 14
  • Rep: +1/-0
iki bilgisayar arası text gönderimi
« : 27 Temmuz 2009 14:29:11 »
merhaba arkadaşlar siteye yeni üye oldum.
Benim bir sorum olacak. İnternet üzerindeki bir bilgisayardan diğerinetext mesajlara gödereceğim. Tserversocket ve Tclientsocket gibi componentlerle denedim ama asycnchronous socket error 10060 gibi bi error veriyor. ve benzer errorlar. Elinde kaynak kod olan var mı? şimdiden teşekkürler.
sitede benzer bi konuyu gördüğümü hatırlıyordum ama bulamadım bugün baktığımda. Varsa kusura bakmayın...
Kayıtlı

Çevrimdışı Coder-enigma

  • Delphi 1 Level 1
  • *
  • İleti: 4
  • Rep: +0/-0
Ynt: iki bilgisayar arası text gönderimi
« Yanıtla #1 : 08 Haziran 2010 12:02:51 »
clientsocket\serversocket ile yapabilirsin!
client sockete bağlanmak istediğin PC'nin IP adresini girmen gerek
örnek kod yazım daha iyi olur :

CLİENT
button1 click //bu kod bağlanman için
begin
clientsocket1.host:='bağlanacağın bilgisayarın IP'si';
clientsocket1.port:=1010;
clientsocket1.activete:=true;
end;

button2 click //bu kod text yollaman için
begin
clientsocket1.socket.sendtext(edit1.text);//edit1 deki yazıyı gönderir.
end;

SERVER
form create
begin
serversocket1.port:=1010;
serversocket1.activete:=true;
end;

client read
begin
memo1.lines.add(socket.receivetext);
end;

kısaca işin mantığı bu.Tabi karşı PC nin IP nerden bulacaz nasıl bağlanacaz dersen onla ilgilide arşivimde projeler olacaktı istersen paylaşırım
Kayıtlı
Sayfa: [1]   Yukarı git
« önceki sonraki »