Hallo Leute,
ich versteh nicht wieso mein Code nicht das tut was er soll. Ich will einfach nur alle Kalenderwochen eines gegebenen Jahres in einer Combobox darstellen:
Delphi-Quellcode:
datum := DateOf(StrToDate('31.12.'+editJahr.Text));
for i:=0 to WeekOf(datum)-1 do
begin
cbVon.Properties.Items.Add('KW '+IntToStr(i+1));
end;
cbVon.ItemIndex := WeekOf(Now)-1;
Nachher seht aber nur "KW 1" in der Combobox und weiter nichts.
Kann mir wer sagen warum?