Olá pessoal!!
Gostaria de saber se alguem já passou por isso, to com um erro que é o seguinte:
Project ControleProducao.exe raised exception class EStackOverFlow with
message 'Stack overflow'.
Isso acontece quando eu dou um FreeAndNil(NomedoDataModule);
Outro detalhe é eu nao preciso fazer nada a nao ser abrir e fechar o form eu
abro os forms com class procedure aqui vai o codigo pra darem uma olhada:
class procedure TFrmCadLoja.abrir;
begin
if not Assigned(DtmCadLojas) then
DtmCadLojas := TDtmCadLojas.Create(Application);
if not Assigned(FrmCadLoja) then
FrmCadLoja := TFrmCadLoja.Create(Application);
FrmCadLoja.dsLst.DataSet := DtmCadLojas.cdsLista;
FrmCadLoja.ShowModal;
FreeAndNil(DtmCadLojas);
FreeAndNil(FrmCadLoja);
end;
Agradeço desde já, caso esteja faltando alguma informação para a analises de
vcs por favor nao exitem em pedir pois tenho certa urgencia em corrigir isso...
Pablo Vianini
WareHouse Informática
[email protected]
(32) 3372-7495
(32) 9199-8328
_________________________________________________________________
Emoticons e Winks super diferentes para o Messenger. Baixe agora, é grátis!
http://specials.br.msn.com/ilovemessenger/pacotes.aspx
[As partes desta mensagem que não continham texto foram removidas]
