Copiar Toda a tabela do DBGrid para um StringGrid

02/06/2019

11

Boa Noite como o titulo já diz eu preciso copiar os valores que estão no DBgrid para um stringgrid, eu uso Zeos,
Responder

Post mais votado

03/06/2019

Boa Noite como o titulo já diz eu preciso copiar os valores que estão no DBgrid para um stringgrid, eu uso Zeos,


Bom dia Leonardo, pelo que entendi da pergunta, talvez seja algo conforme exemplo abaixo:

var
i, ii : Integer;
begin
QryDadosDBgrid.Open; //dataset onde estão os dados exibidos na DbGrid;
while not(QryDadosDBgrid.Eof) do
begin
for i:= 1 to StringGrid1.RowCount do
begin
for ii:= 1 to StringGrid1.ColCount do
begin
StringGrid1.Cells[ii,i] := AQryServicosEmOS.Fieldbyname('NOMEDOCAMPODESEJADO').AsString;
end;
end;
QryDadosDBgrid.Next;
end;
end;

end;

Espero que contribua, abraços!
Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários. Para saber mais sobre o uso de cookies,
consulte nossa política de privacidade. Ao continuar navegando em nosso site, você concorda com a nossa política.

Aceitar