Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Klaus01,
15. Jun 2007
Mit Deinem Code läuf das so:
z.B. Zahlen im Array : 9 2 8 1 4 7 8 ..
Nach dem ersten Durchlauf (i=1) bekommst Du die
1 als kleinste Zahl.
Nach dem zweiten Durchlauf (i=2) bekommst Du die
1 als kleinste Zahl. Warum , weil die 1 immer noch an der
gleichen Position steht wie zuvor.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Klaus01,
15. Jun 2007
procedure TForm1.btSortierenClick(Sender: TObject);
var
i,j,min,hilfsvar:integer;
begin
for i:=1 to 10 do
begin
Stringgrid1.Cells:=inttostr(kleinstezahl(i,10));
end;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Klaus01,
14. Jun 2007
Wieso sortierst Du denn nicht das Zahlenarray?
Infos zu Sortierverfahren findest Du hier -> http://www.hrz.uni-dortmund.de/A1/kurse/pascal99/teil2_tag3.html
Grüße
Klaus