----赖格英-----

摘要： 1 procedure TForm1.Button1Click(Sender: TObject); 2 var 3 FileN:string; 4 begin 5 if self.OpenDialog1.Execute then 6 begin 7 filen:=UTF8ToAnsi(self.OpenDialog1.FileName); 8 self.Memo1.Lines.SaveToFile(FileN); 9 end;10 end; 阅读全文

摘要： 1、在“工程”菜单下，单击“工程选项”，原始状态的界面为：2、将界面中的两个选项修改为如下：3、按“确定”按钮，即可编译以后的可执行程序就将又原来的14m变为1.66m。1.选择：Project --> Project Options --> Compiler Options --> Code Generation --> Unit Style --> Smart Linkable(-CX) 2.取消选择：Project --> Project Options --> Compiler Options --> Linking --> Deb 阅读全文