Forum: Object-Pascal / Delphi-Language
by Jumpy,
13. Feb 2013
Ich zitier mich mal selber:
s:='';
for i:=Low(Array) to High(Array) do
begin
s = s+Array;
if (i mod 10 = 0) or i=High(Array) then
beginn
Forum: Object-Pascal / Delphi-Language
by Jumpy,
13. Feb 2013
Mit insert machst du eine neue Zeile und verschiebst die bisherige nach unten. Dadurch entsteht die Pyramide. Du must einfach ...Lines = Lines+...+Zahl
oder entsprechend ändern.
Generell wäre es aber sicher einfacher erstmal in einer ersten Schleife die Zahlen zu generieren und in dem Array zu speichern. Anschließend dann die Zahlen aus dem Array ausgeben in einer neuen Schleife, wo man dann...