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.023 c
3-21979
Max hombre
2001-12-06 13:21
2002.01.08
DBTreeView


14-22339
Chino como Zo Vut
2001-11-01 10:12
2002.01.08
Programador, ¿cómo te llamas?


1-22242
Agrio
2001-12-14 11:00
2002.01.08
POP3


14-22417
Yuraz
2001-10-25 15:02
2002.01.08
Me pregunto qué es lo que Yandex está girando en (IIS ..) DB, hardware.


14-22345
petr_v_a
2001-11-05 20:13
2002.01.08
En defensa de Lana Rozanova & Co !!!





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 Italiano 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