Fórum Como Apresentar um MDIChild #167335

Pessoal, estou com o seguinte nó. Através do forum descubri uma forma de saber se o form MDIChild na seguinte forma:

function TFoPrincipal.VerForm(Formulario: String): Bool;
var
i: integer;
begin
Result := False;
for i:= 0 to Screen.FormCount-1 do
if Screen.Forms[i:e5dc376cd6].Name = Formulario then
Result := True;
end;

Eu faço a chamada na seguinte forma:

If Not VerForm(´Formulario´) then
Formulario:=TFormulario.Create(Self);

Formulario.Show;

Só que quando o form da está criado e eu tendo da o SHOW no formulario dá o seguinte erro:
´[i]Access violation at address 0047984A in module PROGRAMA.EXE. Read of address 000002F4[/i:e5dc376cd6].´

Grato se me ajudarem,

Everson Paulo - :oops:
everson-paulo@ig.com.br
eversonpaulo@ibest.com.br