Tente fazer desta forma
Procedure XXX; Var FormBaixa : TFormBaixa2; Begin FormBaixa := TFormBaixa2.Create(nil); FormBaixa.Showmodal; FormBaixa.Free; BtnSalvarClick(Self); End; []'s -----Mensagem original----- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Itabyte® Enviada em: terça-feira, 5 de junho de 2007 07:47 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Form não abre de jeito nenhum !!! Pessoal coloquei um botao no meu form para chamar outro , no codigo on click do botao coloquei o seguinte codigo : begin {codificação...} Modificar(Self) ; TFormBaixa2.Create(Application); Try FormBaixa2.ShowModal; Finally FormBaixa2.Free; end; BtnSalvarClick(Self) ; end; mais qdo clico nele para trazer o FormBaixa2 ele da a seguinte mensagem de erro : " CANNOT MAKE A VISIBLE WINDOW MODAL " O que estou fazendo de errado??? JESUS TE AMA !!! -------------------------------------------------------------------------------- MarcioCC® ************** Itabyte Tecnologia® - www.itabyte.com Analista/Programador - For Delphi MSN : [EMAIL PROTECTED] SKYPE : itabytetec Fone : 15-3524-1946 [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Links do Yahoo! Grupos
