Copiar Toda a tabela do DBGrid para um StringGrid

02/06/2019

0

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

Leonardo

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!

Anderson Amaral

Anderson Amaral
Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar