Im Interface-Teil in der Dekaration der Formularklasse ergänzen:
Delphi-Quellcode:
<TFormname> = class (TForm)
...
procedure losAusgeben(var zufall: integer);
..
end;
Und dann bei der Implementation:
Delphi-Quellcode:
procedure <TFormname>.losAusgeben(var zufall: integer);
...