25. juni 2001 - 14:03Der er
9 kommentarer og 2 løsninger
Tæl hvor meget et bestemt program bliver brugt.
Hej med jer.
Jeg kunne godt tænke mig i Delphi, at lave et program der kan tælle hvor mange gange et bestemt program er blevet startet op fra desktop\'en. Altså jeg vil tælle hvor meget et bestemt program bliver brugt. F.eks Microsoft Word. Bliver det brugt 2 eller 10 gange om ugen. Kan nogle komme med et forslag til, hvordan jeg kan gøre det med et Delphi program?
Det allerbedste ville være hvis windows shutcut\'et kunne virke som en trigger. Dvs samtidigt med at Word f.eks blev staret blev \'mit\' lille Delphi program også kaldt. Det kunne så sætte en tæller på f.eks en database. Men jeg mener ikke, at man kan sætte et shutcut til at starte mere end et program, så hvad kan jeg så gøre? Et cron job er heller ikke muligt uden, der ligger en eller anden slags SysAgent på maskinen, og det er vist ikke standard i NT. Nogle gode idéer?
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Det er Win-API og de kan bruges til at få fat i en Windows-handle til f.eks. at sende en WM_CLOSE til det vindue, men du kunne evt. bare set om du kunne finde Word\'s vindue og kan du det så tæller du en op, du skal jo så nok holde lidt styr på om det er den samme handle som du fik sidst, og hvis det er det skal du selvfø\'li ikke tælle op. Det kræver nok lidt housekeeping men jeg har ikke rigtig andre ider
Ja det var måske en muligehed. Men har du evt et eller andet kode eksempel hvor disse indgår i? Når det er en Win-API funktion så har jeg jo ikke meget online hjælp fra den Delphi.
Jeg kan da bare oprette en BAT fil der først starter det program op, som jeg vil \'holde øje\' med og derefter kalde mit Delphi program. Simpelt egentligt. Var det ikke det du mente.
Årsagen til programmet er, at jeg har nogle brugere, der tror at ny software bare er en gavebod. Har de brug for noget skal de også have det ellers bliver de umedgørlige. Så nu laver jeg et Delphi program, der holder øje med om de overhovedet bruger det de har bedt om. Så har jeg noget på dem, hvis jeg får brug for det. :o)
Jeg vil gerne fordele pointene imellem jer, men jeg kan ikke vælge avanceret pt og gøre det!
if not Registry.ValueExists(\'TITLE1\') then begin Registry.WriteInteger(\'TITLE1\',0); end;
if Registry.ValueExists(\'TITLE1\') then begin Registry.WriteInteger(\'TITLE1\',Registry.ReadInteger(\'TITLE1\') +1); Label1.Caption := IntToStr(Registry.ReadInteger(\'TITLE1\')); end;
Jeg lavede et lille Delphi program, der som det først kaldte applikationen med en \'ShellExecute\'.
Derefter har jeg en lille Oracle SQL tabel, hvor jeg tæller op. Det virker fint. Og ligesom hjl sagde har jeg bare indsat de rigtige iconer, så man kan ikke se der ligger et delphi program bagved. (De skulle bare vide *S*).
Det har ikke direkte noget med mit oprindelige spørgsmål at gøre, og så alligevel. Men det kunne jo være.
Jeg har for nyligt fået Delphi6 Enterprise, men når jeg compiler/ builder et projekt, får jeg ikke genereret en exe fil. Hvordan og hvor sætter jeg op, så den gør det automatisk. Ved i noget om det?
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
