內容來源:http://topic.csdn.net/t/20010423/18/103526.html
Delphi可以像C一樣用Inc文件
用編譯指令 {$I FileName}
如:
File1.Text 內容為
const
CText = 'Hello World!';
Unit1.pas
//.............
Procedure TForm1.Button1Click(Sender: TObject);
{$I File1.txt}
Begin
ShowMessage(CText);
End;
......
沒有留言:
張貼留言