Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

 
 
Herramientas Buscar en Tema Desplegado
  #4  
Antiguo 14-04-2005
Avatar de lucasarts_18
lucasarts_18 lucasarts_18 is offline
Miembro
 
Registrado: mar 2005
Ubicación: Villa Alemana,Chile
Posts: 1.087
Poder: 23
lucasarts_18 Va por buen camino
Hola Krina:

Cómo te habrás dado cuenta en el mensaje que te envié, yo tampoco me manejo mucho con este componente.
Pero veré si te sirve lo que yo he hecho (un ejemplo sencillo por supuesto)

procedure TForm1.FormActivate(Sender: TObject);
begin
query1.SQL.Add('Select * from productos');
query1.Open;
query1.Active := True;
end

Con este procedimiento activo el TQuery y le agrego una sentencia simple SQL y pasa a hacer solo de lectura.
Éste Query está asignado a un Grid, en el cual se pueden modificar sus campos cuando el usuario edita la grilla, qué realmente este es el fin del TUpdateSQL, poder actualizar un TQuery de solo lectura.

procedure TForm1.Button1Click(Sender: TObject);
begin
UpdateSQL1.ModifySQL.Add('Update Productos set');
UpdateSQL1.ModifySQL.Add('Id_Producto = :Id_Producto');
UpdateSQL1.ModifySQL.Add('Where Id_Producto = :OLD_Id_Producto');
query1.ApplyUpdates;
query1.CommitUpdates;
end;

OLD_Id_Producto, ésta variable vendría siendo el campo del TQuery asociado al TUpdateSQL, de está forma el TUpdateSQL sabe que campo debe actualizar.
Con respecto al Insert o Delete es algo similar.

Espero que te sirva

Saludos
Aarón.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 21:45:24.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi