dephi 7 的 这种方式 到底有什么用？

来源：百度知道 编辑：UC知道 时间：2024/05/24 16:31:32
小弟DELPHI新手：

不太理解 DELPHI 将fstream1归纳为Tfilestream 类的意思？各位牛淫请详细，清楚，明了的解释下，谢。

fstream1:Tfilestream;
fstream2:Tfilestream;

filewrite不行吗?
procedure TForm1.Button1Click(Sender: TObject);
var
BackupName: string;
FileHandle: Integer;
StringLen: Integer;
X: Integer;
Y: Integer;
begin
if SaveDialog1.Execute then
begin
if FileExists(SaveDialog1.FileName) then
begin
BackupName := ExtractFileName(SaveDialog1.FileName);
BackupName := ChangeFileExt(BackupName, '.BAK');
if not RenameFile(SaveDialog1.FileName, BackupName) then

raise Exception.Create('Unable to create backup file.');
end;
FileHandle := FileCreate(SaveDialog1.FileName);
{ Write out the number of rows and columns in the grid. }