Form e DataModule Sem Vari�vel Global de classe

Question

Form e DataModule Sem Vari�vel Global de classe, todos meus forms e dm�s est�o desta forma. Em design, no object inspector, consigo setar a propriedade DataSource dos DataControls para o DataSource qu...

Abadia · Answer

N�o h� mist�rio. Apenas o seguinte: Quando o form � criado ele l� os dados do dfm, l� ele encontra que um tal controle liga com um �DataModule.DataSource�, ent�o ele procula na lista de datamodules j� criados (os datamodules criados em runtime estar�o l� tamb�m) um que tenha o nome �DataModule� e dentro deste procura um componente chamado �DataSource� se encontrar ent�o faz a liga��o automaticamente.
Note: Este processo falha se o datamodule em quest�o ainda n�o estiver criado e a propriedade que se refere a algo nele � setada para nil.

Micheus · Answer

[quote:7fc593720e=�comodelphi�]Form e DataModule Sem Vari�vel Global de classe, todos meus forms e dm�s est�o desta forma. Em design, no object inspector, consigo setar a propriedade DataSource dos DataControls para o DataSource que est� no DM em quest�o. Pergunto em RunTime qual a refer�ncia dessa classe ser� passada para os DataControls? Pergunto isso por que em todos os forms eu tenho que configurar os DataSources em tempo de execu��o para que os DataControls funcionem[/quote:7fc593720e]� assim mesmo.Acredito que algo que poucos j� precisaram fazer foi criar mais que uma inst�ncia de um mesmo form com datasets e dgbrid nele.Quantas inst�ncias vc criar, mesmo que para v�rias vari�veis da mesma classe, ao manipular a lista (registros no grid) em uma 3� inst�ncia do form (ou seja, 3 forms iguais abertos), vc estar� manipulando o mesmo dataset em todos eles. J� tive este problema, e a solu��o foi justamente esta: ajustar os datasources em tempo de execu��o.[quote:7fc593720e]mas tenho um �nico form que n�o fa�o esse procedimento e os DataControls funcionam conforme foram configurados em Design. E eu n�o sei como isso acontece. Eu poderia me ajudar com esse mist�rio?[/quote:7fc593720e]� que o compilador/linkador sabe como resolver os endere�amentos de mem�ria j� que existe a vari�vel declarada. (mais ou menos isso)...

Comodelphi · Answer

Obrigado a explica��o dos colegas acima.

s� para ilustrar, meu sistema t� modularizado dessa forma:

  TFornecedor = class(TObject)
  private
    FForm: TfrmFornecedor;
    FData: TdmFornecedor;
  public
    constructor Create;
  end;

  constructor TFornecedor.Create;
  begin
    FForm := TfrmFornecedor.Create(nil);
    FData := TdmFornecedor.Create(nil);
  end;

Dessa forma s�o criados todos os forms, na classe fornecedor os datasources configurados em design usam o DM normalmente por�m nas demais classes eu tive colocar no form datasources adicionais e fazer o seguinte:

    FForm.dsrech. DataSet := cdsRech;
    FForm.dsrecd1.DataSet := cdsRecd1;
    FForm.dsrecd3.DataSet := cdsRecd3;

Quem tiver algo a acrescentar, por favor. Abcs.

F�rum Form e DataModule Sem Vari�vel Global de classe #349354