Abrir base de datos Pascal en delphi

[gilberto_1126]

Saludos

Tengo un detalle. Lo que pasa es que queremos abrir una base de datos con extension .DAT que fue creada mediante Pascal. Existe alguna forma de ver la informacion de esta base de datos en delphi para transferirla a una apliccion nueva que estoy creando con un manejador de base de datos actualizado?

gracias

[[newtron]]

Hola.

El que se haya creado la base de datos con pascal no determina el tipo de la misma, lo que tienes que averiguar es qué tipo de base de datos es para intentar abrirla. Normalmente los ficheros .DAT son ficheros de datos y debe de haber un fichero con el mismo nombre y distinta extensión que será el fichero de índices, dinos qué extensión tienen esos ficheros índices y es posible que alguien te de alguna pista sobre la base de datos y por lo tanto la forma de acceder a ellos.

Saludos

[gilberto_1126]

desgraciadamente es lo unico que se y buscando archivos que acompañen a la base de datos, solo estan unos archivos .BAK pero son archivos de respaldo que va creando el sistema automatica y periodicamente.

[Casimiro Notevi]

Empezado por gilberto_1126

solo estan unos archivos .BAK pero son archivos de respaldo que va creando el sistema automatica y periodicamente.

¿El sistema?, ¿qué sistema?, ¿el programa con el que está creado o algún programa de backups?.
¿No hay más archivos?, ¿alguna pista?, es que si no dices nada, evidentemente, adivinos no somos

[[duilioisola]]

Puede que estés hablando de archivos con una estructura propia.
En Pascal, allá lejos y hace tiempo, se utilizaban records y con eso se leia un archivo.
Creo que era algo asi:

Código Delphi [-]
type
  PhoneEntry = record
    FirstName, LastName: string[20];
    PhoneNumber: string[15];
    Listed: Boolean;
  end;

  PhoneList = file of PhoneEntry;

var
   aPhoneEntry : PhoneEntry;

begin
    AssignFile(PhoneList , 'Datos.DAT');
    Reset(PhoneList );
    try
      Seek(PhoneList , 10);
      Read(PhoneList , aPhoneEntry
    finally
      CloseFile(PhoneList );
    end;
end;

Para saber la estructura del Record, deberás abrir el .dat con el bloc de notas y deducir los largos de cada campo.
Si ver caracteres raros, se debe tratar de un numero. Si es un caracter será un byte, si son dos un integer, si son 4 creo que un real...

[gilberto_1126]

No existen mas archivos con los que pueda dar referencia, solo este archivo .DAT y si lo abro con bloq de notas aparecen simbolos raros y algunas descripciones entendibles, creo que si es un archivo de estructura propia, pero desgraciadamente no se como manejarlo. donde puedo encontrar un manual o algun tutorial para aprender a trabajar con estos archivos??????

[Casimiro Notevi]

Pues con el ejemplo de duilioisola.
Te toca hacer prueba y error, prueba y error, prueba y error...

[[maeyanes]]

Hola...

O conseguir el códgo fuente del programa original...


Saludos...

[Casimiro Notevi]

O por lo menos saber qué programa era, o preguntar a alguien que lo sepa, o preguntar a quien le ha dado el fichero, etc.

[ecfisa]

Hola gilberto_1126.

Sólo quería agregar, que si el archivo es tipado y está realizado en Pascal, desde Delphi deberás declarar los registros como packed record, o usar la directiva {$A }.
Es decir si en Pascal se declaró:

Código Delphi [-]
type 
   TCliente = record
     nombre: string;
     telefono: string;
     ...
   end;

En Delphi:

Código Delphi [-]
type 
  TCliente = packed record
    nombre: string;
    telefono: string;
       ...
   end;

Un saludo.

[gilberto_1126]

Buscando mas información acerca de la base de datos, vi que hay un archivo .Arc que lo acompaña, ayuda en algo este dato?

[ecfisa]

Hola Gilberto.

Los archivos con extensión .ARC, son archivos comprimidos: Files ARC.

En los enlaces siguientes hay algunos programas con los que podés abrir ese tipo de archivo:

• ARC 1
• ARC 2

Un saludo.