OLE container and OLE SERVER

How can i maximize the server that is runing with the ole Object.

i Have these:

    with NovoDocumento Do begin
       DoVerb(PrimaryVerb);
       while(State <> osOpen) do ;
       // I need to mizimexe de server app
   end;

PLEASE email me.