Rational Robot中檔案操作（一）

rational robot中提供了乙個檔案操作命令，語法如下：

open filename$ [for mode] [access access] [lock] as [#] filenumber% [len = reclen]

這裡我們把它的語法分為兩部分，因為這個檔案操作命令有兩種檔案操作模式，一種是順序檔案，一種是隨機檔案。

下邊是對順序檔案操作的語法：

引數說明：

說明：（1）引數filename$表示要開啟的檔名，檔名可以包含有驅動器和目錄

（3）as[#]filenumber 子句用於為開啟的檔案指定檔案號.對檔案進行讀寫操作時,要用檔案號表示該檔案.檔案號是介於1~511之間的整數,既可以是數字,又可以是變數.也可以省略不用.

(4)當在檔案與程式之間拷貝資料時,len=buffersize子句指定緩衝區的字元數.

例子：open 「c:/test.dat" for output as 1

open 「c:/test.dat" for output as 1

這兩句**在c盤所在目錄下建立了乙個名為test.dat的文字檔案,分配檔案號為1.

open 「c:/test.dat"??for input as [#]filenumber 　這條語句是從文字檔案中讀取資料.

隨機檔案的操作：

操作隨機檔案之前,首先必須定義用於儲存資料項的記錄型別.該記錄是使用者自定義資料型別,他們是隨機檔案中儲存資料的基本結構.例如:

type student

no as integer

name as string * 20

age as integer

end type

dim stud as student 『定義乙個可以存放學生材料的變數

隨機檔案中,所有的資料都將儲存到若干個結構為student型別的記錄中, 而從隨機檔案中讀出的資料則可以存放到變數stud中.之後我們就可以開啟並讀寫檔案了.

隨機檔案的操作語法格式:

open filename for random as [#]filenumber len = reclength

說明:(1)引數filename 和filenumber 分別表示檔名或檔案號.

(2)關鍵字random 表示開啟的是隨機檔案

(3)len子句用於設定記錄長度,長度由引數reclength指定.reclength的值必須大於0,而且必須與定義的記錄結構的長度一致.計算記錄長度的方法是將記錄結構中每個元素的長度相加.例如前面宣告的student的長度應該是2+20+2=24位元組.

開啟乙個記錄型別為student 的隨機檔案的方法是:

open "c:/student.txt " for random as #1 len = 25

這裡還有一種檔案操作方式二進位制檔案，下邊是他的語法格式:

open pathname for binary as [#]filenumber

說明:(1) 引數filename 和filenumber 分別表示檔名或檔案號.

(2)關鍵字binary 表示開啟的是二進位制檔案

(3)對於二進位制檔案,不能指定位元組長度.每個開啟的二進位制檔案都有乙個自己的指標,檔案指標是乙個數字值,指向下一次讀寫操作的檔案中的位置.二進位制檔案中的每個」位置」對應乙個資料位元組,因此,有n個位元組的檔案,就有1到n個位置.

我們可以用seek()函式返回當前的檔案指標位置(即下乙個要讀寫的位元組 );用loc()函式返回上一次讀寫的位元組位置,除非用seek語句移動了指標,loc()返回值總比seek()的小1.我們來看下面的例子:

open 「路徑：/student.txt」 for binary as #1? ?　該語句用二進位制的方式開啟了student.txt檔案.