TMonthCalendar + Tage Fett markieren + Schleife

[DeddyH]

Hallo und Willkommen in der DP ,

Du navigierst nicht durch Dein Dataset, sondern stehst immer auf demselben Datensatz. Statt einer For-Schleife bis RecordCount solltest Du es einmal so versuchen:

Delphi-Quellcode:

PSQLQuery1.Open;
while not PSQLQuery1.EOF do
  begin
    (* Datensatz verarbeiten *)
    PSQLQuery1.Next;
  end;