|
Registriert seit: 12. Dez 2004
Ort: Wien, Österriech
893 Beiträge
Delphi 6 Enterprise
|
Re: HA: Array
13. Mai 2006, 09:00
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i, n, num:Integer;
begin
n := 1;
num := 0;
for i:=0 to 10 do
begin
num := num + n;
ListBox1.Items.Add(IntToStr(num));
n := n + 1;
end;
end;
Katura Haris
Es (ein gutes Wort) ist wie ein guter Baum, dessen Wurzel fest ist und dessen Zweige in den Himmel reichen.
|