Tags:
delphi
Hvordan kan jeg få vist mit programs uptime i en label?
12 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 1 karma
0
Har lige læst lidt i hjælp filen og sådan som jeg forstår det returnere .close ikke en værdi, den lukker bare formen.
0
Under Privat, helt øverst, skriver du:
uptime: integer;
Onreat:
uptime := 0;
Tag en timer, og sæt på formen. Enabled og intival skiftes ik!
Koden til timer er ca. sådan her:
begin
uptime := uptime + 1;
end;
__________________________________
Når du ønsker at se hvor lang tid gør du dete. I dette eks. tænker jeg på en knap som viser informationerne!
---Kode til knap:---
begin
label1.caption := inttostr(uptime); //virker det ik, er det strtoint
end;
Shafh
www.shafh.dk
Shafh@stofanet.dk
Theis F. Hinz
Make you glad to change the world