ist Ganz normal denn die Funktion die du aufrufst ruft ja auch wieder andere auf:
Delphi-Quellcode:
function Irgendwas1(): Boolean;
begin
if Irgendwas2 then
result := True
else
begin
if GetLastError() <> FehlerXY then
result := True
else
begin
SetLastError(FehlerABC);
result := False;
end;
end;
end;
Funktion Irgendwas1 ruft intern Irgendwas2 auf. Und Irgendwas2 kann widerum auch SetLastError aufrufen.