任何基于窗体的delphi程序都包含一个Application类型,它的类型是TApplication。

Application.ExeName 属性 能返回程序的全路径和文件名,这个属性在运行时是只读的。

Application.MainForm.caption := Application.ExeName;

ExtractFileName(Application.Exename);  可以得到文件名

ExtractFilepath();可以的得到文件全路径; 带'\'

ExtractFileDir();也是文件路径 后面不带‘\’

ExtractFileExt()可以得到文件扩展名;

 

TApplication.MainForm是TForm类型可以通过MainForm访问form的任何属性和方法,也可以访问到派生的窗体属性,只要通过强制转换

(MainForm as Tform1).SongTitle := '1dss';

posted on 2015-04-09 22:34  sagfly  阅读(125)  评论(0)    收藏  举报