Read

Parametry

Popis

Funkce Read Φte z textovΘho souboru zadanΘho prvnφm parametrem hodnotu do prom∞nnΘ uvedenΘ jako druh² parametr. P°itom p°evßdφ textov² zßpis hodnoty na hodnotu p°φsluÜnΘho typu. Soubor musφ b²t p°edem otev°en.

P°i pou₧itφ funkce Eof pro zjiÜt∞nφ konce souboru nezapome≥te, ₧e Eof p°eskakuje mezery mezi slovy.

Pou₧itφ funkce Read pro zßpis do °et∞zcovΘ prom∞nnΘ se p°eΦte °ßdek a₧ po znak konce °ßdku (je-li velikost prom∞nnΘ dostateΦnß). Z °ßdku delÜφho ne₧ 255 znak∙ se p°eΦte pouze prvnφch 255 znak∙.

Hodnota funkce

Hodnota funkce Read je TRUE, pokud se povedlo p°eΦφst a zapsat do parametru p°eΦten² ·daj. Hodnota bude FALSE pokud v souboru nenφ hodnota, kterß by se dala p°evΘst na p°φsluÜn² typ.

P°φklad

p°eΦte soubor po °ßdkßch, °ßdky jsou kratÜφ ne₧ 255 znak∙; p°i p°φpadnΘm zßpisu ve shodnΘm rozlßmßnφ je nutno doplnit znaky pro konec °ßdky Chr(10)+Chr(13)

var
  f : file;
  str : string[255];
begin                                               
  if Reset(f,'c:\test.txt') then begin
    while not Eof(f) do begin               
      Read(f,str);
      Info_box('',str);
    end;
    Close(f);
  end;
end.

Viz

• Write
• Writeln
• Reset
• Rewrite
• Close
• Eof
• Seek
• Filelength