🚀 go-pugleaf

OleVariant v =
ADODataSet1->Recordset->Fields->Item[WideString("au_id")]->Value;


Remove OLECHECK (compile-time) in C++ Builder 6 (not needed in earlier):

#include <comobj.hpp>

namespace System
{
 void __fastcall CheckSafecallResult(HRESULT hr)
 {
  OleCheck(hr);
 }
}

When converting OleVariant, use (WideString)v or similar, you may have
OleVariant with other type that VT_BSTR and use .bstr() may have
unpredictable results - for example, you may get OleVariant with type
VT_NULL.

//------------------------------------------
Regards,
Vassiliev V. V.
http://www.managed-vcl.com - using .Net objects in Delphi for Win32 +
ADO.Net
http://www.oledbdirect.com - The fastest way to access MS SQL Server,
MS Jet (Access) and Interbase (through OLEDB)

"Bas Groeneveld" <nospam@nospam.com.au> �������/�������� � �������� 
���������: news:427b1331@newsgroups.borland.com...
>> In type library Item is property, and GetItem, get_Item and/or [] depends
> on
>> program that imports type library. [] are imported, if I am not wrong, by
>> C++ Builder 6, but not earlier.
>
> Interesting I am using C++Builder 6 but definitely don't appear to have []
> available.
>
>>
>> >            wstUser =
>> > adoRS->Fields->get_Item(Variant(1))->get_Value().bstrVal;
>>
>> try
>>
>> adoRS->Fields->getItem(WideString("User"))->get_Value();
>
> wstUser = 
> adoRS->Fields->get_Item(WideString("User"))->get_Value().bstrVal;
> - generates a compiler error [C++ Error] fRxWorks.cpp(134): E2285 Could 
> not
> find a match for 'Fields15::get_Item(WideString)'
>
> wstUser = adoRS->Fields->get_Item(Variant("User"))->get_Value().bstrVal;
> - compiles but generates a runtime error reported by OLECHECK
>
> wstUser = adoRS->Fields->get_Item(Variant(1))->get_Value().bstrVal;
> - compiles and runs ok
>
> Cheers
> Bas
>
>