[UREÑA]

hola amigos buen dia

con la novedad!!!

por fin ya pude eliminar

Código SQL [-]
   //ELIMINA REGISTROS
  if frm_DataModule.qry_usuarios.RecordCount > 0 then
begin
    try
     frm_DataModule.trans_commit.StartTransaction;
     frm_DataModule.qry_usuarios_upd.Close;
     frm_DataModule.qry_usuarios_upd.SQL.Clear;
     //ShowMessage(frm_DataModule.qry_usuarios.fieldbyname('NOMBRE').AsString);
     frm_DataModule.qry_usuarios_upd.SQL.Add('DELETE FROM USUARIOS where NOMBRE ='+QuotedStr(frm_DataModule.qry_usuarios.fieldbyname('NOMBRE').AsString));
     frm_DataModule.qry_usuarios_upd.SQL.Text;
     frm_DataModule.qry_usuarios_upd.ExecSQL;
     frm_DataModule.trans_commit.Commit;
   Except
     frm_DataModule.trans_commit.Rollback;
     end;
     frm_DataModule.qry_usuarios.Close;
     frm_DataModule.qry_usuarios.Open;
end
else
ShowMessage('No hay nada para eliminar');

gracias a todos!! solo me falta validar

me esta gustando mucho esto de delphi