1) crie uma propriedade no seu formulário

published
  property Parametro: String read GetParametro;

2) na chamada da sua tela, chame SetStrProp (ou equivalentes de outros
tipos) 

SetStrProp( aFormulario, 'Parametro', 'XUXU');

PS: A procedure SetStrProp está na unit TypInfo.

Boa Sorte,
Josir


--- Em delphi-br@yahoogrupos.com.br, "Ednro Jr" <[EMAIL PROTECTED]> escreveu
>
> Como fazer os formulários herdados abrirem o dataset no ID passado por 
> parâmetro?
> 
> Eis minha função para abrir um form:
> 
> procedure abrirFormulario(aClasseFormulario: TComponentClass; 
> aFormulario: TForm);
> begin
>   if not Assigned(aFormulario) then
>     Application.CreateForm(aClasseFormulario, aFormulario)
>   else
>     aFormulario.BringToFront;
> end;
> 
> Assim abro os formulários, porém quero acrescentar a essa função que 
> ele abra o ClienteDataSet num ID passado por parâmetro. Tem como fazer 
> isso?
>


Responder a