Hi, ich habe folgende Frage:
Woran kann es liegen, wenn ein Quicksort-Algorithmus in Delphi einwandfrei funktioniert und ein VB nur manchmal??
Delphi-code (funktioniert):
type tFloatArray= Array of real;
procedure Quicks(links,rechts: integer; var feld: Array of real);
var i,j: integer;
wert,hilf: real;
begin
if rechts>links then
begin
wert:=feld[rechts];
i:=links-1;
j:=rechts;
repeat
repeat i:=i+1; until feld[i]>=wert;
repeat j:=j-1; until feld[j] links Then
wert = feld(rechts)
i = links - 1
j = rechts
Do
Do
i = i + 1
Loop Until (feld(i) >= wert)
Do
j = j - 1
Loop Until (feld(j)