Sign in Join
Wiki copytemporary

Record/es: what changed

Revision 0 to 1. Removed lines have a minus sign; added lines have a plus sign.

Title: Record/es

OldNewLine
1+Un [[Type|tipo]] de datos altamente estructurado en [[Pascal]] .
2+
3+Mientras las estructuras simples cómo [[Array|matrices]] y conjuntos consisten en agrupaciones de elementos del mismo tipo, un registro consiste en una agrupación de elementos de tipos diversos y puede ser muy complejo. Cada una de las distintas partes de un registro se denomina Campo.
4+
5+Algunos ejemplos de registros:
6+
7+``` pascal
8+ Type
9+ RegistroEjemplo = Record
10+ Valores: array [1..200] of real;
11+ CuantosValores: Integer; { el número real de puntos en la matriz }
12+ Media: Real { el promedio o media de los valores en la matriz }
13+ End;
14+
15+ Socio = Record
16+ Nombre, Apellidos : string;
17+ Direccion: array [1..3] of string;
18+ Telefono : Integer;
19+ FechaNacimiento: TDateTime;
20+ CuotasAlDia: Boolean
21+ End;
22+```
23+
24+Un regsitro es tratado por el programa como una única entidad y por ello un registro completo puede ser copiado (siempre que el destino de la copia sea del mismo tipo) así:
25+
26+``` pascal
27+ Var registro1, registro2 : Socio;
28+ Begin
29+ { asignar los valores de los campos de ''registro1'' a ''registro2''}
30+ ...
31+ ...
32+ registro2 := registro1;
33+ End;
34+```
35+
36+A los campos individuales se accede colocando un punto entre el nombre del registro y el nombre del campo, de esta forma:
37+
38+``` pascal
39+ registro.Nombre := 'Jorge';
40+ registro.Apellidos := 'Pérez Serrano';
41+ registro.Telefono := 789534;
42+ registro.CuotasAlDia := TRUE;
43+```
44+
45+Así mismo, una serie de campos pueden ser asignados de forma conjunta con la utilización del constructor WITH:
46+
47+``` pascal
48+ WITH registro do
49+ begin
50+ Nombre := 'Jorge';
51+ Apellidos := 'Pérez Serrano';
52+ Telefono := 789534;
53+ CuotasAlDia := TRUE;
54+ end;
55+```
56+
57+Los registros se utilizan mucho en Pascal, para agrupar elementos ligados lógicamente.
58+
59+---
60+*From the Free Pascal wiki, page "Record/es", as it stood on 2020-02-24 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).*

Back to history