Pessoal
Achei a solução...
{ Mostra a tela de Configuração }
procedure TConfigbanco.MostraTelaConfiguracao;
begin
if FrmConfiguraBanco = nil then
begin
Application.CreateForm( TFrmConfiguraBanco , FrmConfiguraBanco );
FrmConfiguraBanco.ShowModal ;
end
else
FrmConfiguraBanco.ShowModal ;
end;
vlw...
Wesley
From: BandaLemuel
Sent: Monday, September 29, 2008 2:53 PM
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Componente
Lista
Estou criando um componente que vai ser responsavel por configurar o banco de
dados do Cliente atraves de um arquivo ini, e neste componente quero colocar um
formulario para a configuração , caso não consiga conexão... e esta dando erro
quando ele vai puxar o formulario responsável pela configuração segue o codigo
que chama o formulario....
{ Mostra a tela de Configuração }
procedure TConfigbanco.MostraTelaConfiguracao;
var
Tela : TFrmConfiguraBanco ;
begin
if Tela = nil then
begin
Tela := TFrmConfiguraBanco.Create( nil );
Tela.ShowModal ;
end
else
Tela.ShowModal;
end;
O TFrmConfiguraBanco é um formulakrio que criei no componente, como devo
chama-lo é assim mesmo ???
Obrigado...
Wesley
[As partes desta mensagem que não continham texto foram removidas]
__________ Information from ESET NOD32 Antivirus, version of virus signature
database 3480 (20080929) __________
The message was checked by ESET NOD32 Antivirus.
http://www.eset.com
[As partes desta mensagem que não continham texto foram removidas]
