- Ayrıca bu mesajlar özel mesaj olmadığını unutmayalım. Diğer üyeşerin de faydalanabileceğini değerlendirerek sorularımızı daha düzeyli soralım...
- Şimdi cevaba gelelim.... Mail olayını birden fazla metodla halledebilirsiniz...
- En basiti... 8)
//Uses ShellApi
Var
Mesaj : String;
begin
Mesaj:='mailto:'
+'mcop@ada.net.tr'
+'?Subject='
+ 'Mail konusu'
+'&Body='
+ 'Mail detayları'
+'%0A' // Enter ile bir alt satıra geçiliyor
+ 'Mail detaylarına devam'
+'%0A';
ShellExecute(Handle,'open',pChar(Mesaj),'','',SW_Show);
Var
Mesaj : String;
begin
Mesaj:='mailto:'
+'mcop@ada.net.tr'
+'?Subject='
+ 'Mail konusu'
+'&Body='
+ 'Mail detayları'
+'%0A' // Enter ile bir alt satıra geçiliyor
+ 'Mail detaylarına devam'
+'%0A';
ShellExecute(Handle,'open',pChar(Mesaj),'','',SW_Show);
- Bu şekli kullanışlı bulmazsanız, OleAutomation ile Word'e formatlı bir şekilde gönderip, buradan Word sayfasını mail olarak gönderebilirsiniz... Outlook'a göndermek dediğiniz de bu şekilde olacaktır... :)
- Bu metodları araştırıp sonucu bildirin... Çözümünüz diğer üyelerin de çözümü olabilir.. Bunu unutmayınız...
Önce programınıza raporunuzu istediğiniz tarzda veren bir HTML sayfa üretimini yaptırın ondan sonra bu başlık altından tekrar sorunuzu yineleyin lütfen...