🚀 go-pugleaf

On Wed, 28 Jan 2004 14:51:30 +0100, "Stefano" <s.dardari@tin.it> wrote:

>Ciao Giuliano,
>
>>     try to use the Value property. Have a look at the following snippet
>> (untested):
>>
>>     const WideString PropertyName = "Jet OLEDB:Flush Transaction Timeout";
>>
>>     _di_Properties Properties( ADODataSet1->Recordset->Properties );
>>     Properties->Item[ PropertyName ]->Value = 2000;
>
>thanks again for your help!
>
>I've tried also with this code, but result don't change.
>
>I't seems that the PropertyName "Jet OLEDB:Flush ... ecc..." does not exist.
>I've also tried with other PropertyName values (I've got from Microsoft ADO
>site) but it does not work!  :-(
>
>Are this Properties valid also for ADODataSet component ?
>Or are valid only for ActiveX ADOX component ?
>
>I've nevere specified that I use the ADODataSet Component from ADO  BCB6
>palette.
>Do I've to use other components ?
>
>Nobody have used ADO properties before ?
>
>Thanks again.
>

Hi Steve,

    you could try to list all the properties of your dataset with a snippet
like the following:

    // make sure your dataset is opened
    ADODataSet1->Active = true;

    _di_Properties Properties( ADODataSet1->Properties );

    WideString PropList;

    for ( int Idx = 0 ; Idx < Properties->Count ; ++Idx )
        PropList += Properties->Item[Idx]->Name + " = " +
                    Properties->Item[Idx]->Value + "\r\n";

If you place a TMemo onto a form, you can assign the retrieved list to the
TMemo in this fashion:

    Memo1->Lines->Text = PropList;

In this manner, you can see all the properties of the dataset.

In the same fashion, you can investigate the properties of the associated 
TADOConnection. Simply you have to substitute the line

    _di_Properties Properties( ADODataSet1->Properties );

with the line 

    _di_Properties Properties( ADODataSet1->Connection->Properties );

Buona fortuna.

Ciao

Giuliano