Hallo Barnti,
das ist zwar nur ein Schuss ins Blaue von mir, aber bist Du sicher dass
Zitat von
barnti:
Delphi-Quellcode:
Function1(nummer: String):string;
begin
while PartieNummerExistiert(IntToStr(Nummer)) do
begin
Nummer:= Nummer +1;
end;
result:= IntToStr(nummer);
end;
funktioniert?
nummer:String -- Nummer:= Nummer+1
(Du versuchst einen String zu inkrementien)