Ajuda para criar componente

Question

Boa tarde... estou criando um componente e tudo esta funcionando, ele � criado quando eu clico no botao sem problema nenhum...mas eu gostaria que ele fosse criado antes mesmo do form ser inicializado,...

Giordanocwb · Answer

Coloque, por favor, a parte de c�digo da cria��o do componente para que a gente possa analisar!T+...

Jonn · Answer

[code:1:c766b05e46]procedure TBarraGrafico.Componentes(Owen:TComponent);var Icon:TIcon;begin  FEditorChart:=TChartEditor.Create(FEditorChart);  ListaDeImagem:=TImageList.Create(ListaDeImagem);  Icon:=TIcon.Create;  Icon.LoadFromFile(�C:Documents and SettingsuserDesktopTrabalhos - DelphiBarraGraficoIcone.ico�);  ListaDeImagem.AddIcon(Icon);  Self.Images:=ListaDeImagem;  Self.ShowCaptions:=false;  FGerenciadorAcao:=TActionManager.Create(FGerenciadorAcao);  FGerenciadorAcao.Images:=ListaDeImagem;  AcaoEdit:=TAction.Create(AcaoEdit);  AcaoEdit.OnExecute:=EditGrafico;  AcaoEdit.ImageIndex:=0;  AcaoEdit.Caption:=�Teste�;  FGerenciadorAcao.AddAction(AcaoEdit,nil,true);  FBotaoExemplo:=TToolButton.Create(FBotaoExemplo);  FBotaoExemplo.Style:=tbsButton;  FBotaoExemplo.Action:=AcaoEdit;  FBotaoExemplo.Width:=25;  FBotaoExemplo.Height:=25;  FBotaoExemplo.Parent:=Self;end;[/code:1:c766b05e46]esse � o codigo q cria o componente depois q clico no botao e funciona perfeitamente[code:1:c766b05e46]  Application.Initialize;  Application.CreateForm(TForm1, Form1);  Application.Run;[/code:1:c766b05e46]e esse � o codigo q inicia a aplicacao e q chama o evento create, mas da erro...faloo valeu!!...

Giordanocwb · Answer

Veja bem, o Self � um par�metro impl�cito que temos nas procedures ou functions de uma classe. Ele representa a inst�ncia do objeto que estamos tentando referenciar.

No seu caso, naquela linha Self, ele est� tentando acessar um objeto do tipo TBarraGrafico.

Verique se isso procede ok!!!

Self, nem sempre � o formul�rio!!! Imagino que voc� esteja se confundindo com isso.

T+

Jonn · Answer

Exatamente o self ta se referenciando ao TBarraGrafico, mas o problema � q ele ainda nao foi criado e dai ele da aparesenta um erro sempre que chega no self...

o que eu gostaria de saber � se tem uma forma de fazer referencia ao componente antes mesmo dele se criado, ou entao, cria-lo antes para nao dar erro com o self...

falo valeu!!!

Giordanocwb · Answer

Seguinte, se ele n�o foi criado ainda, ele n�o pode chamar Self.

Como que voc� chama a procedure Componentes do TBarraGrafico?? Para fazer a chamada a ela voc� tem que ter o objeto criado, concorda comigo??

T+

Jonn · Answer

Certo... eu fa�o a chamada da procedure Componentes pela function create do proprio componente...mas entao nao tem como criar um componente ao mesmo tempo q � criado a aplicacao??...

F�rum Ajuda para criar componente #350459