das wird daran liegen das zu diesem Zeitpunkt wohl panel1 schon nicht mehr existiert (zerstört wurde). Prüfe einfach ob du gerade im "Zerstörungsmodus" bist.
Delphi-Quellcode:
procedure TForm1.DBEdit7Change(Sender: TObject);
begin
if not(csDestroying in ComponentState) and datamodule1.tbstatus.Active then
panel1.Color:=datamodule1.tbstatus.fieldbyname('farbe').AsInteger;
end;