descobri
foi so tirar o: Application.MainFormOnTaskbar := True; 2009/5/18 felipe govoni <govoni.fel...@gmail.com> > agradeço mas nao resolveu, continua a mesa coisa. > > > > > 2009/5/18 EmbarcaDelphi <embarcadel...@yahoo.com.br> > > >> >> begin >> frmSplash := TfrmSplash.Create(Nil); >> frmSplash.Show; >> Application.Initialize; >> >> Application.CreateForm(TfrmPrincipal, frmPrincipal); >> >> Application.CreateForm(TDMGeral, DMGeral); >> Application.CreateForm(TfrmM_Prima, frmM_Prima); >> Application.CreateForm(TfrmProdutos, frmProdutos); >> Application.CreateForm(TfrmCompras, frmCompras); >> Application.CreateForm(TfrmConsultas, frmConsultas); >> Application.CreateForm(TfrmEntrada_produtos, frmEntrada_produtos); >> Application.CreateForm(TfrmSaida_M_Prima, frmSaida_M_Prima); >> Application.CreateForm(TfrmFicha_tecnica, frmFicha_tecnica); >> Application.CreateForm(TfrmVendas, frmVendas); >> Application.CreateForm(TfrmClientes, frmClientes); >> frmSplash.Free; >> Application.Run; >> end. >> >> felipe govoni escreveu: >> >> > >> > >> > bom dia >> > >> > criei uma splash screeen para meu sistema, ta funcionando porem na >> > barra de tarefas do windows aparece como se estivesse 2 sistemas >> abertos. >> > >> > to utilizando esse codigo: >> > >> > begin >> > frmSplash := TfrmSplash.Create(Application) ; >> > frmSplash.Show; >> > Application.Initialize; >> > frmSplash.Update; >> > Application.MainFormOnTaskbar := True; >> > Application.CreateForm(TfrmPrincipal, frmPrincipal); >> > Application.CreateForm(TDMGeral, DMGeral); >> > Application.CreateForm(TfrmM_Prima, frmM_Prima); >> > Application.CreateForm(TfrmProdutos, frmProdutos); >> > Application.CreateForm(TfrmCompras, frmCompras); >> > Application.CreateForm(TfrmConsultas, frmConsultas); >> > Application.CreateForm(TfrmEntrada_produtos, frmEntrada_produtos); >> > Application.CreateForm(TfrmSaida_M_Prima, frmSaida_M_Prima); >> > Application.CreateForm(TfrmFicha_tecnica, frmFicha_tecnica); >> > Application.CreateForm(TfrmVendas, frmVendas); >> > Application.CreateForm(TfrmClientes, frmClientes); >> > frmSplash.Hide; >> > frmSplash.Free; >> > Application.Run; >> > >> > end. >> > >> > oq estou fazendo errado? >> > >> > -- >> > Felipe Govoni >> > --------------------- >> > GOVONI Sistemas >> > Fone 8472-8718 >> > www.govoni.com.br >> > >> > [As partes desta mensagem que não continham texto foram removidas] >> > >> > >> >> >> > > > > -- > Felipe Govoni > --------------------- > GOVONI Sistemas > Fone 8472-8718 > www.govoni.com.br > -- Felipe Govoni --------------------- GOVONI Sistemas Fone 8472-8718 www.govoni.com.br [As partes desta mensagem que não continham texto foram removidas]