Cum putem vedea daca un server de cs este deschis sau inchis

In jos

Cum putem vedea daca un server de cs este deschis sau inchis

Mesaj Scris de Max la data de Dum Sept 07, 2008 7:22 pm

...:: Server Status ::...


1. Adaugam din tabul STANDARD un buton(TButton)
2. Adaugam din tabul STANDARD 2 edit(TEdit)
3. Adaugam din tabul STANDARD un checkbox (TCheckbox)
4. Adaugam din tabul INTERNET un Tcpclient(TTcpclient)
5. Selectam butonul , din Object Inspector la caption punem Verifica
6. Selectam edit1 , din Object Inspector la caption punem Server IP Adress
7. Selectam edit2, din Object Inspector la caption punem Port
8. Selectam checkbox1, din Object Inspector la caption punel Port Automat
9. Dam dublu click pe checkbox1 si scriem

if checkbox1.checked = true then
edit2.text := '27015'
else
edit2.text := 'Port';


10. Dam dublu click pe buton si scriem

Tcpclient1.remotehost := edit1.text;
Tcpclient1.remoteport := edit2.text;
Tcpclient1.active := true;
Tcpclient1.connect;

if tcpclient1.connect = true then
Showmessage('Serverul este online!' )
else
Showmessage('Serverul este offline!' );

Max
Moderator
Moderator

Numarul mesajelor : 53
Varsta : 31
Localitate : Confidential
Stare de spirit : Rakiu
Data de inscriere : 23/08/2008

Vezi profilul utilizatorului

Sus In jos

Sus


 
Permisiunile acestui forum:
Nu puteti raspunde la subiectele acestui forum