[ smjesko @ 27.08.2005. 13:33 ] @
Mislim da naslov kaze sve, naime treba da napravim program u kojem cu dodavat ip adrese koje mogu koristiti odredeni port npr 80 i ko ne moze.
Koje komponente da koristim, i planiram to uraditi u deplhiu 7
[ Passwd @ 27.08.2005. 17:33 ] @
Ako sam dobro shvatio ti zelis nekom racunalu sa te i te IP adrese odredit koje portove moze koristit a koje ne moze??
Ako je tako najbolje bi bilo da koristis komponente (tako bar u delphiu 2005) TIdCmdTCPClient sa kojom ces ti upravljati i slati zahtjeve i TIdCmdTCPServer koji ce izvrsavati tvoje zahtjeve na racunalu kojeg upravljas....
[ smjesko @ 27.08.2005. 17:37 ] @
a moze li slucajno mali primjercic, mislim htio bi tako nesto da napravim da imam kontrolu na svojoj mrezi znaci da mi se ne moze svako prikacit preko wifi na mrezu i surfat. kontas?
[ Passwd @ 27.08.2005. 17:42 ] @
kontam da, sad cu vidjet sto se da napravit..
[ Passwd @ 27.08.2005. 18:02 ] @
Ovako nesto za klijenta..

Code:

procedure TForm1.Button1Click(Sender: TObject);
begin
if listbox1.ItemIndex<>-1 then begin
client.Host:=listbox1.Items[listbox1.ItemIndex];
                               end;
client.Port:='neki_port'; //neki koji se ne koristi inace cesto 
with client do
begin
connect;
sleep('zavisi_kolki_su_zahtjevi');
  try
{sad tu saljes naredbe koji portovi smiju biti
otvoreni, a koji ne..}
finally disconnect;
  end;
end;
end;


Napravis listbox sa svim adresama u mrezi..i samo selektiras koju hoces da upravljas i stisnes button il nesto..a server bi morao biti na svim racunalima i samo trebas navest port na kojem ces spajat klijenta i da razumije naredbe koje mu klijent salje...

A sad za kontroliranje portova i na koji nacin ces mu slat naredbe ne znam..probaj googlat malo..


[ smjesko @ 27.08.2005. 18:41 ] @
super hvala, evo radim na serveru kad napravim to bi trebalo biti nesto kao 24 online :D
[ Passwd @ 27.08.2005. 18:49 ] @
polako al sigurno