Fórum Retornar mais de um valor na mesma função #334730
14/12/2006
0
Pessoal
Existe uma forma de retornar mais de um valor na mesma função ??
Estou fazendo assim:
if iRet = 0 then result := ´´
else
begin
result := SqlBuscaCad.FieldByName(´NOM_CID´).AsString;
result := SqlBuscaCad.FieldByName(´NOM_EST´).AsString;
result := SqlBuscaCad.FieldByName(´NOM_REG´).AsString;
end;
Quero retornar esses tres valores mas estou um fazendo um em cada linha, mas tem como retornar todos fazendo somente com um result ??
Aguardo retorno
Rogério
Existe uma forma de retornar mais de um valor na mesma função ??
Estou fazendo assim:
if iRet = 0 then result := ´´
else
begin
result := SqlBuscaCad.FieldByName(´NOM_CID´).AsString;
result := SqlBuscaCad.FieldByName(´NOM_EST´).AsString;
result := SqlBuscaCad.FieldByName(´NOM_REG´).AsString;
end;
Quero retornar esses tres valores mas estou um fazendo um em cada linha, mas tem como retornar todos fazendo somente com um result ??
Aguardo retorno
Rogério
Rogeranalista
Curtir tópico
+ 0
Responder
Posts
14/12/2006
Macario
Ola.
Faça um array para o retorno da função.
[]´s
Faça um array para o retorno da função.
type
TMeuArray : Array[1..3] of string;
{....}
function MinhaFunction : TMeuArray;
begin
{...}
end;[]´s
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)