danke luckie, jetzt gehts, es fehlte in meiner test
unit die zeile zwischen interface und implementation...
Delphi-Quellcode:
unit gcc;
interface
function Rand(Randfrom, Randto: integer): integer; << die hier
implementation
function Rand(Randfrom, Randto: integer): integer;
begin
Randomize;
Repeat
Result := Random(Randto);
until Result > Randfrom-1;
end;
end.
kannst du mir erklären wie die proceduren/funktionen alle nochmal oben definiert sind? ich meine, ist ja irgendwie doppelt oder?