Alterar Options do DataSetProvider em Run-Time

Delphi

07/10/2004

Caros colegas,

O problema é um pouquinho mais complicado do que o título propõe, mas o resultado final é este mesmo, alterar a propriedade poAllowCommandText do DataSetProvider em run-time

Tenho uma função que recebe como um dos parâmetros um ClientDataSet, e dentro desta função eu preciso alterar a propriedade referida acima para True no início e False no final.

Exemplo:
function Executar(FcdsAuxiliar: TClientDataSet; FValor: Integer);
begin
  //Resgatar o DataSetProvider
  DataSetProvider.Options := DataSetProvider.Options + [poAllowCommandText];
  FcdsAuxiliar.CommandText := ´Select blablabla´;
....
....

  DataSetProvider.Options := DataSetProvider.Options - [poAllowCommandText];
end;


Como consigo recuperar o DataSetProvider para poder alterar a propriedade Options?

Desde já, agradeço.


Rafs

Rafs

Curtidas 0

Respostas

Paulo_amorim

Paulo_amorim

07/10/2004

Olá

Se eles estão no mesmo DataModule, tente:

FcdsAuxiliar.Owner.FindComponent(FcdsAuxiliar.ProviderName);


Isso vai te retornar o DataSetProvider que vc quer, e assim você pode fazer o que quiser com ele

Espero que ajude
Até+


GOSTEI 0
Rafs

Rafs

07/10/2004

Perfeito....

Muito obrigado Paulo_Amorim, funcionou redondinho :D


GOSTEI 0
POSTAR