Kunne gøres således.
procedure TForm1.Button1Click(Sender: TObject);//vi lægger koden i vores button
var//vi vil gerne lave nogle variabler
i: integer;//vi laver et integer (heltal) variabel
begin
for i:= 1 to 6 do//vi laver en løkke der gør en bestemt ting
ComboBox1.Items.Add(DateToStr(Date+i));//vi tilføjer datoen og lægger variablet i til som jo forhøjes med en hver gang løkken udføres
end;
-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GED d- s: a--- C++ W++ w PS X+ tv+ b D G e- h! !r z--
------END GEEK CODE BLOCK------
[Redigeret d. 28/12-04 16:43:50 af Jonas (Decko)]