Delphi Can
Mail ekinde image resmi gönderme - Baskı Önizleme

+- Delphi Can (https://www.delphican.com)
+-- Forum: Delphi (https://www.delphican.com/forumdisplay.php?fid=3)
+--- Forum: Genel Programlama (https://www.delphican.com/forumdisplay.php?fid=6)
+--- Konu Başlığı: Mail ekinde image resmi gönderme (/showthread.php?tid=6557)



Mail ekinde image resmi gönderme - gonulali - 17-01-2022

Merhaba Üstadlarım.
yaptığım program içinde mail gönderimi yapıyorum. bu kısımda sorun yok, ama mail içeriğinde veya ekinde image nesnesindeki görüntülenen resmi de göndermek istiyorum. Nasıl bir yol izlemem gerek acaba? Yardımlarınızı rica ediyorum.


Cvp: Mail ekinde image resmi gönderme - enigma - 17-01-2022

(17-01-2022, Saat: 13:30)gonulali Adlı Kullanıcıdan Alıntı: Merhaba Üstadlarım.
yaptığım program içinde mail gönderimi yapıyorum. bu kısımda sorun yok, ama mail içeriğinde veya ekinde image nesnesindeki görüntülenen resmi de göndermek istiyorum. Nasıl bir yol izlemem gerek acaba? Yardımlarınızı rica ediyorum.

Şunu bir inceleyin isterseniz. Ben 4 sene kadar önce yapmıştım ve çalıştı. Hem ek dosya hem de resim gönderebiliyorsunuz.

http://www.delphiturkiye.com/forum/viewtopic.php?t=36038


Cvp: Mail ekinde image resmi gönderme - QuAdR - 17-01-2022


//MailMessage: TIdMessage;

var
 Path: string;
 SR: TSearchRec;


Path := ExtractFilePath(ParamStr(0));


if FindFirst(Path + '*.jpg', faAnyFile, SR) = 0 then
     begin
       repeat
         with TIdAttachmentFile.Create(MailMessage.MessageParts, Path + SR.Name) do
         begin
           ContentType := 'image/jpeg';
           FileName := SR.Name;
         end;
       until FindNext(SR) <> 0;
       FindClose(SR);
     end;





Mail ekinde image resmi gönderme - gonulali - 18-01-2022

Teşekkür ederim, yanlış anlaşılma oldu sanırım. Ben program açıkken image1 nesnesinin içinde gösterilen resmi göndermek istiyorum. Kullanıcın manuel ekleyeceği bir resmi değil.
image1 de gösterilen resimde veri tabanından geliyor.


Cvp: Mail ekinde image resmi gönderme - COMMANDX - 18-01-2022

(18-01-2022, Saat: 10:31)gonulali Adlı Kullanıcıdan Alıntı: Teşekkür ederim, yanlış anlaşılma oldu sanırım. Ben program açıkken image1 nesnesinin içinde gösterilen resmi göndermek istiyorum. Kullanıcın manuel ekleyeceği bir resmi değil.
image1 de gösterilen resimde veri tabanından geliyor.

image1.Picture.SaveToFile('c:\deneme.jpg');

sonra nereye göndereceksen 'c:\deneme.jpg' olarak Load edersin .




Mail ekinde image resmi gönderme - gonulali - 18-01-2022

Evet hocam. Teşekkür Ederim herkese.