Einzelnen Beitrag anzeigen

Benutzerbild von Neutral General
Neutral General

Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#16

Re: Daten aller Donnerstage im Monat

  Alt 3. Jan 2010, 17:23
@himitsu, dass ginge wenn ich das ganze Jahr in einer Tabelle gespeichert hätte^^ Habe ich aber nicht.

Ich glaube ich brauche sowas wie ne Stored Procedure oder so. Man gibt Monat und Wochentag ein und die Procedure gibt Datum1,Datum2,Datum3,Datum4 zurück (ggf. NULL, falls es nur 3 Donnerstage gibt oder so).

Im Prinzip brauche ich sowas nur in SQL:

Delphi-Quellcode:
function GetWochentage(AMonat: TMonat; AWochentag: Integer): TList<TDate>;
var i: Integer;
begin
  for i := 0 to AMonat.TageCount-1 do
    if AMonat.Tage[i].Wochentag = AWochentag then
      Result.Add(AMonat.Tage[i].Date);
end;
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
  Mit Zitat antworten Zitat