mailrtf works ok in vb but not delphi?

The read mail and write mail RTF fcns work ok
with MS VB but Delphi can't handle the fcn call?

I have tried the dll with VB and everything is fine.

Any suggestions?

The header translation would be:
unit Unit2;
interface
function WriteRtf(ProfileName: PChar; MessageId: PChar;
StoreId: PChar; cText: PChar): word; stdcall;
function ReadRtf(ProfileName: PChar; MessageId: PChar;
StoreId: PChar; cText: PChar): word; stdcall;
implementation
function WriteRtf; external 'MAPIRTF.DLL' index 2;
function ReadRtf; external 'MAPIRTF.DLL' index 1;
end.

The function call would look like:
  bret := readRTF(sesname,id, sid, crtf);

variables are initialized,  memory is allocated and all that stuff.

Any help is greatly appreciated.

- Dave