In unit2 sieht es so aus:
Delphi-Quellcode:
procedure cl.Button(Sender: TObject);
begin
Form1.Color := clred;
end;
Fehlermeldung:
Bei der procedure ; erwartet aber , gefunden
Form1 und clred sind undefinierte Bezeichner
Unit1 gibt keine Fehlermeldung zurück