string zwischenspeichern?

[Neutral General]

Jetzt mal anhand ner Function die Zahlen zurückgibt:

Delphi-Quellcode:

function GibMirNeZahl: Integer;
begin
 Result := random(10);
end;

procedure Ka;
var Temp,Temp2: Integer;
begin
 Temp := GibMirNeZahl;
 repeat
  Temp2 := GibMirNeZahl;
 until Temp2 <> Temp;
end;

Naja soo ungefähr würd ichs vielleicht machen.. aber es kommt drauf an welches problem du genau hast.. weil das mit der Schleife bietet sich wahrscheinlich nicht oft an :mrgreen:
Und meine Function + ausführung ist halt sehr verallgemeinert... ^^

PS: Hoffe ich hab dich ansatzweise richtig verstanden ^^
PPS: Ich glaube du meinst das noch viel einfacher..
mom.. ich editier das grad mal..
PPS: Sry ich bin grad zu müde um mein Kopf anzustrengen -.-
Und das was oben steht ist auch Schwachsinn -.-

Gruß
Neutral General