pomoc kod povezivanje u LAN-u

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949

+10 Profil

^{06.09.2005. u 22:40 - pre 226 meseci}

Mozes koristiti TCP, UDP ili neki drugi protokol. Mozes koristiti DDE konekcije... zavisi sta ti treba.
Mislim da ti je najlakse da koristis TCP protokol i Indy koponente za prenos podataka (IdTCPServer i IdTCPClient).

buha18
mali mirkec
vratisinec

Član broj: 57193
Poruke: 161
*.net.t-com.hr.

+10 Profil

^{07.09.2005. u 07:43 - pre 226 meseci}

if (IdTCPClient1.Connected) then
begin
IdTCPClient1.Write('string koji salje');
IdTCPClient1.Disconnect;
end
else
begin
IdTCPClient1.Connect;
button1.Click;
end;

tako?

ajd ako imas vremena, napisi mi kako bi to izgledalo, znaci, da se salje tekst, sa IdTCPClient na IdTCPServer...

hvala

>>Mirkec<<

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949

+10 Profil

^{07.09.2005. u 14:23 - pre 226 meseci}

Bas kao sto si ti napisao samo izmedju Write i Disconnect moras imati bar malu pauzu da bi podaci stigli da odu :)
Najbolje je da napravis jedno dugme za connect/disconnect (automatski disconnect na kraju programa) i jedan edit + dugme za pisalje i slanje poruke.

buha18
mali mirkec
vratisinec

Član broj: 57193
Poruke: 161
*.net.t-com.hr.

+10 Profil

^{07.09.2005. u 21:58 - pre 226 meseci}

a daj mi reci, kako na "server aplikaciji", na onoj na kojoj se nalazi IdTCPServer, primiti taj string?

hvala

>>Mirkec<<

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949

+10 Profil

^{08.09.2005. u 00:24 - pre 226 meseci}

Imas IdTCPServer.Read ili ReadLn funkciju.

buha18
mali mirkec
vratisinec

Član broj: 57193
Poruke: 161
*.net.t-com.hr.

+10 Profil

^{08.09.2005. u 07:17 - pre 226 meseci}

postoji samo ovo IdTCPServer1.DoWork(wmRead); (jedino slicno read) [wmRead - The component is reading data from the peer.]

a kako primiti taj string, i prikazati ga u editu?

>>Mirkec<<

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949

+10 Profil

^{08.09.2005. u 07:48 - pre 226 meseci}

Ok... ide ovako... kad saljes string treba da bude u ovom formatu

'Text poruke' + #10

Ovo #10 je bitno jer to oznacava kraj stringa (LineFeed). Znaci, saljes Edit1.Text + #10

Na serveru IdTCPServer.CommandHandlersEnabled postavi na False i koristi OnExecute event za citanje. AThread parametar koristis za citanje ovako

Code:
S := AThread.Connection.ReadLn;

I to je to. Ovako radi 100%

buha18
mali mirkec
vratisinec

Član broj: 57193
Poruke: 161
*.net.t-com.hr.

+10 Profil

^{08.09.2005. u 21:50 - pre 226 meseci}

IdTCPServer.CommandHandlersEnabled to ne postoji :-)
S := AThread.Connection.ReadLn; ??? od kud si sad uzeo AThread? jesi dodao sto u uses?

nista ne kuzim...

>>Mirkec<<

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949

+10 Profil

^{08.09.2005. u 22:00 - pre 226 meseci}

Da ti mozda ne koristis Indy 10 komponente? Ovo sto ti ja govorim radi za Indy 9.

Aleksandar Đokić

Član broj: 13478
Poruke: 4793
*.smin.sezampro.yu.

+638 Profil

^{08.09.2005. u 22:20 - pre 226 meseci}

Citat:

IdTCPServer.CommandHandlersEnabled

probaj IdTCPServer.IdCommandHandlersEnabledDefault

a sta je AThread ni meni nije jasno

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949

+10 Profil

^{08.09.2005. u 23:39 - pre 226 meseci}

To je promenljiva koju imas u OnExecute eventu. Lepo sam rekao

Citat:

koristi OnExecute event za citanje. AThread parametar koristis za citanje ovako...

Ne znam kako je u Indy 10, ali tako je za Indy 9.