query no Graba , se cierra

[[Lepe]]

Lo que espera intToStr es un entero, sin embargo lo que hay en el Edit6 es un texto, de ahí que dé error.

Debes tener en cuenta los tipos de datos:
Imaginando que IDCLIENTE es un entero, el sql debe quedar así:

Código SQL [-]
INSERT INTO clientes (IDcliente,Nombre_Cliente,Apellido,Dirreccion,Cedula,Telefono)
VALUE (3, 'nombre1', 'apellido1', 'direccion 1', 'cedula', '23234223');

tal y como lo haces ahora mismo quedaría así:

Código SQL [-]
INSERT INTO clientes (IDcliente,Nombre_Cliente,Apellido,Dirreccion,Cedula,Telefono)
VALUE (3, nombre1, apellido1, direccion 1, cedula , 23234223);

Como ves no hay comillas simples para que el sql entienda que nombre1 es un texto, deberás usar algo así:

Código Delphi [-]
SQL.add('INSERT INTO clientes (IDcliente,Nombre_Cliente,Apellido,Dirreccion,Cedula,Telefono,)');
SQL.add ( 'VALUE ('+ edit6.text)+','+QuotedStr(edit1.Text)+','+QuotedStr(edit3.Text)+','+QuotedStr(edit4.text)+','+Quoted  Str(edit2.Text)+','+QuotedStr(edit4.Text)+')');

como ves es bastante lioso, es preferible usar parámetros en el sql

Saludos

[juanmaster]

Base de datos en access , idcliente lave primaria , y es numerica
Recuerda que no me graba , el codigo

[[Lepe]]

Pues muchas gracias, parece que me has leído la mente

La verdad, inicialmente creí que era problemas por los tipos de datos que enviabas y los que la base de datos esperaba, así que hice las preguntas a las cual has contestado.

Revisando el código entendí por donde iban los tiros y edité mi mensaje cambiándolo totalmente, mientras redactaba el mensaje se ve que has llegado.

Bueno espero que ahora si leas mi mensaje anterior.

Saludos

[[Caral]]

Hola juanmaster
Segun veo:

Código Delphi [-]
procedure TFclienteN.BitBtn1Click(Sender: TObject);
begin
with Query1 do
begin
close;
sql.clear;

SQL.add('INSERT INTO clientes (IDcliente,Nombre_Cliente,Apellido,Dirreccion,Cedula,Telefono,)');
SQL.add ( 'VALUE ('+ inttostr (edit6.text)+','+edit1.Text+','+edit3.Text+','+edit4.text+','+edit2.Text+','+edit4.Text+')');

end;

No se porque pero me suena que cierras, la tabla y luego tratas de insertar.
Para mi nunca insertaras nada en un query o tabla cerrado.
Yo lo haria asi:

Código Delphi [-]
procedure TFclienteN.BitBtn1Click(Sender: TObject);
begin
 Query1.Close;
 Query1.sql.clear;
 Query1.Open;
 Query1.SQL.TEXT:= 'INSERT INTO clientes (IDcliente,Nombre_Cliente,Apellido,Dirreccion,Cedula,Telefono)' +
 'VALUE ('+ inttostr (edit6.text)+','+edit1.Text+','+edit3.Text+','+edit4.text+','+edit2.Text+','+edit4.Text+')';
end;

Puede ser que me equivoque en el open, si no camina asi, ponlo antes del end.
Saludos