Ver Mensaje Individual
  #11  
Antiguo 02-08-2008
esimon esimon is offline
Miembro
 
Registrado: ago 2005
Ubicación: República Dominica
Posts: 149
Reputación: 19
esimon Va por buen camino
gracias Delphius, nuevamente.

como dije anteriormente uso delphi 7 y accesse 2003, para insertar uso este codigo
Código:
 
procedure TFrm_Agencia.SpeedButton6Click(Sender: TObject);
begin
       Tbl_Agencias.Insert;
              
end;
y para grabar este.

Código:
 
procedure TFrm_Agencia.SpeedButton5Click(Sender: TObject);
begin
       if Tbl_Agencias.State in [dsEdit, dsInsert] then
          Tbl_AgenciasNumero_Provincia.Value := Tbl_ProvinciaNumero_Provincia.Value;
          Tbl_AgenciasNumero_Localidad.Value := Tbl_LocalidadNumero_Localidad.Value;
        //  DateTimePicker1.Date := Tbl_AgenciasFecha_Pendiente_Inspeccion.Value;
          Tbl_AgenciasFecha_Pendiente_Inspeccion.Value := DateTimePicker1.Date;
          Tbl_Agencias.Post;
end;
Responder Con Cita