Ver Mensaje Individual
  #4  
Antiguo 08-08-2007
Avatar de PabloTech
PabloTech PabloTech is offline
Miembro
 
Registrado: ene 2007
Ubicación: Tucumán, Argentina
Posts: 82
Reputación: 18
PabloTech Va por buen camino
Wink La inserción de filas en la tabla

Si tu componente de consulta (query) no tiene posibilidad de agregar registros o filas a la tabla sería algo así:
Código Delphi [-]
 
  // Primero se ingresa en la tabla de datos
  with QueryInsert do
  begin
    SQL.Close;
    SQL.Text := 'INSERT Tabla (Clave, Datos) VALUES(:clave, :datos);';
    ParamByName('clave').AsString := Edit1.Text;
    ParamByName('datos').AsString := ComboBox.Text;
    Prepare; // Opcional.
    ExecSQL;
  end;
  
  // Luego actualizas el Query que consulta esa tabla de datos
  Query.Refresh; // En algunos componentes no se usa Refresh, asi 
                 // es que se debe hacer Close y luego Open para
                 // actualizar la consulta.

En cambio, en otros componentes se puede incorporar la sentencia INSERT como una propiedad. De este modo se trabaja con APPEND... POST. como asi sugiere Neftali.
Código Delphi [-]
  // Actualiza la tabla de datos y refresca la consulta en la pantalla.
  with Query do
  begin
    Append;
    FieldByName('clave').AsString := Edit1.Text;
    FieldByName('datos').AsString := ComboBox.Text;
    Post;
  end;
También conviene que busques acerca de la propiedad RequestLive; y las instrucciones try... except, StartTransaction... Commit... Rollback.
__________________
Cita:
Cuando respetes al ilustrado y al ignorante, al rico y al pobre, al bello y al feo, estarás muy cerca de la sabiduría, que trasciende lo aparente.

E. Rharo
Responder Con Cita