Abrir formulario solo una vez

[morfeo21]

Hola, que tal?

Mi problema es el siguiente:


Tengo un formulario MDI Parent y un formulario MDI Children. Al hacer clic en el boton para abrir el formulario children me lo abre como tantas veces haga clic en el boton sin importar si el form ya esta abierto o no. Como puedo solucionar esto?. gracias de Antemano



el codigo que utilizo es el siguiente:
en el formulario

Código Delphi [-]
procedure XOrdenCompra001(Owner:TComponent);
 Begin
  FrmOrdenCompra001:=TFrmOrdenCompra001.Create(Owner);
  FrmOrdenCompra001.Show;
End;

cuando lo llamo

Código Delphi [-]
   XOrdenCompra001 (Self)

AÑADIDO (Neftalí): Utiliza etiquetas cuando coloque código Delphi.