摘要: procedure TForm1.Button1Click(Sender: TObject);var txt:TextFile; s:string; path:string;begin path:=ExtractFilePath(Application.ExeName); AssignFile(txt,path+'\test.txt'); Reset(txt); //读打开文件,文件指针移到首 Memo1.Clear; while not Eof(txt) do begin Readln(txt,s); Memo1.Lines.Add(s); end; C... 阅读全文
posted @ 2013-02-26 10:14 林燃 阅读(186) 评论(0) 推荐(0) 编辑
摘要: 说说编译后的程序大小。其实最终得到的程序并不大,由于编译器的变化,XE2里Debug版程序比Release版程序大很多,要减小程序体积,就使用Release版。下面给出稍微具体点的信息(都是空程序):Win32 Debug版 VCL程序大约6M FireMonkey程序大约8MWin32 Release版 VCL程序大约1.5M FireMonkey程序大约3MWin64 Debug版 VCL程序大约7M FireMonkey程序大约9MWin64 Release版 VCL程序大约2M FireMonkey程序大约4M减小体积的方法:1、最终使用Rele... 阅读全文
posted @ 2013-02-26 09:45 林燃 阅读(2654) 评论(1) 推荐(0) 编辑