Avatar billede kinginkvong Nybegynder
25. august 2006 - 19:05 Der er 5 kommentarer og
1 løsning

ugedage og datoer.

Okay her er en opgave jeg ikke lige kan knække, men i kan nok.

Jeg har en given dato gemt i en variabel, og jeg har brug for at gemme datoen for den næst kommende fredag for den givne dato i en anden variabel.
Jeg er ligeglad med datatypen so datoerne skal gemmes i.

Håber i kan forstå hvad mit lille ”problem” går ud på. Jeg har brug for en nem måde, at løse det på, men jeg kender ikke nogen funktion i Delphi som jeg kan anvende.

The king in Kvong
Avatar billede kroning Nybegynder
25. august 2006 - 19:25 #1
Min delphi (Delphi 7) har en DateUtils unit hvori der findes en del dato funktioner bla. en der kan give dig et tal 1-7 for hvilken ugedag en given dato er og derfra er det jo en simpel udregning. Jeg sidder ikke lige ved en Delphi maskine så jeg kan ikke give dig noget kode, kommer senere hvis ikke en anden når det først eller du selv finder ud af det.
Avatar billede kinginkvong Nybegynder
25. august 2006 - 20:18 #2
Det er måske heler ikke nødvendigt, jeg har lige kigget kort op DateUtils og det ser ud til jeg den har hvad jeg skal bruge, nu må vi så se om jeg får løst "problemet" før en anden.
Avatar billede kroning Nybegynder
25. august 2006 - 21:17 #3
Det her burde virker:

var
    Dato1, Dato2 : TDate;
begin
    Dato1:=StrToDate('22-08-2006');

  if DayOfTheWeek(Dato1)<5 then
        Dato2:=Dato1+(5-DayOfTheWeek(Dato1))
  else
      Dato2:=Dato1-(DayOfTheWeek(Dato1)-5)+7;

    ShowMessage('Næste fredag: '+datetostr(dato2));
end;
Avatar billede kinginkvong Nybegynder
25. august 2006 - 21:34 #4
Jo den virker. Der er bare en ting, som jeg lige selv skal tilføje, da jeg skal bruge datoen til den næste fredag, og hvis man anvender din kode på en dato, der er fredag får man datoen for den dato man anvender koden på, og jeg skal bruge datoen til den næste fredag, men det skal jo blot tilføjes.

Mange tak for hjælpen og det hurtige svar.

Gider du ikke lige ligge et svar så jeg kan lukke tråden.
Avatar billede kinginkvong Nybegynder
25. august 2006 - 21:36 #5
Nej undskyld jeg tager fejl, jeg er nok for træt. Undskyld igen.
Avatar billede kroning Nybegynder
25. august 2006 - 23:05 #6
Det tog da kun 2½ minut inden du fandt ud af at du havde taget fejl så helt træt kan du da ikke være :)
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