Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Delphi service app i dohvat imena file-a

[es] :: Pascal / Delphi / Kylix :: Delphi service app i dohvat imena file-a

[ Pregleda: 452 | Odgovora: 5 ]

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

franjo_tahi
Franjo Tahi
Zagreb

Član broj: 34712
Poruke: 134
213.147.114.*



Profil

icon Delphi service app i dohvat imena file-a20.03.2008. u 08:43

Da li netko ima iskustva u izradi programa u delphi-u koji bi se vrtio kao service?
Program bi trebao biti dosta jednostavan: ispisivati text file na štampač, a trebao bi se moći pozvati kombinacijom tipki F1-F10 ili CTRL+"nešto" te bi zahtjevao unos naziva file-a koji nakon uređenje, određivanja veličine fonta itd. ispiše.
Program radi na više radnih stanici, txt file je na serveru i nakon pregleda se briše.

Drugi dio pitanja:
Program rađen u Clipperu kreira txt file za ispis, nakon toga poziva readme.com koji taj file pokazuje na ekranu na način: "readme.com neki_file.txt". Kako iz delphi programa saznati koji je to neki_file.txt? (Programera Clipper programa niti koda, normalno, nema...)

Unaprijed hvala na pomoći ili ideji.
20.03.2008. u 08:43 

mVeliki
Miroslav Ćurčić
Novi Sad

Član broj: 19034
Poruke: 575
*.adsl.beotel.net.



Profil

icon Re: Delphi service app i dohvat imena file-a20.03.2008. u 09:20
Pogledaj kako je urađen FIBS, imaš ga na:
http://www.firebirdfaq.org/files/fibs200setup.exe
http://www.firebirdfaq.org/files/fibs-source.zip
"The quieter you become, the more you are able to hear."
20.03.2008. u 09:20 

priki
Srdjan Šurlan

Član broj: 24732
Poruke: 284
*.static.t-2.net.

ICQ: 174153511


Profil

icon Re: Delphi service app i dohvat imena file-a20.03.2008. u 09:29
Citat:
franjo_tahi: Da li netko ima iskustva u izradi programa u delphi-u koji bi se vrtio kao service?


u principu, program je jednostavan, morao bi se samo napraviti u thread-u
jer ukoliko dodje do "zapucavanja" programa iz nekog razloga da
glavni interfejs na tom rad stanici, kompjuteru, ostane funkcionalan

druga stvar, trebaće ti neke komponente za debug thread-a
20.03.2008. u 09:29 

X Files
Vladimir Stefanovic
Pozarevac

SuperModerator
Član broj: 15100
Poruke: 2677
*.tekostolac.co.yu.

Jabber: xfiles@elitesecurity.org
Sajt: www.antivari.com


Profil

icon Re: Delphi service app i dohvat imena file-a20.03.2008. u 09:32
BEZ SERVISNE APLIKACIJE:
1) Project1 (aplikacija koja se minimizuje u tray)
2) Project2 (global keyboard hook DLL)

Scenario: Aplikacija ima autostart i minimizuje se u tray, pri cemu aktivira global keyboard hook DLL. Kombinacijom tastera poziva se (SendMessage()) dijalog za izbor, uredjivanje i stampanje fajla.

SA SERVISNOM APLIKACIJOM:
Project1 (servisna aplikacija)
Project2 (global keyboard hook)
Project3 (dijalog za biranje, uredjivanje i stampanje fajla)

Scenario: Servis radi u pozadini, startuje se automatic pri cemu aktivira global keyboard hook DLL. Kombinacijom tastera servisu se salje poruka (ControlService()) da pozive dijalog Project3 za izbor, uredjivanje i stampanje fajla.

E sad, servisi mogu da imaju i svoj sopstveni interfejs (cime se eliminise Project3), ali ja to nikada nisam radio jer po Borland forumima vecito je predlagana zasebna aplikacija.

FREEWARE
Di rečnik, v1.0.058 (srp-eng/eng-srp priručni rečnik)
http://www.antivari.com
20.03.2008. u 09:32 

X Files
Vladimir Stefanovic
Pozarevac

SuperModerator
Član broj: 15100
Poruke: 2677
*.tekostolac.co.yu.

Jabber: xfiles@elitesecurity.org
Sajt: www.antivari.com


Profil

icon Re: Delphi service app i dohvat imena file-a20.03.2008. u 09:44
Drugi deo pitanja nisam bas razumeo,a li kao kroz maglu predosecam da ne mozes da identifikujes TXT fajl koji je nastao iz Clippera.

Mozes li da po vremenu kreiranja i/ili formatu fajla izlistas raspolozive fajlove, pri cemu selektujes kao default poslednje napravljeni.

FREEWARE
Di rečnik, v1.0.058 (srp-eng/eng-srp priručni rečnik)
http://www.antivari.com
20.03.2008. u 09:44 

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 1079
*.adsl-a-1.sezampro.yu.



Profil

icon Re: Delphi service app i dohvat imena file-a20.03.2008. u 11:22
> Program bi trebao biti dosta jednostavan: ispisivati text file na štampač, a trebao bi se moći pozvati kombinacijom tipki F1-F10 ili CTRL+"nešto" te
> bi zahtjevao unos naziva file-a koji nakon uređenje, određivanja veličine fonta itd. ispiše.
> Program radi na više radnih stanici, txt file je na serveru i nakon pregleda se briše.

Odabir fajla, presretanje odgovarajuće kombinacije tastera zahteva ulogovanog korisnika tj. desktop, servisi treba da se izvršavaju nezavisno od tih stvari. MS je do Viste dozvoljavao interakciju servisa i desktopa tako da je moguće napisati i takav servis ali to nikako nije dobra ideja. Ako ti baš treba servis (mada mislim da ovde to nije slučaj), napiši i klasičan program koji će interagovati sa korisnikom a servisu samo dostavljati naziv fajla koji će to dalje štampati.
Detekciju određene kombinacije tastera ćeš najlakše uraditi preko globalnog hot keya, pogledaj RegisterHotKey funkciju.

> Program rađen u Clipperu kreira txt file za ispis, nakon toga poziva readme.com koji taj file pokazuje na ekranu na način:
> "readme.com neki_file.txt". Kako iz delphi programa saznati koji je to neki_file.txt? (Programera Clipper programa niti koda, normalno, nema...)

Zameniš readme.com sa nekim tvojim bilo batch fajlom bilo custom napisanim programom koji prvo pošalje naziv fajla gde treba a potom pozove originalni readme.com.
20.03.2008. u 11:22 

[es] :: Pascal / Delphi / Kylix :: Delphi service app i dohvat imena file-a

[ Pregleda: 452 | Odgovora: 5 ]

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.