DBGrid selction row

Question

www.hanimecenter.kit.net/agenda.jpgAe eu ja consegui fazer quase tudo que precisava nessa tela, mas agora eu to querendo fazer com que a altera��o seja feita em uma nova tela e os dados a serem altera...

Fred · Answer

Veja este exemplo: com ClientDataSet acho que deve funcionar com outros componentes como table..n�o sei

for i := 0 to dbGrd_lista_acessorios.SelectedRows.Count-1 do
begin
dm.cds_Lista_Acessorios.GotoBookmark(pointer(dbGrd_lista_acessorios.SelectedRows[i]));//esta linha pega o selecionado e joga no cds
cds_Acessorios_Veic.Append;
cds_Acessorios_VeicCOD_ACESSORIO.AsInteger := dm.cds_Lista_AcessoriosCOD_ACESSORIO.AsInteger;
cds_Acessorios_VeicCOD_VEICULO_ATUAL.AsInteger := CdsCOD_VEICULO_ATUAL.AsInteger;
cds_Acessorios_Veic.Post;
end;
cds_Acessorios_Veic.ApplyUpdates(0);

Bigtama · Answer

[quote:30238d6c52=�Fred�]Veja este exemplo: com ClientDataSet acho que deve funcionar com outros componentes como table..n�o seifor i := 0 to dbGrd_lista_acessorios.SelectedRows.Count-1 do         begin            dm.cds_Lista_Acessorios.GotoBookmark(pointer(dbGrd_lista_acessorios.SelectedRows));//esta linha pega o selecionado e joga no cds            cds_Acessorios_Veic.Append;            cds_Acessorios_VeicCOD_ACESSORIO.AsInteger := dm.cds_Lista_AcessoriosCOD_ACESSORIO.AsInteger;            cds_Acessorios_VeicCOD_VEICULO_ATUAL.AsInteger := CdsCOD_VEICULO_ATUAL.AsInteger;            cds_Acessorios_Veic.Post;         end;         cds_Acessorios_Veic.ApplyUpdates(0);[/quote:30238d6c52]Ae o k � os cds_Acessorios_Veic , dm , dbGrd_lista_acessorios ???...

Fred · Answer

ClientDataSet1.GotoBookmark(pointer(DBGrid1.SelectedRows));Sac�!! 8)...

F�rum DBGrid selction row #181547