Comando em String

Delphi

08/06/2004

Existe alguma maneira de converter uma String em um Comando nativo do delphi.

Exemplo:
String: ´Application.Terminate´
Comando: Application.Terminate;


[b:55b6c1e35f][i:55b6c1e35f]Um Forte Abraço,
André Ferreira.[/i:55b6c1e35f][/b:55b6c1e35f]


André Ferreira

André Ferreira

Curtidas 0

Respostas

Nildo

Nildo

08/06/2004

Olá André!
Isso era possível com o Clipper, mas no Delphi isto é impossível. Você vai ter que fazer um interpretador... por exemplo:

if LowerCase( Variavel ) = ´application.terminate´ then
   Application.Terminate


Ou então usar Script Language (Esqueci o site e também o nome do utilitário, mas o Cebikyn sabe, manda uma MP pra ele!)


GOSTEI 0
Cebikyn

Cebikyn

08/06/2004

(Esqueci o site e também o nome do utilitário, mas o Cebikyn sabe, manda uma MP pra ele!)


Nome: Pascal Script 3
Site: http://www.remobjects.com?ps
Freeware (grátis) e com código fonte


GOSTEI 0
Thaisandrade

Thaisandrade

08/06/2004

Infelizmente o Delphi não possui uma forma de fazer Macro substituição, (pelo menos eu desconheço) como faz o JavaScript (eval()), ou o java quando se usa reflexão (invoke).
Para fazer o que você está querendo, você realmente terá que fazer um teste, como já leh foi passado


GOSTEI 0
Eniorm

Eniorm

08/06/2004

estou com o mesmo problema, pois irei armazenar numa tabela com a seguinte estrutura:

procedimento
COD: 01 (integer)
MODULO: ´modulo.bpl´ (varchar)
PROC: ´AbreGradeClientes´ (varchar)
FUNCAO: ´´
ARG_ENTRADA: ´´
RESULT: ´´


funçãi
COD: 02 (integer)
MODULO: ´modulo.bpl´ (varchar)
PROC: ´´
FUNCAO: ´PesquisaGenerica´ (varchar)
ARG_ENTRADA: ´nomeTabela´ (varchar)
RESULT: Codido (integer)


qdo for função devo declarar assim
var
  func: function (parametros : tipos) : resultado
begin
...


qdo for procedimento devo declarar assim
var
  proc: procedure(parametros : tipos); //qdo haver parametros
begin
...



GOSTEI 0
Eniorm

Eniorm

08/06/2004

complemento...

o duro é declarar corretamente a variável function/procedure de acordo como está a string no banco.


GOSTEI 0
POSTAR