então você deve passar um Owner:TComponent, como parâmetro ... assim , deve 
funcionar ...


"Louco sim, não normal.
Ser humano ... eu mesmo"

Vitor Luiz Redes
------------------------------------
Redsystem Informática
  ----- Original Message ----- 
  From: Christian Balz 
  To: [EMAIL PROTECTED] 
  Sent: Wednesday, September 29, 2004 11:50 AM
  Subject: RES: [delphi-br] Criar formulários em tempo de execução


  Vitor,



  Se eu por no form, sem problemas, a procedure ira funcionar. O problema e
  que eu gostaria de adicioná-la a unit que comentei em e-mail anterior, sendo
  que esta, não possui formulário.



  []'s

  Christian Balz



    _____  

  De: Vitor Luiz Redes [mailto:[EMAIL PROTECTED] 
  Enviada em: quarta-feira, 29 de setembro de 2004 11:16
  Para: [EMAIL PROTECTED]
  Assunto: Re: [delphi-br] Criar formulários em tempo de execução



      O Self não está mesmo declarado ...
      pelo que você passou, a procedure é independente do Objeto na qual esta
  escrita ...
      coloque a interface da procedure dentro do v (vc é quem sabe) do form,
  aperte CTRL+SHIFT+'C', e implemente a procedure dentro do que o Delphi irá
  criar ...



  "Louco sim, não normal.
  Ser humano ... eu mesmo"

  Vitor Luiz Redes
  ------------------------------------
  Redsystem Informática
    ----- Original Message ----- 
    From: Christian Balz 
    To: [EMAIL PROTECTED] 
    Sent: Wednesday, September 29, 2004 11:02 AM
    Subject: [delphi-br] Criar formulários em tempo de execução


    Ola pessoal,



    Em uma Unit em que guardo algumas funções, publiquei uma procedure onde
    passo o nome do formulário que quero criar em tempo de execução. O caso é
    que estou recebendo uma mensagem de que "self" não esta declarado. Se
  alguém
    souber me ajudar a resolver isto fico grato, 



    procedure CriaFormulario(Form: TForm);

    begin

      Form:= TForm.Create(Self);

      With Form do

           try

              ShowModal;

           finally

              Free;

              Form:=nil;

           end;

    end;



    Christian Balz









    [As partes desta mensagem que não continham texto foram removidas]



    -- 
    <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

    Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

    Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED] ou [EMAIL PROTECTED]



          Yahoo! Grupos, um serviço oferecido por: 
            


  ----------------------------------------------------------------------------
  --
    Links do Yahoo! Grupos

      a.. Para visitar o site do seu grupo na web, acesse:
      http://br.groups.yahoo.com/group/delphi-br/
        
      b.. Para sair deste grupo, envie um e-mail para:
      [EMAIL PROTECTED]
        
      c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
  Serviço do Yahoo!. 



  [As partes desta mensagem que não continham texto foram removidas]



  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]







  Yahoo! Grupos, um serviço oferecido por:


    <http://pms.mercadolibre.com/cgi/pms/ban?site=292076&id=31807> 



    _____  

  Links do Yahoo! Grupos

  *      Para visitar o site do seu grupo na web, acesse:
  http://br.groups.yahoo.com/group/delphi-br/
    
  *      Para sair deste grupo, envie um e-mail para:
  [EMAIL PROTECTED]
  <mailto:[EMAIL PROTECTED]> 
    
  *      O uso que você faz do Yahoo! Grupos está sujeito aos Termos
  <http://br.yahoo.com/info/utos.html>  do Serviço do Yahoo!. 



  [As partes desta mensagem que não continham texto foram removidas]



  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



        Yahoo! Grupos, um serviço oferecido por: 
          


------------------------------------------------------------------------------
  Links do Yahoo! Grupos

    a.. Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/
      
    b.. Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]
      
    c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 



[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 

Responder a