Array
(
)

application.CreateForm() porque o delphi permite isso

Marco Salles
   - 07 abr 2006

Funciona , não é aconselhável , é errado (Ou pelo menos acho que sim)
mas me intriga.. O delphi não deveria aceitar

#Código

var
mybotao:button;
begin
application.CreateForm(TButton,myBotao);
myBotao.Parent:=Self;
end;


pórque que estou questionando isso.. Afinal quem ja tentou criar um botão assim ??? meia duzia de gato pingado talvez :!: :!:

Mas e assim

#Código
application.createform(TQuickReport2,QuickReport2);
QuickReport2.Preview;


Desse jeito , ja vi muitas vezes aqui no site.. Mas se voce observar a definição de TQuickReport2
type
TQuickReport2 = class(TQuickRep)

Criar relatorios no QuickReport , desta maneira o numero de gatos pingados aumenta consideravelmente.. Ja não é nen mais gatos pingatos mas sim gatos amontoados..

Na minha concepção O correto deveria ser assim

try
QuickReport2:=tQuickReport2.Create(nil);
QuickReport2.Preview;
finally
FreeandNil(QuickReport2);
end;

com alguns ajustes .. talves um assigned para evitar que novas instancias do QuickReport sejam criadas... Emfim isto é a gosto.

O que quero mexer aqui é sobre a forma de criar esse quickReport..

Tem lógica isso???

application.createform(TQuickReport2,QuickReport2);

eu acho que não...

Por falar em criação de componentes e formulários o michel publicou um artigo muito simples mas muito direto sobre esse assunto na edição 72 da revista.. eu digo simples não é no sentido menor , mas no sentido de entendimento.. Ate meu menino de 9 anos se le entendi

Espero opiniões..