Avatar billede koonz Nybegynder
24. september 2002 - 14:36 Der er 13 kommentarer og
1 løsning

Minutter til HH:MM

Jeg har et program der tæller "online" tid så længe det benyttes - For hvert minut tælles vOnlineTime 1 op
Inc(vOnlineTime)
Samtidig vil jeg vise brugeren hvor lang tid han har været online, jeg har prøvet med
StatusBar.Panels[2].Text := 'Online: '+TimeToStr(EncodeTime(vOnlineTime div 60, vOnlineTime mod 60, 0, 0));

Men den fejler "Invalid argument to Timeencode"
vOnlineTime er i Integer
Har jeg forstået funktionen forkert ?
Avatar billede talbodahl Nybegynder
24. september 2002 - 14:38 #1
document.cookie = name + "=" + cval + "; expires=" + exp.toGMTString();
}
// -->
</script>
<script language="JavaScript">
<!--
document.write("Velkommen WebSurfer.  " + "<BR>Du har været her " + Count() + " gang(e) før. <BR>Dit sidste besøg var " + When() +"")
// -->
</script><!--webbot bot="HTMLMarkup" endspan --></font></p>
<p align="center">
    <img border="0" src="logo1.gif" width="250" height="34"></p>
<p align="center">
Avatar billede borrisholt Novice
24. september 2002 - 14:40 #2
du skal gribe det anderledes an. Du skal lave dig en privat variabel af Typen TDateTime, lad os kalde den StartTime. Den sætter du til værdien Now i FormCreate. Så laver de en timer der gør det følgende :

StatusBar.Panels[2].Text := 'Online: ' + TimeToStr(Now - StartTime);

Jens B
Avatar billede borrisholt Novice
24. september 2002 - 14:41 #3
talbodahl >> Læs kategorien F Ø R du svarer :-)

Jens B
Avatar billede assassin Juniormester
24. september 2002 - 14:44 #4
Har du prøvet med TimeToStr(EncodeTime((vOnlineTime div 60), (vOnlineTime mod 60),0,0))??

det er ikke testet
Avatar billede koonz Nybegynder
24. september 2002 - 14:48 #5
hmnnn.....det er en værdi jeg gemmer i en Database, som bliver brugt anden steds i minutter, derfor ville jeg gerne holde den minutter.

Kan jeg regne mig frem il et tal, og så formatere det ?

Talbodahl - ellers tak for forsøget ;)
Avatar billede borrisholt Novice
24. september 2002 - 14:54 #6
const
  MinutsInADay = 60 * 24;

Function GetMinutes(aTime : TDateTime) : Integer;
var
  h, m, s, hund : Word;
begin
  Result := Trunc(aTime) * MinutsInADay;
  DecodeTime(aTime, h, m, s, hund);
  inc(result, h * 60);
  inc(result, m);
end;
Avatar billede koonz Nybegynder
24. september 2002 - 14:55 #7
Assiassin
Desværre - det funker heller ikke ;)
Avatar billede koonz Nybegynder
24. september 2002 - 15:00 #8
Borrisholt
Tak for indsatsen - men det er egntlig den anden vej jeg skal :-)

Jeg har minutter og skal til HH:MM

Eksempel

12300 Minutter skal give 205:00
Avatar billede koonz Nybegynder
24. september 2002 - 15:00 #9
Umiddelbar kan jeg jo bare dividere med 60 - Meeeeeeeeen der giver jo problemer ved "skæve" minutter
Avatar billede borrisholt Novice
24. september 2002 - 15:06 #10
nååå det er da ikke svært :

Timer    := TotalMinutter div 60
Minutter := TotalMinutter mod 60

Jens B
Avatar billede borrisholt Novice
24. september 2002 - 15:09 #11
JEg har også en procedure der kan konvetere et antal sekununder til 1 time 30 minutter etc ..

Jens B
Avatar billede borrisholt Novice
24. september 2002 - 15:11 #12
TotalMinutter := 12500;
  StatusBar.Panels[2].Text := Format('%Online : d:%d', [TotalMinutter div 60, TotalMinutter mod 60]);


Jens B
Avatar billede borrisholt Novice
24. september 2002 - 15:12 #13
hov ....

TotalMinutter := 12500;
  StatusBar.Panels[2].Text := Format('Online : %d:%d', [TotalMinutter div 60, TotalMinutter mod 60]);

Jens B
Avatar billede koonz Nybegynder
24. september 2002 - 15:22 #14
Lige præcis - takker :)
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester