一.記錄型文件類型文件:
1)可以粗略地理解為數據庫,如本地qq程序的中把的一些賬號信息集合(賬號 ,密碼,上次登錄時間等 等組成的集合)記錄在.dat文件中。
2)記錄型文件類型文件VS數據庫
相同點:都可以用來記錄數據
區別:記錄型文件類型文件類似記事本記錄數據,導致對數據的填刪改 查沒有數據庫那麼方便。
3)delphi記錄型文件的定義
第一步:
定義一個記錄集
type
MyFile= Record
name :String[20]; //記錄集中一定要對字符串指定大小
sex :String[10]; //同上
age :Integer;
end; //結束
第二部:
聲明一個記錄集文件,同時申明一個記錄集
myselfFile :File of MyFile; //申明記 錄集文件
mySelfInfo :MyFile; //申明記錄集
第三部:
對記錄集賦值與記錄集文件賦值
//對記錄集賦值
mySelfInfo.name := Edit1.Text;
mySelfInfo.sex := Edit2.Text;
mySelfInfo.age := StrToInt(Edit3.Text);
//下面對記錄集文件賦值
if SaveDialog1.Execute then
begin
AssignFile(myselfFile, SaveDialog1.FileName); //將記錄集與磁盤文件掛鉤,
//寫了此句馬上寫 CloseFile(myselfFile);
if FileExists(SaveDialog1.FileName)then //判斷文件是否存在
Reset (myselfFile) //存在則以只讀的形式打開;只寫(Rewrite)的方式會先刪除原來的文件,再新建 文件
else Rewrite(myselfFile); //不存在則以只寫的方式打開;
//此時上兩種方式,文件 (myselfFile)指針指向文件內容的0位子
Seek(myselfFile, FileSize(myselfFile)); //此 句將指針指向文件末尾。
Write(myselfFile, mySelfInfo); //將記錄集寫入文件。讀取用read (myselfFile, mySelfInfo);
CloseFile(myselfFile); //關閉與磁盤關聯,與AssignFile對應
end;
第四步:最後
假設寫入以下記錄組
控件: Edit1.Text Edit2.Text Edit2.text
信息: 張某某 男 21
周某某 女 21
項 某某 男 21
孟某某 女 21
鄭某某 男 21
王某某 男 21
以文本方式打開後文件內容為(注:&表示亂碼)
張某某 男 & 周某某 女 & 項某某 男 & 孟某某 女 & 鄭某某 男 & 王某某 男 &
注意:只有在上面用 read(myselfFile, mySelfInfo)數據能在軟件中被正常讀取。
總結:紀錄集就好比java中的類。寫入 也有點像java。學習delphi,沒事可以陶冶陶冶
出處 http://7071976.blog.51cto.com/7061976/1208387