Difference between revisions of "Basic Pascal Tutorial/Chapter 2/Files/zh CN"
From Lazarus wiki
Jump to navigationJump to searchWangyouworld (talk | contribs) (Created page with "2D - 文件操作 (原作者: Tao Yue, 状态: 未更改) 读取文件，但不是从控制台（键盘）中读取数据，可以这样： <syntaxhighlight> read (文件变...") |
m (bypass language bar/categorization template redirect [cf. discussion]) |
||
| (7 intermediate revisions by 5 users not shown) | |||
| Line 1: | Line 1: | ||
| + | {{Basic Pascal Tutorial/Chapter 2/Files}} | ||
| + | |||
2D - 文件操作 (原作者: Tao Yue, 状态: 未更改) | 2D - 文件操作 (原作者: Tao Yue, 状态: 未更改) | ||
读取文件，但不是从控制台（键盘）中读取数据，可以这样： | 读取文件，但不是从控制台（键盘）中读取数据，可以这样： | ||
| − | <syntaxhighlight> | + | <syntaxhighlight lang=pascal> |
read (文件变量, 参数列表); | read (文件变量, 参数列表); | ||
write (文件变量, 参数列表); | write (文件变量, 参数列表); | ||
| Line 10: | Line 12: | ||
同样用 <tt>readln</tt> 和 <tt>writeln</tt>。文件变量声明如下： | 同样用 <tt>readln</tt> 和 <tt>writeln</tt>。文件变量声明如下： | ||
| − | <syntaxhighlight> | + | <syntaxhighlight lang=pascal> |
var | var | ||
... | ... | ||
| Line 29: | Line 31: | ||
Turbo Pascal 使用引入赋值。首先将文件名赋值给一变量，之后调用<tt>reset</tt>或<TT>rewrite</tt>。 | Turbo Pascal 使用引入赋值。首先将文件名赋值给一变量，之后调用<tt>reset</tt>或<TT>rewrite</tt>。 | ||
| − | <syntaxhighlight> | + | <syntaxhighlight lang=pascal> |
assign (文件变量, '文件名'); | assign (文件变量, '文件名'); | ||
reset (文件变量); | reset (文件变量); | ||
| Line 37: | Line 39: | ||
操作完成后，你需要关闭它： | 操作完成后，你需要关闭它： | ||
| − | <syntaxhighlight> | + | <syntaxhighlight lang=pascal> |
close (文件标识符); | close (文件标识符); | ||
</syntaxhighlight> | </syntaxhighlight> | ||
| Line 43: | Line 45: | ||
下面是一个操作文件的示例，程序运行在DOS下，将读取file1.txt内容，写入到file2.txt中。 | 下面是一个操作文件的示例，程序运行在DOS下，将读取file1.txt内容，写入到file2.txt中。 | ||
| − | <syntaxhighlight> | + | <syntaxhighlight lang=pascal> |
program CopyOneByteFile; | program CopyOneByteFile; | ||
| Line 63: | Line 65: | ||
{|style=color-backgroud="white" cellspacing="20" | {|style=color-backgroud="white" cellspacing="20" | ||
| − | |[[ | + | |[[Basic Pascal Tutorial/Chapter 2/Formatting output/zh_CN|上一页]] |
| − | |[[Contents/ | + | |[[Basic Pascal Tutorial/Contents/zh CN|目录]] |
| − | |[[ | + | |[[Basic Pascal Tutorial/Chapter 2/EOLN and EOF/zh_CN|下一页]] |
|} | |} | ||
| − | |||
| − | |||
| − | |||
Latest revision as of 16:18, 20 August 2022
│
български (bg) │
Deutsch (de) │
English (en) │
français (fr) │
日本語 (ja) │
中文（中国大陆） (zh_CN) │
2D - 文件操作 (原作者: Tao Yue, 状态: 未更改)
读取文件，但不是从控制台（键盘）中读取数据，可以这样：
read (文件变量, 参数列表);
write (文件变量, 参数列表);
同样用 readln 和 writeln。文件变量声明如下：
var
...
filein, fileout : text;
text 数据类型指定该文件仅是纯文本形式。
操作文件时，需要先声明变量，以读取或者写入数据；我们需要将磁盘上的文件与变量相关联，可以使用以下2种方式之一，通常：
reset (文件变量, '文件名'); rewrite (文件变量, '文件名');
reset 将对打开的文件进行读取或重写。 使用reset操作文件，只能进行read、readln操作。 使用rewrite操作文件，只能进行write、rewrite操作。
Turbo Pascal 使用引入赋值。首先将文件名赋值给一变量，之后调用reset或rewrite。
assign (文件变量, '文件名');
reset (文件变量);
操作系统不同，路径表达方法也不一。Windows使用反斜杠(如 c:\directory\name.pas)，而MacOS、Linux使用斜杠。
操作完成后，你需要关闭它：
close (文件标识符);
下面是一个操作文件的示例，程序运行在DOS下，将读取file1.txt内容，写入到file2.txt中。
program CopyOneByteFile;
var
mychar : char;
filein, fileout : text;
begin
assign (filein, 'c:\file1.txt');
reset (filein);
assign (fileout, 'c:\file2.txt');
rewrite (fileout);
read (filein, mychar);
write (fileout, mychar);
close(filein);
close(fileout)
end.
| 上一页 | 目录 | 下一页 |
