Fórum Problemas com bpl #340583

18/04/2007

0

Pessoal, to cm um problema na hora de criar a instancia do meu Form que esta dentro de um pacote. O erro acontece na parte em negrito.
Eu lembri q tinha que fazer uma configuracao no Delphi ou no Pacote pra carregar legal, se alguem souber o que pode ser... Obrigado!

NomePacote := ´Pkg´ + Copy(Package, 4, Length(Package)) + ´.bpl´;

HandlePack := LoadPackage(AmbienteMRP.DirBpl+´\´+NomePacote);

if HandlePack > 0 then
begin
FormClass := TFormClass(GetClass(´Tfrm´+Copy(Package, 4, Length(Package))));
HClass := TCustomFormClass(GetClass(´Tfrm´+Copy(Package, 4, Length(Package))));
// GetModuleHandle(FormClass);

if (Assigned(FormClass) or Assigned(HClass))then
begin
[b:a391bf2ef7]FormDrag := FormClass.Create(Application);[/b:a391bf2ef7]
try
// inicializa os dados
FormDrag.Show;
finally
end;
end
else
ShowMessage(ClasseNotFound);
end
else ShowMessage(ModuleNotFound);


Curynga

Curynga

Responder

Posts

18/04/2007

Massuda

Aparentemente não está conseguindo criar o form. Dá alguma mensagem de erro?


Responder

Gostei + 0

18/04/2007

Curynga

Dá um Access Violation e nao passa disso!
O problema tá ai tb, o erro nao ajuda em nada! :cry:


Responder

Gostei + 0

25/04/2007

Juliomar_m

boa tarde..
uma pergunta por acaso no pacote não esta esquecendo de initialization da classe do form???
se não for avisa pra ver outras possibilidades...

valeu...


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar