如题 ,谢谢
解决方案 »
- 问一个比较弱的问题,delphi 2007 的工程文件.dpr
- 如何在查询(TADOQuery)中新增字段,并可以显示及修改值,从别的表计算统计中得出其值
- 为什么关闭主窗口后程序还在运行
- 请问怎么用GraphicEx把图片保存为GIF格式?或者其他有不失真颜色的控件?
- 一个SQL语句的问题
- 高手救命 遍历另一个窗体上的控件
- 高薪招聘DELPHI程序员两名(有HIS病案开发经验者优先)
- 如何实现PC与IC读卡机通信
- 谁知道有没有delphi5的中文帮助啊?
- 使用delphi写的程序,使用access数据库,ADO方法连接,如何打包?在一个新计算机可以运行?
- Cannot creat form. No MDI forms are currently active.
- 如何知道当前是第几周啊?
var Result,FileName,Ext,s:string;
begin
s:='c:\temp\hah.doc';
FileName:=ExtractFileName(s);
Ext:=ExtractFileExt(s);
Result:=StringReplace(FileName,Ext,'',[rfReplaceAll]);
ShowMessage(Result);
end;