Fórum Label que abre um form #244012

Cara, não sei se é possível criar uma propriedade do tipo TForm,
mas vamos lá:

Primeiro, explique [color=red:dce012f61e]exatamente por que não funciona[/color:dce012f61e]

Vou tentar ajudar

Olá

Eh possível sim... gneericamente é possível vc colocar uma propriedade de qq tipo...


Isso não funciona?! Dá erro? Explique-se melhor...

Espero que ajude
Até+

Aqui vai trechos do código fonte do meu componente label, o que eu quero é que ao clicar no label seja mostrado o form especificado no object inspector. Mas ainda nao estou conseguindo saber pq n dah certo. Talvez nao seja possivel realizar tal operacao!!!

[b:51c65ed859]uses [/b:51c65ed859]Forms...

[b:51c65ed859]Private[/b:51c65ed859]
FForm: TForm;
procedure SetForm(valor: TForm);

[b:51c65ed859]Protected[/b:51c65ed859]
procedure Click; override;

[b:51c65ed859]Published[/b:51c65ed859]
property yForm: TForm read FForm write SetForm;
...

[b:51c65ed859]procedure [/b:51c65ed859]TMyLabel.SetForm(valor:TForm);
begin
FForm:=valor;
end;

[b:51c65ed859]procedure[/b:51c65ed859] TMyLabel.Click;
var
formulario:TForm;
begin
formulario:= FForm.Create(Application);
formulario.Show;
end;

PORÉM, NO MOMENTO EM QUE EU COLOCO NO OBJECT INSPECTOR O NOME DO FORMULARIO, EH EXIBIDA A SEGUINTE MSG DE ERRO:
[color=red:51c65ed859][b:51c65ed859]INVALID PROPERTY VALUE[/b:51c65ed859][/color:51c65ed859]

Também tentei, mas n consegui, seria ma ótima forma de otimização de codigo!!!
:cry: