Das .Refresh kannst du Dir sparen, dass macht die Image Komponente automatisch.
Und ausserdem:
Delphi-Quellcode:
procedure TDataModule1.DataSource1DataChange(Sender: TObject; Field: TField);
begin
if FileExists(DataModule1.DataSource1.DataSet.FieldbyName('FotoNord').AsString) then
^^^^^^^^^^^^ <==== weglassen !
// so ist es besser
if FileExists(DataSource1.DataSet.FieldbyName('FotoNord').AsString) then
Wenn du innerhalb der Klasse
TDataModule1 bist, dann darfst du nicht über die Variable
DataModule1 zugreifen.
Das ist eine ganz böse Falle und wurde schon häufig hier im Forum diskutiert.