07 2023 档案
摘要：用OpenDialog.FileName做参数 ExpandFileName() 返回文件的全路径(含驱动器、路径) ExtractFileExt() 从文件名中抽取扩展名 ExtractFileName() 从文件名中抽取不含路径的文件名 ExtractFilePath() 从文件名中抽取路径名
阅读全文
摘要：// // 函数名称: FindPathFiles// 功能描述: 找指定目录下的文件// 参 数: APath : 路径名称// APropty : 属性名称(*.* | *.txt)// AFiles : 文件列表// IsAddPath: 是否增加路径// 作者： // 时间： // 返 回
阅读全文
摘要：var Edit: TComponent;begin Edit := FindComponent("Edit1"); If Edit is TEdit then TEdit(Edit).Text := '你好 Delphi7';end; RTTI(RunTime Type Information):
阅读全文
