BorlandTalk.com

Gary Chapman · Guest

I have an ATL/MFC COM DLL which a customer is trying to use from
Delphi 6 Enterprise SP2. He was having trouble setting properties, and
eventually discovered that all of the Set_* procedures in the
auto-generated TLB.pas file are empty. The only ones that aren't empty
are for BSTR properties - all other types are (long, enums, interface
pointers).

This happens whether he uses the BPL or imports the DLL directly using
"Import Type Library".

We have no problems using the DLL from C++, VB or ASP.

Has anybody experienced something like this? Am i missing a MIDL
keyword? Is it a build/linker setting? Do I need to specify something
in my .DEF file? Or is this a Delphi issue?

---

For those that are interested, here's how things are defined in my C++
project:

// from my .idl file
[propput, helpstring ("blah"), id(6)] HRESULT RepeatCount([in] long
newVal);

// from the corresponding .h file
STDMETHOD(put_RepeatCount)(/*[in]*/ long newVal);

// from the corresponding .cpp file
STDMETHODIMP CMyClass::put_RepeatCount(long newVal)
{
AFX_MANAGE_STATE(AfxGetStaticModuleState())

m_lRepeatCount = newVal;

return S_OK;
}

// from Delphi's auto-generated MyDLL_TLB.BAS
procedure TMyClass.Set_RepeatCount(pVal: Integer);
begin
Exit;
end;

---

Thanks,

Gary

[email]garyTHIS_ADDRESS_IS_SPAM_RIDDEN_BUT_NO_SENSE_ADDING_INSULT_TO_INJURYchapman (AT) yahoo (DOT) com[/email]