Como fazer isso?
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
Curtidas 0
Respostas
Carnette
16/02/2003
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;
GOSTEI 0
Kandrus
16/02/2003
Valew é por isso q esse fórum é o melhor!!!!!!!!!!
GOSTEI 0