• 11 odgovora
  • 3.981 pregleda
pomoc kod povezivanje u LAN-u 06.09.2005. u 21:25 · pre 257 meseci #1
kako uspostaviti vezu izmedu dva programa, koji se vrte na drva racunala u LANu??

kako slati tekst sa programa na racunalu A (192.168.0.1 primjer) na program koji se nalazi na racunalu B(192.168.0.2)??

znate sto mislim, ne?

hvala na pomoci
Potpis
>>Mirkec<<
Re: pomoc kod povezivanje u LAN-u 06.09.2005. u 22:40 · pre 257 meseci #2
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).
Potpis
Play Store
Re: pomoc kod povezivanje u LAN-u 07.09.2005. u 07:43 · pre 257 meseci #3
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
Potpis
>>Mirkec<<
Re: pomoc kod povezivanje u LAN-u 07.09.2005. u 14:23 · pre 257 meseci #4
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.
Potpis
Play Store
Re: pomoc kod povezivanje u LAN-u 07.09.2005. u 21:58 · pre 257 meseci #5
a daj mi reci, kako na "server aplikaciji", na onoj na kojoj se nalazi IdTCPServer, primiti taj string?

hvala
Potpis
>>Mirkec<<
Re: pomoc kod povezivanje u LAN-u 08.09.2005. u 07:17 · pre 257 meseci #7
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?
Potpis
>>Mirkec<<
Re: pomoc kod povezivanje u LAN-u 08.09.2005. u 07:48 · pre 257 meseci #8
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%
Potpis
Play Store
Re: pomoc kod povezivanje u LAN-u 08.09.2005. u 21:50 · pre 257 meseci #9
IdTCPServer.CommandHandlersEnabled to ne postoji :-)
S := AThread.Connection.ReadLn; ??? od kud si sad uzeo AThread? jesi dodao sto u uses?

nista ne kuzim...
Potpis
>>Mirkec<<
Re: pomoc kod povezivanje u LAN-u 08.09.2005. u 22:00 · pre 257 meseci #10
Da ti mozda ne koristis Indy 10 komponente? Ovo sto ti ja govorim radi za Indy 9.
Potpis
Play Store
Re: pomoc kod povezivanje u LAN-u 08.09.2005. u 22:20 · pre 257 meseci #11
Citat:
IdTCPServer.CommandHandlersEnabled


probaj IdTCPServer.IdCommandHandlersEnabledDefault

a sta je AThread ni meni nije jasno
Re: pomoc kod povezivanje u LAN-u 08.09.2005. u 23:39 · pre 257 meseci #12
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.
Potpis
Play Store
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme