ActiveDelphi

[rcamoleze2]

Pessoa boa tarde.. preciso de uma mãosinha se alguém já fez.

em aplicação desenvolvida bem no passado utilizando delphi 7, eu tinha um formulário com o FormStyle = fsNormal
Pelo menu principal eu chamava ele da seguinte forma:

if FrmPeriodo = nil then
FrmPeriodo := TFrmPeriodo.Create (application);
FrmPeriodo.Caption :='Transferências de Saída';
FrmPeriodo.Tag := 1;
FrmPeriodo.ShowModal;

Neste exemplo eu passava um valor para a propriedade TAG do formulario, assim eu usava a mesma tela para várias rotinas semelhantes que mudavam apenas um parâmetro.

Agora estou com o Delphi 10.2 e estou tentando reproduzir a mesma regra (ja tentei como sendo um MDIChield, fsNormal), porém em tempo de execução não passa o valor da tag do formulário.
Já tentei criar uma variável passando da seguinte forma:
if FrmCad = nil then
FrmCad := TFrmCad.Create (application);
FrmCad.Tag := 2;
FrmCad.iTAG := 2;
FrmCad.Show;

Porém ao abrir o FrmCad tanto a variavel quando a propriedade do form não receberam o valor.
Estou tentando isso pois o mesmo form será utilizado em várias telas como sendo um form se busca, mudando somente um parâmetro da busca, ai não queria ter que fazer vários forms

Att.
Robison.