2007年4月13日 星期五

Delphi使用Inc

內容來源: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;
......

沒有留言: