Os Datasource dos Componentes de um form

Delphi

29/09/2003

Boa Tarde!



Gostaria de saber se alguém sabe como faço p/vasculhar um form, encontrar os componentes que tem a propriedade TDataSource e pegar o DataSet desta propriedade.



Se alguém tiver como me ajudar... Agradeço.


Andreyagra

Andreyagra

Curtidas 0

Respostas

Marcelo.c

Marcelo.c

29/09/2003

Tente:

var i: integer; s: String;
begin  
  for i:= 1 to ComponentCount -1 do 
    if (Components[i] is TDataSource) then 
      s:=(Components[i] as TDataSource).DataSet;
end;



GOSTEI 0
Andreyagra

Andreyagra

29/09/2003

:D Chefia, vc não entendeu.

Quero pegar o DataSource que está setado no componente. Não q ele esteja na tela...

Muito Obrigado!
Tente: 
var i: integer; s: String;
begin  
  for i:= 1 to ComponentCount -1 do 
    if (Components[i] is TDataSource) then 
      s:=(Components[i] as TDataSource).DataSet;
end;



GOSTEI 0
POSTAR