Topic: [Script] Opening e-mail program with the addressee

Opening e-mail program with the addressee



procedure Form1_Edit1_OnDoubleClick (Sender: string);
begin
    OpenFile('mailto:'+Form1.Edit1.Text);
end;

// not necessarily
// just for hight light e-mail address and change cursor to HandPoint
procedure Form1_Edit1_OnKeyUp (Sender: string; var Key: Word; Shift, Alt, Ctrl: boolean);
begin
    if Pos('@', Form1.Edit1.Text)>0 then
    begin
        Form1.Edit1.Cursor := crHandPoint;
        Form1.Edit1.Font.Style:=fsUnderline;
        Form1.Edit1.Font.Color := clHotLight;
    end else
    begin
        Form1.Edit1.Cursor := crDefault;
        Form1.Edit1.Font.Style:=0;
        Form1.Edit1.Font.Color := clDefault;
    end;
end;

begin
end.


Download project:
http://myvisualdatabase.com/forum/misc. … download=1

Dmitry.

Re: [Script] Opening e-mail program with the addressee

procedure Form1_Edit1_OnDoubleClick (Sender: string);
begin
    OpenFile('mailto:'+Form1.Edit1.Text);
end;

Is there a way of attaching a report to the email when using this script?

I looked at the script for sending email direct from MVD but this means storing email login/password in MVD which I would rather not do, hence wanting to use my email client (currently Thunderbird).

Re: [Script] Opening e-mail program with the addressee

No, you can only to send email with attached file directly from MVD.

Dmitry.