code

delphi filestream

procedure TForm1.Button1Click(Sender: TObject); var    f1:TFileStream;       filename:String; begin    OpenDialog1.Execute ;    filename:=OpenDialog1.FileName ;    f1:=TfileStream...
日期：2012-04-04 浏览：1981次 评论：0次 阅读全文
    •