secs siden 1 jan 1970

*lol*

Det kræver vist en orgentlig opløsning, hvis man ikke vil scrolle!

Hmm, hvorfor ?

Dugfriskt eksempel:  995668387  = Sat Jul 21 00:33:07 2001

Fordi, at hvis du fåe et tal på fore milliarder karakterer, kommer det nok til at fylde en del på skærmen - det var en joke!

Ok :)
Går nok en del tid inden der skal scrooles alene ved 1024*768, mon ikke folk skifter inden :)

prøv at kigge her:

http://www.eksperten.dk/spm/70589

http://www.eksperten.dk/spm/70411

/ZIRON

1)
  Download eksemplet http://borrisholt.com/Eksperten/DateDiff.zip

Luk eksemplet op og opret et FormCreate  og skriv det følgende :

procedure TForm1.FormCreate(Sender: TObject);
begin
  MonthCalendar1.Date := StrToDate(\'01-01-70\');
  Edit1.Text := \'00:00:00\';
  Edit2.Text := TimeToStr(now);
end;

Tryk der efter på Calculate ....

Så er du i luften.

Jens B

jens >> hvorfor er du sådan en hest :-)

/ZIRON

Suppose thats just a fact of life !!!

Jens B

jens >> hehe :-)

/ZIRON

Endnu nemmere kan du bare bruge

  SecondsBetween(StrToDate(\'01-01-70\'),now);

Jens B

eller

SecondSpan(StrToDate(\'01-01-70\'),now);

Hvis ikke kun vil regne i hele sekunder.

(rtfm)

Jens B

Hey!
I did read the fucking manual :)

Vidste bare ikke hvordan secoundsbetween virkede, skal dog kun bruge hele secs :)

Thx

mora >> Må jeg ikke drille ?

Jens B

Lol :)