delphi问题讨论二

1983

关于文件操作。

type
      book=record
        name:string[100];
        writer:string[100];
        publisher:string[100];
        pressdate:string[100];
        classfication:string[100];
end;

var
    showbook:file of book;
begin
   assign(showbook,'book.txt');        //发生类型不布配问题。incompatible types:'tpersistent'and'text
   filemode:=2;
   append(showbook);

        

& X! U2 r+ ~/ A) g: b2 q

[此贴子已经被作者于2006-10-16 15:18:47编辑过]

& b6 Q9 c$ T6 v5 J) ?" s