Activex OLE Delphi

  1. Home
  2. Delphi
  3. Activex OLE
  4. Otomatik e-mail gönderme
//!!! uses satirina shellapi eklenmeli
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Handle,'open','mailto:fdemirel@kkk.tsk.mil.tr','','',sw_Normal);
end;