! CODEBANK 2012 !
İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.
ÖNEMLİ AÇIKLAMA: MUTLAKA OKUYUNUZ!
0 Üye ve 1 Ziyaretçi konuyu incelemekte.
C:\Documents and Settings\Administrator>netstat -an | find "1433" TCP 0.0.0.0:1433 0.0.0.0:0 LISTENING
C:\Documents and Settings\Administrator>netstat -an | find "3050" TCP 0.0.0.0:3050 0.0.0.0:0 LISTENING
procedure TForm1.Button1Click(Sender: TObject);begin ClientSocket1.Active:=false; ClientSocket1.Address:=Edit1.Text; ClientSocket1.Port:=strtoint(Edit2.Text); ClientSocket1.Active:=true; timer1.Enabled:=true; timer2.Enabled:=true; Label1.Caption:='Bağlantı Kontrol Ediliyor....'; Shape1.Brush.Color:=clAqua;end;