Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Sobre estructura de datos (https://www.clubdelphi.com/foros/showthread.php?t=73769)

tiago_begins 15-05-2011 23:24:44

Sobre estructura de datos
 
Hola amigos, de nuevo por acá don una duda:

Estoy practicando sobre fichero binario con un tipo de datos determinado, pero mi duda es donde declaro mi estructura de mi registro?

Código:

Type TMiRegistro = Record
Nombre : String [20];
Telefono : String [7];


ecfisa 15-05-2011 23:53:28

Hola tiago_begins.

Depende el alcance que quieras darle. Si querés que pueda ser accedido desde otra unidad podría ser:
Código Delphi [-]
...
type
  TForm1 = class(TForm)
    ...
  private
  public
  end;
  TMiRegistro = Record
    Nombre : String[20];
    Telefono : String[7];
  end;
  TFileReg = file of TMiRegistro;

var
  Form1: TForm1;
  FileReg: TFileReg;
  Reg: TMiRegistro;

implentation
...

Si queres que sólo pueda ser accedida desde esa unidad sería:
Código Delphi [-]
...
implementation
type
  TMiRegistro = Record
    Nombre : String[20];
    Telefono : String[7];
  end;
var
  Form1: TForm1;
  FileReg: TFileReg;
  Reg: TMiRegistro;
...

O con el mismo alcance se podría hacer:
Código Delphi [-]
type
  TForm1 = class(TForm)
    ...
  private
    FileReg: file of record
      Nombre : string[20];
      Telefono : string[7];
    end;
  public
  end;
...

Un saludo.


La franja horaria es GMT +2. Ahora son las 22:46:05.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi