[es] - Indy + Kylix

Taurus
Taurus Dorat
Banjaluka

Član broj: 6526
Poruke: 5
*.digit-rs.com

Profil

Indy + Kylix

^{29.11.2002. u 11:46 - pre 260 meseci}

Kako da koristim Indy komponente u console aplikaciji? Znaci nema formi.

Odgovor na temu

broker

Član broj: 2415
Poruke: 8514
*.verat.net

+11 Profil

Re: Indy + Kylix

^{29.11.2002. u 13:51 - pre 260 meseci}

Kao i ostale komponente, kreiraj ih sam....

var
Component : TComponent;

begin

...

Component := TComponent.Create....

.... ovde radis sta treba....

Component.Free;

...

end;

Odgovor na temu

Taurus
Taurus Dorat
Banjaluka

Član broj: 6526
Poruke: 5
*.digit-rs.com

Profil

Re: Indy + Kylix

^{30.11.2002. u 10:58 - pre 260 meseci}

Ma dobro to znam to. Nisam ja amater. Al ne kontam kako obradjivati dogadjaje? Ja kreiram komponentu i popunim svojstva i pozovem konekt ali sta onda ? Program mi se odmah zavrsi.
????

Odgovor na temu

-zombie-
Tomica Jovanovic
freelance programmer
ni.ac.yu

Član broj: 4128
Poruke: 3448
*.dial.InfoSky.Net

Sajt: localhost

+5 Profil

Re: Indy + Kylix

^{30.11.2002. u 13:29 - pre 260 meseci}

pa, izgleda da jesi amater (bez uvrede).

pored "normalnih" propertya, svaka (vecina) komponenti ima i Event propertye. to su oni koji pocinju na "On", na primer OnKeyUp.

recimo, ako potpis (tip) takvog event propertya glasi

Code:

type
TKeyEvent = procedure (Sender: TObject; var Key: Word; Shift: TShiftState) of object;

onda lepo u tvom objektu napravish metod sa istim takvim parametrima, i dodelish je tom property-u.

Code:

type myobj = class
    procedure MyEventHandler(Sender: tobject; var key: word; shift: tShiftState);
end;

...

begin
    componenta:=tComponent.Create(blah);
    componenta.onKeyUp:=MyEventHandler;
    componenta.run; // ili stagod
    componenta.free;
end;

blogče :: unescaped beta^{^» ^{go-paste extenzija} ^» ^{reč dana: backup} ^» ^{bočne koalicije}}

Odgovor na temu

Taurus
Taurus Dorat
Banjaluka

Član broj: 6526
Poruke: 5
*.digit-rs.com

Profil

Re: Indy + Kylix

^{02.12.2002. u 12:35 - pre 260 meseci}

Ne vredjam se i nisam amater. Sve to sto si mi rekao znam ali ono sto me muci jeste ona linija gdje si napisao sta god:
componenta.run; // ili stagod

E to stagod mi treba ! Koji metod treba da pozovem da bi se dogadjaji izvrsavali u pelji i da se ne pozove Free odmah?

Shvatas li ti sta ja trazim ?

U windowsu imam metod run u kojem se poziva ProcessMessages() ali sta da koristim ovde ?

Odgovor na temu

-zombie-
Tomica Jovanovic
freelance programmer
ni.ac.yu

Član broj: 4128
Poruke: 3448
*.rcub.bg.ac.yu

Sajt: localhost

+5 Profil

Re: Indy + Kylix

^{03.12.2002. u 00:36 - pre 260 meseci}

izvini nije bilo namerno. (ali ni ti nisi bio toliko precizan kao poslednji put..)

ja sam tamo misliio da pozovesh taj connect, ali ocigledno nije to problem...

rekao si kylix, ali nisi rekao da li pokusavash to da napravish za win ili za linux.

i to sto pravish, lici na neki server (servis, deamon). cini mi se da nije za win (za win imash new->service application).

ja imam delphi 6, i u delphi/demos/indy diru, stoji indy_demos.html fajl koji ima popis i objasnjenje demoa u tom diru. tu se i pominju dva-tri kylix primera (jedan se zove kylix deamon, sto bi tebi verovatno koristilo) ali ih nema u direktorijumu.

zato, ako imash neku (noviju) verziju delphija, ili kylix-a, pogledaj taj dir, mozda nadjesh primer za to sto ti treba...

blogče :: unescaped beta^{^» ^{go-paste extenzija} ^» ^{reč dana: backup} ^» ^{bočne koalicije}}

Odgovor na temu

Taurus
Taurus Dorat
Banjaluka

Član broj: 6526
Poruke: 5
*.digit-rs.com

Profil

Re: Indy + Kylix

^{03.12.2002. u 12:44 - pre 260 meseci}

Treba mi i za linux i za win. Zato sam mislio da radim CLX projekat pa ga za win prevedem u delphiu a za linux u kylixu. Ne mora da bude deamon moze i obican proces. Ionako nisam nikad pisao linux demone. A i to za service application znam i koristio sam. Imam Delphi 7 al u njemu nema indy primjera uopste vec samo pise da ih skinem s neta sto cu i da uradim. Mada sumnjam da cu naci sto mi treba. U svakom slucaju hvala na savjetu.

Odgovor na temu

silverglider

Član broj: 651
Poruke: 218
*.arcor-ip.net

Sajt: www.benchmark.co.yu

Profil

Re: Indy + Kylix

^{04.12.2002. u 20:58 - pre 260 meseci}

Pa napravis jedan obican tthread objekat u cijem execute metodu vrtis sve u petlji "while not terminated do ...". A sam thread gasis na onaj event koji tebi treba -> bilo da je specificni telegram koji dobijas preko socketa, kombinacija tastera ili nesto trece.

Na primer, kreiras jedan TEvent objekat, recimo TPodaciStigli. Njega okines na event svog (recimo) TCP servera OnDataReady, tj nesto poput:

Code:

TMojTCPserver.OnDataReady(Sender ... blah-blah);
begin
TPodaciStigli.SetEvent;
end;

A u tvojoj thread klasi stavis lepo :

Code:

TMojThread.Execute;
begin
  while not terminated do
  begin
    if TPodaciStigli.WaitFor($ffff) <> wrSignaled then
      CitajStreamSaSocketa;
    ...
  end;
end;

Jedino sto jos moras da obezbedis da se thread gasi na neki tvoj event, kao sto rekoh - kombinacija tastera ili nesto drugo.

Odgovor na temu