Guten Tag,
wie bekommt man es hin,dass ein Bild in diesem Falle ein digitaler
Firmenstempel im DBImage angepasst wird,so das im DBImage alles zu sehen
ist.
Ich hab mal im Anhang ein Foto angefügt.
Man sieht im Bild noch die Mailadresse,aber die unteren Daten
"www.meinehomepage.de" sind nicht sichtbar.
Code:
Delphi-Quellcode:
procedure TForm33.Bildffnen1Click(Sender: TObject);
begin
ADOTable1.Edit;
openpicturedialog1.Execute;
DBImage1.Picture.LoadFromFile(openpicturedialog1.FileName);
Clipboard.Assign(DBImage1.Picture);
DBImage1.PasteFromClipboard;
ADOTable1.Post;
Clipboard.Clear;
end;