Error al guardar Número Telefónico

[koalasoft]

buenas ..

Pues ese es el detalle, intento guardar en una tabla el valor de un número telefónico con el clasico código:

Table1.Open;
try
Table1.FieldByName('TEL_CL').AsInteger :=StrToInt(Edit1.Text);
finally
Table1.Post;
end;

Si guardo un valor por ejemplo: 1234567890, si lo guarda sin problema, pero si quiero agregar un valor por ejemplo: 9384568579, me envía un mensaje de error: "raised exception class EConvertError whit message "9384568579" is not a valid integer value"

El campo TEL_CL en la BD lo tengo de tipo Numérico.

Intenté de igual forma usar una variable para mayor rango de número:

Var
 TEL  : Int64;

begin
TEL: = =StrToInt(Edit1.Text)
Table1.Open;
try
Table1.FieldByName('TEL_CL').AsInteger :TEL;
finally
Table1.Post;
end;

Alguna idea por que ese valor no me lo acepta?

[Casimiro Noteví]

Pues porque ese valor excede al máximo de un número entero.

[Neftali [Germán.Estévez]]

Prueba a utilizar esto:

Código Delphi [-]
  Table1.FieldByName('TEL_CL').AsString := TEL;

[[AgustinOrtu]]

Yo usaría StrToInt64 para convertir el valor

[Casimiro Noteví]

Es que habría que saber también qué tipo de integer usa la base de datos ¿access?

[Neftali [Germán.Estévez]]

Habría que aclarar:

1) Qué tipo hay en la Base de Datos y qué tipo debe ser.
2) Qué tipo de dato tiene la variable y qué tipo debe ser.
3) Cómo asignar los valores (porque si se asigna como AsInteger va a fallar).

La asignación de AsInteger usa el tipo LongInt:

Código Delphi [-]
function GetAsInteger: Longint; virtual;

Que según la ayuda está definido así:

LongInt -2147483648..2147483647 Signed 32-bit

Habría que usar AsLargeInt, que usa LargeInt=Int64 definido como:

Int64 -2^63..2^63-1 Signed 64-bit

[koalasoft]

Empezado por AgustinOrtu

Yo usaría StrToInt64 para convertir el valor

Si lo guarda pero al consultar ese valor guarda otro datos diferente.. Por ejemplo guarde el numero 9383869090, lo guardo y al consultarlo guardo el número: 793934498

[mamcx]

Aparte de esto, un telefono se debe guardar como texto, no solo porque hay "números" pocos usuales (ej: +71 333, o *555)

Si no porque ademas, no tiene sentido preguntar "Sacame el promedio de la columna teléfono".

[koalasoft]

Empezado por Neftali

Prueba a utilizar esto:

Código Delphi [-]
  Table1.FieldByName('TEL_CL').AsString := TEL;

Muestra "Incompatible type String and Int64"

Gracias!!