Como fazer isso?
16/02/2003
0
Boa noite a todos!!
Gostaria de tranformar o resultado de uma query(sql) em um array tipo
select * from socios
colocar o resultado desta busca em um array
Desde já agradeço!!!
Gostaria de tranformar o resultado de uma query(sql) em um array tipo
select * from socios
colocar o resultado desta busca em um array
Desde já agradeço!!!
Kandrus
Curtir tópico
+ 0
Responder
Posts
16/02/2003
Carnette
Trabalhe com variaves do tipo VARIANT...
use uma declaração mais ou menos assim
procedure TForm1.Button1Click(Sender: TObject);
var
v : Variant;
begin
// aquivo voce está determinando o tamanho do seu ARRAY
V := VarArrayCreate([1,QUERYTAL.RecordCount], varVariant);
QUERYTAL.First;
while not QUERYTAL.Eof do begin
V := QUERYTALNomeDoCampo.Value;
QUERYTAL.Next;
end;
end;
use uma declaração mais ou menos assim
procedure TForm1.Button1Click(Sender: TObject);
var
v : Variant;
begin
// aquivo voce está determinando o tamanho do seu ARRAY
V := VarArrayCreate([1,QUERYTAL.RecordCount], varVariant);
QUERYTAL.First;
while not QUERYTAL.Eof do begin
V := QUERYTALNomeDoCampo.Value;
QUERYTAL.Next;
end;
end;
Responder
Clique aqui para fazer login e interagir na Comunidade :)