Foros Club Delphi - Levantar nuevo e-mail en outlook express

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - Levantar nuevo e-mail en outlook express (https://www.clubdelphi.com/foros/showthread.php?t=7329)

jrcosta75

11-02-2004 22:46:08

Levantar nuevo e-mail en outlook express

Necesito saber si hay alguna forma de levantar una nuevo e-mail desde el outlook espress, desde la direccion colocada en un dbedit en una form. o si hay que hacer algun otro paso para abrir un nuevo e-mail.
Estoy usando Dephi 5 Enterprice.
Saludos y gracias

__cadetill

12-02-2004 09:54:15

Algo así?

Código:

  ShellExecute(GetDesktopWindow(),

               nil,

               pChar('mailto:'+

               DbEdit1.Text),

               nil,

               nil,

               SW_SHOWNORMAL);

jrcosta75

12-02-2004 12:11:44

error en codigo de e-mail

Coloque el codigo que vos me pasaste en el evento on click del DBedit y me arojo un error
El cidigo colocado fue:

procedure TForm3.ELocalidadClick(Sender: TObject);
begin
ShellExecute (GetDesktopWindow(),nil, pChar('mailto:'+ EDireccion.Text),
nil,nil, SW_SHOWNORMAL);
end;

y el error al comilar fue:

[Error] Unit3.pas(348): Undeclared identifier: 'ShellExecute'
[Fatal Error] Project1.dpr(23): Could not compile used unit 'Unit3.pas'

__cadetill

12-02-2004 12:36:53

Esta función se encuentra en la unit ShellApi, por lo que tendrás que añadir ésta en el uses de tu formulario

La franja horaria es GMT +2. Ahora son las 19:58:56.