passando valor de variavel e retornando com o resultado...

Delphi

17/10/2005

Gostaria de criar uma procedura ou function com envio e retorno de variável.

Seria mais ou menos assim:


tenho uma primeira função onde passo o parametro, exemplo:


function teste1(qry: TQuery):Boolean


agora tenho em sequência uma segunda função onde teria que pegar a variável da primeira função.


function teste2: Boolean;
qry.open;


Como fazer isso na prática.


Thiagopedro

Thiagopedro

Curtidas 0

Respostas

Marcio.theis

Marcio.theis

17/10/2005

Uma das coisas que vc pode fazer é o seguinte:

Na function teste1(qry: TQuery):Boolean declare ela da seguinte forma:
function teste1(var qry: TQuery): Boolean;
e a outra:
function teste2(qry: TQuery): Boolean;
desta forma vc coneguira ter a qry do teste1 na teste 2....


GOSTEI 0
Thiagopedro

Thiagopedro

17/10/2005

[quote:c2968d065c=´/]/]@t´]Uma das coisas que vc pode fazer é o seguinte:

Na function teste1(qry: TQuery):Boolean declare ela da seguinte forma:
function teste1(var qry: TQuery): Boolean;
e a outra:
function teste2(qry: TQuery): Boolean;
desta forma vc coneguira ter a qry do teste1 na teste 2....[/quote:c2968d065c]

Então em uma mesma unit por criar desta forma function´s separadas e referenciar as mesmas pela variável como foi feita acima ?


GOSTEI 0
POSTAR