A class named TfrxDMPPage already exists.

Question

Bom dia,quando eu rodo o meu sistema (XE2), ao abrir o modulo de vendas aparece o seguinte erro:A class named TfrxDMPPage already exists.como posso resolver isso?...

Marco Salles · Answer

com vc esta criando este forms ???...

Ricardo Lima · Answer

n� verdade era um pacote e quando eu utilizo o form pelo pacote funciona, quando eu o chamo na aplica��o finalizada da essa mensagem...

Marco Salles · Answer

mas como vc esta chamando ? De mais detalhes ? Vc tem .pas deste Bpl ? Como � feito a instancia��o e a destrui��o
deste form neste pacote? � showmodal � Show ? Algo no Close : Action:=Cafree ?

[]sds

Ricardo Lima · Answer

a chamada acontece assim: (existe um vendas.pas e um vendas.bpl)
VAR
H: HMODULE;
Pform: TFormClass;
form: TForm;
begin // local do pacote atualmente e o mesmo da aplica��o, DEVOMOS MUDAR APRA SYSTEM32
if FileExists('vendas.bpl') then
begin
H := LoadPackage('vendas.bpl');
if H > 0 then
begin
Pform := TFormClass(GetClass('TFrmVenda'));
if Assigned(Pform) then
begin
form := Pform.Create(nil);
form.ShowModal;
FreeAndNil(form);
UnloadPackage(H);
end
else
ShowMessage('Erro ao carregar a Classe');
end
else
ShowMessage('Erro ao carregar o pacote');
end
else
begin
MessageDlg('Para utilizar este modulo e necessario aquisi��o, ' + #13 +
' Entre em contato com a CPD SOLU��ES EM INFORM�TICA'
+ #13 +'TELEFONES 8510-2618 OU 3375-3089' , mtWarning, [mbOK], 0);
end;

end;

Marco Salles · Answer

Boa noiteN�o estou vc dizer que chama a aplica��o finalizada e quando  utilizo o form pelo pacote funciona???o que vc quer dizer com isto ???...

Ricardo Lima · Answer

No project manager, eu tenho a aplica��o principal, vendas.exe, vendas.bpl.
quando eu utilizo o vendas.exe, tudo funciona perfeitamente. Ent�o eu coloco o bpl que foi gerado no endere�o descrito no codigo, ent�o aciono a aplica��o principal e acontece o erro ao finalizar a venda
A tela de venda abre, escolho o produto/qtd, quando clico em finalizar a venda para escolher o cliente acontece o erro.

Marco Salles · Answer

Desculpe , eu n�o estou conseguindo visualizar o processo para opinar . Pediria que os amigos do forum opinassem comoutras ideias para abrir o leque de op��es e chegar ao MDC...

Ricardo Lima · Answer

Eu exclui o pacote e comecei a trabalhar sem pacotes...
est� funcionando perfeitamente, vou tentar recriar outro pacote e adicionar o form para ver se volta ao normal...

Obrigado pela tentativa de ajuda

Marco Salles · Answer

No eu entendimento o que esta ocorrendo � a instancia��o de uma classe com o mesmo nome ( isto parece �bvio pelo teor)
da exce��o levantada , so n�o � �bvio o porque que isto ocorre... H� muitas coisa envolvidas , por exemplo se
este dataModulo esta na sec��o AvalaibleForms ou CreateForms , se vc esta utilizando uma instancia��o utilizando a
a vari�vel Global Var do DataModulo

eu sugiro fazer um teste criando na M�o este dataModulo, , sem utilizar a vari�vel Global

var
SeuDataModule: TfrxDMPPage;

[]sds

Ricardo Lima · Answer

O meu datamod... est� na  CreateForms. seguirei suas instru��es e postarei aqui para informar se resolveu...

Marco Salles · Answer

Blz tente se possivel n�o utilizar a vari�vel Global Var...

Jos� · Answer

Ol� Ricardo, poderia sinalizar se essa sua duvida j� foi solucionada ?...

Ricardo Lima · Answer

EU MODIFIQUEI A ORDEM DE CRIA��O DO MEUS FORMULARIO, ESTAVA CRIANDO O DATAMODULE PRIMEIRO E DEPOIS O FORMULARIO PRINCIPAL.MUDEI ESSA ORDEM E FUNCIONOUOBRIGADO A TODOS...

Jos� · Answer

Valeu amigo Ricardo, sendo assim estou concluindo o t�pico. ...

F�rum A class named TfrxDMPPage already exists. #446737