Электронная почта

← →
Первокласник Вася (2008-05-22 15:54) [0]

Привет!

Как пользоваться функцией MAPI?

function MapiSendMail(lhSession: LHANDLE; ulUIParam: Cardinal; var lpMessage: TMapiMessage; flFlags: FLAGS; ulReserved: Cardinal): Cardinal; begin InitMapi; if @SendMail = nil then @SendMail := GetProcAddress(MAPIModule, "MAPISendMail"); if @SendMail <> nil then Result := SendMail(lhSession, ulUIParam, lpMessage, flFlags, ulReserved) else Result := 1; end;

← →
Palladin © (2008-05-22 16:00) [1]

та наверное так же как и другими...

← →
Первокласник Вася (2008-05-22 16:08) [2]

А какими таким же как и другими :)

← →
Palladin © (2008-05-22 16:11) [3]

ну как например функцией IntToStr или, скажем, FileExists... заполнить значения параметров и вызвать...

← →
Anatoly Podgoretsky © (2008-05-22 16:16) [4]

N := MapiSendMail(lhSession, ulUIParam, lpMessage, flFlags, ulReserved);

> N := MapiSendMail(lhSession, ulUIParam, lpMessage, flFlags,
> ulReserved);

жестко, а для первокласника - филькина грамота)

Ну тогда в стиле первокласников, а то действительно как то заумно

N := MapiSendMail(a, b, c, d, e);

Электронная почта Найти похожие ветки