Warum nicht den eigentlichen Fehler beheben?
Sorge dafür, dass der Variable auch bei ELSE etwas zugewiesen ist und Problem gelöst. (oder vor dem ersten IF)
PS:
TBrushRecall
https://www.delphipraxis.net/1288015-post5.html
[add]
Delphi-Quellcode:
begin
Recall := nil;
IF Gesperrt0(aCol,-1) THEN
BEGIN
Recall := TBrushRecal.Create(DG0_AbtlNamen.Canvas.Brush);
END;
Dann was tun
Recall.Free; // unnötig nochmal Gesperrt0 auszuführen, weil intern über Assigned(Recall), im Free, die vorherrige Ausführung oder Nicht-Ausführung erkannt wird
end;