Dann lag ich ja in #30 nicht schlecht.
Dreh die erste Zeile um und lass die zweite weg und du hast Teil 1 der Aufgabe erfüllt:
Delphi-Quellcode:
ImageFileName := KST_LagerbewertungQuery.FieldByName('Bildpfad').AsString;
//Image1.Picture.SavetoFile(ImageFileName);
Nur damit das klar ist, Jumpy meint explizit:
Delphi-Quellcode:
KST_LagerbewertungQuery.FieldByName('Bildpfad').AsString := ImageFileName;
//Image1.Picture.SavetoFile(ImageFileName);