Bist du sicher, dass du das
: boolean;
angegeben hast? Der Fehler erscheint bei mir nämlich nur, wenn ich folgendes versuche:
function Irgendwas;
Du siehst (evtl.), dass das Rückgabeergebnis der
Funktion fehlt.
Noch besser wär´s allerdings, wenn du die Funktion nicht von der Form abhängig machst:
Code:
[b]function[/b] [color=red][s]TForm1.[/s][/color]ExitWin(flag:word): Boolean;
Damit lässt sie sich bspw. in eine separate
Unit auslagern und auch für andere Projekte verwenden. Darum verzichtet meine Prozedur ja auch auf die Angabe von irgendwelchen Forms, weil sie streng genommen ohnehin aus einem
nonVCL-Projekt stammt.