mesaj gönderme çözdüm.ama diğer makinanın portunukontrolnası

[ebekir]

arkadaşlar netten bir makinadan diğerine mesaj göndermek için şöyle bir kod yazdım ama mesaj gitmiyor böyle bir şey yazamazmıyım yeni yapıyorumda router da ip yönlendirmesinide yaptım bu arada olmadı neden olabir

client için bunu
procedure TForm1.Button1Click(Sender: TObject);
begin
TcpClient1.Active:=false; //kapat
TcpClient1.RemoteHost:='10.11.0.180' ;// bu makineye mesaj gönderilecek
TcpClient1.RemotePort:='20000';//Bu porttan gönderilecek
TcpClient1.Active:=TRUE; //aç
TcpClient1.Sendln('NEHABER');//Gönder
end;


server için ise

procedure TForm1.FormCreate(Sender: TObject);
begin
TcpServer1.LocalPort:=20000;
TcpServer1.Active:=True;//20000 numaralı portu dinlemeye al
end;

procedure TForm1.TcpServer1Accept(Sender: TObject;
ClientSocket: TCustomIpClient);
var
x:AnsiString;
begin
ListBox1.Items.Add(ClientSocket.RemoteHost); //ip numarasi
x:=ClientSocket.Receiveln();//portu oku
ListBox2.Items.Add(x); //ListBoxa aktar
end;

[Trial_Cooder]

procedure TForm1.TcpServer1Accept(Sender: TObject;
ClientSocket: TCustomIpClient); bunun yerine
tcpServer bileşeninde read veya onread özelliği olması lazım ona bak

[ebekir]

abi öyle bir özelliği yok tcpserverin

[Akin_Delphi]

Sayın Arkadaşım,
Hangi bileşeni kullanıyorsunuz

Indy bileşenlerini kuvvetle tavsiye ederim. Bileşenler içerisinde kaynak kodlarıyla birlikte pek çok demo geliyor. Dolayısıyla onlara bakarak nasıl yapıldığını da öğrenebilirsiniz.

Saygılar ve Başarılar

[ebekir]

tcpserver ve tcpclient araçlarını kullanıyorm

[ebekir]

arkadaşlar cevap yazan yokmu

[Akin_Delphi]

arkadaşlar cevap yazan yokmu

Sayın Arkadaşım,

Bu tcpserver ve tcpclient bileşenlerini kullanmak zorunda mısınız? Daha önce dediğim gibi Indy bileşenleri çok çok daba iyi. Açık kodlu ve pek çok örnekle birlikte geliyor. Bunlara bakarak basit metin bazlı veri alımı / gönderimini yapabilirsiniz.
Saygılar ve Başarılar

[ebekir]

arkadaşlar yaptım programda hangi porttan haberleşiyorsan adsl routerin o portunu açıp yönlendirme yaptım ve oldu şimdi diğer makinanın paralel portunu nasıl kontrol edebileceğimi düşünüyrm ama bulamadım yardım edermisniz.yardımlarınızim

[unicorn64]

paralel porta assembly kullanarak erişebilirsin ancak xp de port koruması türünden bişey war. tam olarak nasıl aşıldığını hatırlamıyorum. paralel portun numarası genelde 378H (hexadesimal) olur.
out veri,portno şeklinde bi kullanımla porta veri gönderebilirsin