Delphi ActiveX

Create Email with Embedded Link

Creating an email with an embedded link (HTML hyperlink).

Chilkat Delphi ActiveX Downloads

Delphi ActiveX

uses
    Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
    Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Chilkat_TLB;

...

procedure TForm1.Button1Click(Sender: TObject);
var
email: TChilkatEmail;
html: WideString;
mime: WideString;

begin
email := TChilkatEmail.Create(Self);

// To create an email with an embedded link, use HTML:
html := '<html><body><p>Click here for more information: <a href="http://www.chilkatsoft.com/">Chilkat Software</a></body></html>';

email.SetHtmlBody(html);

// Continue building the email by adding the subject, recipients, etc...

mime := email.GetMime();
Memo1.Lines.Add(mime);
end;