Erro ao abrir formul�rio.

Question

Gostaria de saber pq eventualmente ocorre o erro �A call to an OS function failed. System error 87� quando abro algum formulario no sistema em execu��o.Obrigado a quem puder ajudar....

Poeta Noturno · Answer

Qual o tipo de chamada que vc faz a esse formul�rio??...

Anonymous · Answer

Abro o formulario dessa forma e eventualmente ocorre �A call to an OS function failed�. O que acontece?

If FormExiste(�FrmChqAvu�) Then
Begin
FrmChqAvu.Show;
End
Else
Begin
FrmChqAvu := TFrmChqAvu.Create(Self);
With FrmChqAvu Do
Begin
Icon := MdiMenu.Icon;
Left := 0;
Top := 0;
End;
End;

Poeta Noturno · Answer

olha, voc� est� usando uma fun��o que p�e o nome do formul�rio como uma string, quando vc deveria usar um par�metro TObject para isso, desta forma:

function FormExiste(Formulario: TObject): boolean

E ao chamar a fun��o, colocar o nome do formul�rio sem as aspas, ou sen�o pode usar desta forma:

if formul�rio <> nil then
formul�rio.show
else
formul�rio := Tformul�rio.Create(Application);
[o que voc� quiser fazer];
formul�rio.show;

Espero ter te ajudado.

Um abra�o

Poeta Noturno

F�rum Erro ao abrir formul�rio. #144407