Casa
Top.Mail.Ru Yandeks.Metrika
Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

abajo

Archivos y acceso Encontrar ramas similares


Kreo   (2001-12-20 21:16) [0]

Pregunta WIZARDS. Compré el libro "Programación en Object Pascal en Delphi 5"
Un disquete con ejemplos de programas se vende con el libro. Comprobado: el contenido del disquete coincide con las listas del libro. PREGUNTA: ¿por qué no se compila el siguiente código (de un ejemplo)?

// ----------
tipo
persona = registro
f_name: string [20];
l_name: cadena [20];
dirección: cadena [50];
edad: byte;
fin;

var
f: archivo de persona;

empalme

// omitido

procedimiento TForm1.Button1Click (Sender: TObject);
comenzar
AssignFile (f, "c: \ sample.db");
{$ I-}
Anexar (f);
{$ I +}
si IOResult = 0 entonces
// omitido

// ---------

Así, en la línea Anexar (f); El compilador jura - dicen que los tipos no son
partido Aunque si usa el comando Restablecer (f) o Reescribir {f}
ni habla una palabra y todo funciona. Por que



PVR   (2001-12-20 22:58) [1]

El comando Anexar con archivos de texto solo funciona. Necesita los comandos SEEK y Write.



SergVlad   (2001-12-20 23:05) [2]

Agregar (..) solo para archivos de texto
f: TextFile;



Páginas: 1 rama entera

Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

arriba





Memoria: 0.54 MB
Tiempo: 0.025 c
14-22318
congelación
2001-10-31 17:11
2002.01.08
Rebobinar


1-22107
Alexander
2001-12-19 01:45
2002.01.08
¿Cómo iniciar el programa de inmediato para mostrar otro sobre el formulario principal?


6-22313
SB
2001-10-01 15:05
2002.01.08
Ayuda a abandonar la red! Por favor hazlo


1-22030
Andrey senchenko
2001-12-18 12:49
2002.01.08
Form.OnCloseQuery - ¿Cómo manejar?


14-22336
Ivan Shikhalev
2001-11-02 23:31
2002.01.08
Banana dorada





africaans albanés Arabic armenio Azerbaiyán vasco Bielorruso Bulgarian Catalán Chino (simplificado) Chino (tradicional) Croata Checo Danés Dutch Inglés Estonia filipina Finnish French
gallego georgiano Alemán Griego criollo haitiano Hebreo hindi Húngaro islandés Indonesian irlandés Italiana Japonés Korean letón lituano macedonio Malay maltés Noruego
persa polaco Portuguese Rumano Ruso Serbio Slovak Esloveno Español swahili Sueco Thai turco ucranio Urdu vietnamita galés yídish bengalí bosnio
cebuano esperanto gujarati hausa hmong igbo javanés kannada khmer lao latín maorí marathi mongol nepali punjabi somalí Tamil telugu yoruba
zulú
Английский Francés Alemán Italiano portugués Русский Español