Zeos Acces - ¿Como buscar registros?

[[Lepe]]

Estaba pensando en otras situaciones. Muy de acuerdo contigo AzidRain.

El ZDataset, imagina que son 4 Zquerys en un componente. Una para cuando quieres insertar, otra para eliminar, otra para refrescar el registro actual y por último otra Zquery para modificar los datos.

busca información sobre el SQL, un ejemplo:

Código SQL [-]
insert into Clientes (idCliente, nombreCliente) Values (:idcliente, :nombreCliente)

update Clientes set idCliente = :idCliente, nombreCliente = :nombreCliente where idcliente = :old_idcliente

delete from clientes where idcliente = :old_idcliente

// refresh:
select idCliente, nombrecliente where idcliente = :old_idcliente

//select:
select idCliente, nombrecliente where idcliente = :idcliente

doble clic a ZDataset, boton derecho y añade los campos.
Enlaza ese ZDataset con tu TZTransaction, usa un DBNavigator y unos edits enlazados a los campos de este ZDAtaset. Listo, ya puedes insertar, borrar, modificar y refrescar desde la tabla. Lo que has ganado, es que solo viajará 1 registro por la red (el que quieres modificar).

Edito: usar la etiqueta noparse para las caritas dentro del código sql

Saludos

[[AzidRain]]

Fijate que yo me encontré sin querer una chapuza:

"select * from clientes where numcliente is null"

Obviamente me devuelve un set vacio, pero que crees, si haces un insert, efectivamente agregas un registro a la tabla.

Respondiendo a nuestro amigo: ZTable es un ZQuery Modificado, la diferencia es que ZTable siempre hace un select * from...o sea se trae todos los registros de la tabla sin importar su número...En cambio en ZQuery, puedes modificar su propiedad SQL para que contenga el select que necesites (puedes ser un insert o un delete), aqui es donde radica su potencia.

Se usa de forma idéntica a cualquier otra tabla y tiene casi los mismos métodos que ZTable.

Código Delphi [-]
Procedure demoQuery;
 var MiQuery:TZQuery;
Begin
  MiQuery := TZQuery.Create(nil);
  Try
    MiQuery.Connection := LaConexion; //Asumimos que ya tienes el componente  TZConnection debidamente configurado y creado
    MiQuery.SQL.Add('select * from clientes'); 
    MiQuery.Open;
     //---
     // Hacer algo con los datos devueltos
    // 
  Finally
    MiQuery.Close;
  end; 
end;

Obviamente la propiedad SQL normalmente contendrá cosas mas complicadas que un select *.

[Jose Roman]

Gracias por tu ayuda, para futuro y refencia de otros segun Embacadero genera un error si se cierra el Query, como debe quedar y que a mi me funciono segun el foro es:

Código SQL [-]
  qTpPd.DisableControls;
  BM := qTpPd.GetBookmark;
  qTpPd.Refresh;
  qTpPd.Bookmark := BM;
  qTpPd.EnableControls;

[Casimiro Noteví]

Está bien recordárselo 11 años después