0

Temos as seguintes opções:

Application.CreateForm(TForm, Form);

e

Form := TForm.Create(Application);

Existe diferença entre as duas?

Sei que existe porque dependendo de onde chamamos cada uma delas a variavel “Form” não estará disponivel para outros formularios

Qual exatamente a diferença se Application é proprietaria?

3
  • Pelo que sei não existe diferença, é simplesmente métodos de construção diferente. Sobre não estará disponível para outros formulários pode explicar melhor essa parte? 9/02/2018 às 10:12
  • Mesmo após pesquisas e colocar a pergunta aqui insisti na resposta e realmente tem diferença, Application.CreateForm Cria uma variável global desta forma o formulário é visto em qualquer parte da aplicação, já o TForm.Create cria uma variável dentro do formulário onde foi instanciada não estando portanto disponível em outras instancias gerando a falsa impressão de que esta disponível em outro formulário, eu vou responder essa pergunta e tentar detalhar como funciona.
    – Marcelo
    9/02/2018 às 11:42
  • Lendo sua resposta entendi sua pergunta, a parte na pergunta: não estará disponível para outros formulários não ficou tão clara! Faz uma edição na pergunta e melhora essa parte onde esta a duvida. +1 pela Resposta. 9/02/2018 às 15:11

2 Respostas 2

2

Colocando a diferença entre os métodos de construção de Formulários no Delphi

1 - Application.CreateForm(TForm, Form);

Cria uma variável de escopo global podendo ser instanciada em qualquer outro Formulário, claro com a prévia adição da Unit no Formulário em que se deseja usa-la, exemplo a grosso modo:

Application.CreateForm(TFormCliente, FormCliente);
  Application.CreateForm(TFormDetalhes, FormDetalhes);
    Application.CreateForm(TFormSubDetalhes, FormSubDetalhes);
    FormDetalhes.SubShowModal;

       ... rotina ...
       Aqui estará disponpivel o formulário FormCliente e FormDetalhes
       ... Aguarda FormSubDetalhes ser fechado para continuar

  FormDetalhes.ShowModal;

    Idem

FormCliente.ShowModal;

Neste caso o formulário FormCliente estaria disponivel nos outros dois criados posteriormente ( desde que adicionada a unit FormCliente em USES )

2 - Form := TForm.Create(Application);

Mesmo dizendo que o dono é Application ele não estará disponível em uma chamada de um formulário ShowModal posterior a ele, exemplo a grosso modo:

FormCliente := TFormCliente.Create(Application);
  FormDetalhes := TFormDetalhes.Create(Application);
    FormSubDetalhes := TFormSubDetalhes.Create(Application);
    FormDetalhes.SubShowModal;

       ... rotina ...
       Aqui não estará disponpivel o formulário FormCliente nem FormDetalhes
       ... Aguarda FormSubDetalhes ser fechado para continuar

  FormDetalhes.ShowModal;

    Idem

FormCliente.ShowModal;

Form := TForm.Create(Application); Cria uma variável local, por isso ao tentar usar o formulário em outras units dará o erro AccessViolation, pois o formulário (variável) não foi criado globalmente

Uma outra forma de entender:

Dentro de uma função podemos criar variáveis que serão de uso exclusivo daquela função, exemplo 1

function fTeste(): Integer;
var vlocal: Integer;
begin
  result := vlocal+1;
end;

Se tentar usar a variável vlocal fora da função terá um erro, pois a variável não foi criada globalmente.

Exemplo 2:

public // Declarando a variável para ser publica (global)
  vpublica: Integer;

function fTeste(): Integer;
begin
  result := vpublica+1;
end;

No exemplo 2 a variável vpublica estará disponível em qualquer parte do formulário atual e de qualquer formulário que deseje usar essa unit

Resumo descritivo:

Eu confundia a criação do Formulário com a criação da Variável Form, explico, quando se está criando o formulário podemos dizer quem é o dono do formulário, se a aplicação ou outros, isso é preciso saber para o momento de destruição da aplicação, para a liberação correta da memória, já a criação da variável se será global ou local, lhe dará poder para usa-la localmente ou globalmente, eu achava que quando colocássemos "Application" o formulário criado estaria disponível em toda e qualquer parte da aplicação.

Espero ter sido claro.

3
  • O Owner do form e a sua visibilidade sao coisas completamente diferentes... acho que está a misturar. Se eu tiver no arranque da app Application.CreateForm(TForm3, Form3); Form5:=TForm5.Create(application); Tanto o form3 como o form5 sao publicos e acessiveis de qualquer lado. posso chamar o form5 no form3 à vontade... 9/02/2018 às 21:35
  • O exemplo aqui são para forms criados em tempo de execução.
    – Marcelo
    10/02/2018 às 20:41
  • Então Tiago, se eu criar os formularios lá no arranque da aplicação concordo contigo, serão variaveis globais, não importa como crie, mas meu exemplo mostra a criação em tempo de execução depois da chamada de uma tela por exemplo.
    – Marcelo
    10/02/2018 às 20:58
2

A diferença é que com Application.CreateForm o formulário criado será o "MainForm" (formulário principal) se ainda não estiver definido. Não há outras diferenças com relação à visibilidade ou utilização do formulário.

11
  • Então Ricardo, não sei se não estou compreendendo bem o caso da criação, mas na pratica usando ShowModal, não funciona assim, se criar um formulario antes com Form := TForm.Create não tera a variavel Form disponivel dentro do Form Modal criado depois, então pelo menos na pratica faz diferença, como expliquei eu confundia o dono do formulario com a variavel que recebe o objeto form.
    – Marcelo
    10/02/2018 às 20:55
  • Marcelo, é apenas uma questão de declarar uma variável com o escopo adequado. Se houver uma variável visível não haverá diferença no ShowModal. 11/02/2018 às 22:29
  • Se você colocar a unit do form na cláusula uses e a variável estiver declarada na sessão interface (do mesmo form), será visível globalmente. 11/02/2018 às 22:36
  • Eu gostaria de ter um exemplo funcional dessa questão, pois sei que muitos, mas muitos programadores apanham nessa questão, a principio não vejo diferença entre criar Application.Create e Form := TForm.Create, acontece que há uma diferença concreta, pois mesmo fazendo as devidas referencias nas Units o formulario criado com a segunda opção pode não estar disponivel no Form Modal aberto, não sei se o Stack permite link pra download, eu poderia fazer um exemplo simples e colocar a disposição para explicar melhor o que estou dizendo.
    – Marcelo
    14/02/2018 às 13:17
  • Se você disponibilizar o link eu farei o download para podermos analisar melhor. 14/02/2018 às 23:16

Você deve fazer log-in para responder a esta pergunta.

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .