Bild in andere Datenbank kopieren

[Sir Rufo]

Von welchem Baum muss man denn naschen um auf so eine Idee zu kommen?

Delphi-Quellcode:

procedure TForm1.bernahmederDatenindieJobdatenbank1Click(Sender: TObject);
begin
  Form17.Show;
  Form17.ADOTable1.Insert;
  
  Form17.DBImage.Picture.Assign( DBImage1.Picture );
  Form17.DBEdit10.Value := DBEdit10.Value;

  Form17.ADOTable1.Post;
end;

Wenn da kein Bild ist, dann braucht man ja auch kein Bild zu übergeben, bzw. dann schmeißt das Zuweisen (Assign) eben eine Exception.
Also sollte man vor dem Zuweisen prüfen, ob es was zum Zuweisen gibt.

Hört sich komisch an? - Ist aber so!