Einzelnen Beitrag anzeigen

KiRi

Registriert seit: 13. Mär 2011
6 Beiträge
 
#1

Schleife in einseitiger Auswahl

  Alt 14. Mär 2011, 00:30
Delphi-Version: 2009
Ich hab bisher keine Antwort hierauf finden können. Vielleicht geht mein Plan ja auch grundsätzlich nicht.

Im Rahmen meiner Kalenderprogrammierung ist folgender Effekt aufgetreten:

Der nachstehende Code schafft es in meiner Kalender-Monatsansicht mittels SringGrid die Rahmendaten zu integrieren - also in Spalte 1 die Tage 1. bis 31. des Monats.
Zitat:
Form1.SgAnzeige.Cells[0,0] := 'Tag';
Form1.SgAnzeige.Cells[1,0] := 'Termine';
for c:=1 to 31 do
SgAnzeige.cells[b,c]:= IntToStr(c) + '.';
Nun will ich aber über die Variable 'a' (wert 1 = Januar / 12 = Dezember) entscheiden bis zu wie viele Tage im jeweiligem Monat eingetragen werden sollen. Also a=3=März --> c bis 31 // a=2=Februar --> c bis 28.

Dachte ich setze vor die Zählschleife einfach die Bedingung und dann läuft's, aber nee, will nicht. Beispiel März:


Zitat:
[...]
Form1.SgAnzeige.Cells[0,0] := 'Tag';
Form1.SgAnzeige.Cells[1,0] := 'Termine';

a:=3;

if a=3 then
for c:=1 to 31 do
SgAnzeige.cells[b,c]:= IntToStr(c) + '.';

[...]
Schon bei diesem Code wird im StringGri nichts mehr für c erzeugt.

Hab schon mit Semikolon, begin/end usw. hin und her probiert (typisch Laie eben) aber ohne Erfolg.

Geht es überhaupt vor eine Zählschleife eine Bedingung zu setzen?

Bin für jede Hilfe dankbar.
  Mit Zitat antworten Zitat