Acho que do jeito abaixo sai o que vc deseja…

 

[]s

 

function TDtmImportarRegistros.teste :string;
begin
   result:= 'hello';
end;

procedure TfrmImportarRegistros.Button1Click(Sender: TObject);
var
   var : string;
begin
   var := teste;
   showmessage(var);
end;



  _____  

De: Juarez Nasato [mailto:[EMAIL PROTECTED] 
Enviada em: segunda-feira, 20 de dezembro de 2004 07:58
Para: [EMAIL PROTECTED]
Assunto: [delphi-br] Chamar uma função a partir de uma variável

 

Olá a todos,

Tenho a função:

function TDtmImportarRegistros.teste():string;
begin
   result:= 'hello';
end;

e quero chamá-la a partir do conteúdo de uma variável:

procedure TfrmImportarRegistros.Button1Click(Sender: TObject);
var
   var, res : string;
begin
   var := 'teste()';
   res := pchar(var);
   showmessage(res);
end;
Tentei com pchar, mas não funcionou, alguém tem alguma dica
Obrigado,
[]s
Juarez

            
---------------------------------
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do
Yahoo! agora.

[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://br.rd.yahoo.com/SIG=12a9bre4i/M=264379.5078783.6203979.1588051/D=brc
lubs/S=2137111264:HM/EXP=1103628392/A=2191897/R=0/SIG=10vqa2grn/*http:/br.di
versao.yahoo.com/> 



 
<http://br.rd.yahoo.com/SIG=12a9bre4i/M=264379.5078783.6203979.1588051/D=brc
lubs/S=2137111264:HM/EXP=1103628392/A=2191897/R=1/SIG=10vqa2grn/*http:/br.di
versao.yahoo.com/> 

 São Paulo    Rio de Janeiro    Curitiba    Porto Alegre    Belo Horizonte
Brasília    

 

  _____  

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]
 
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