Deletar linha de um dbgrid selecionado de outro dgrid

20/08/2008

1

Estou formando uma estrutura para que quando eu clicar na na linha do DbgCarChe(Dbgrid) ele apagar
a linha do outro dbgrid(DbgCheques), os Dbgrids são iguais só que o DbgCarChe eu mostro todos os cheques
e quando eu clico duas vezes eu lanço o determinado cheque para o outro dbgrid, e a linha do cheque selecionado
do DbgCarChe fica em vermelho e quando eu clico duas vezes nela ela volta a cor normal, ai eu quero excluir
do DbgCheques, estava fazendo assim mas não deu certo, o que estou fazendo de errado.

Aluno, Cheque, Datado são variaveis que eu atribuo os valores da linha do grid pelo evento afterscroll da query que está ligada no dbgrid (dbgcarche), e TxtVal.value e um TCurrencyEdit do RxLib que tbém atribuo o valor pelo afterscroll.
if tblcheques.Fields[00].AsString = Aluno then
    if tblcheques.Fields[02].AsString = Cheque then
      if tblcheques.Fields[03].AsCurrency = TxtVal.value then
        if tblcheques.Fields[04].AsDateTime = Datado then
          begin

    if ( not tblcheques.Active ) then tblcheques.Open;
      with tblcheques do
      begin
         Delete;
         Fields[00].AsString   := Aluno;
         Fields[02].AsString   := Cheque;
         Fields[03].AsCurrency := Valor.value;
         Fields[04].AsDateTime := Datado;
         Post;
      end;
      tblcheques.Refresh;



Responder

Posts

27/08/2008

Robinhocne

uma ajudinha por favor de alguém ai ???!


Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira