Estou com o seguinte código para criar formulários.
procedure Tfrmprincipal.CriaForm (teste:TFormClass; teste2:Tform);
begin
if not assigned (teste2) then
begin
Screen.Cursor := crHourGlass;
application.createForm(teste, teste2);
teste2.show;
Screen.Cursor := crDefault;
end;
end;
Ele cria o formulário tranquilo o problema é que eu tenho uma biblioteca onde eu preciso alterar algumas funções dos formulários de cadastro, só que quando eu faço referencia aos formulários criados por essa procedure eu recebo o erro de "Acess Violation".
O código que eu posso dar como exemplo que me retorna erro é o seguinte.
Question
nicolasbraz
Estou com o seguinte código para criar formulários.
Ele cria o formulário tranquilo o problema é que eu tenho uma biblioteca onde eu preciso alterar algumas funções dos formulários de cadastro, só que quando eu faço referencia aos formulários criados por essa procedure eu recebo o erro de "Acess Violation". O código que eu posso dar como exemplo que me retorna erro é o seguinte.Link to comment
Share on other sites
12 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.