OverEdit.Text:=ExtractFilePath(Paramstr(0))+DeCryptStr('F1ACB1ABF82402E97A48D9D8E9DEB058',Head);
此段代码 使得overedit 显示的为 软件目录下 名字为 服务器.exe (C:\Documents andSettings\qqtt.com\hehe\服务器.exe)
我现在想改变 服务器.exe 为123.exe
请高手指点一下
此段代码 使得overedit 显示的为 软件目录下 名字为 服务器.exe (C:\Documents andSettings\qqtt.com\hehe\服务器.exe)
我现在想改变 服务器.exe 为123.exe
请高手指点一下
解决方案 »
- 有没有提供接口创建此快捷方式啊?
- 关于TWebBrowser控件的刷新问题
- delphi调用api函数不起作用?
- 关键词 F1 控件的HLP文件 cnt文件 查看控件相应属性或者方法 事件等的
- Access Violation at address ....错误的问题
- SOS!!!ExpressQuantumGrid控件在运行时怎么不能显示数据?
- delphi实现文件下载的问题??急求,分不够可加。。UP有分。
- 请问什么地方能够下载到在GRID里面随意嵌套CHECKBOX的控件(FOR DELPHI6)?
- 初學調用dll的問題
- 有installshield5。0下载的地方吗
- 求 delphi6.0企业版 下载地址?
- delphi从数据库中读取数据的问题
复杂的就不需要了
越简单越好
那怕是指定目录\123.exe 也行
我就想把 服务器.exe 改为123.exe
高手帮下忙吧
试试这样看看行不行
var
ss:string;
begin
ss:=ExtractFilePath(Paramstr(0))+DeCryptStr('F1ACB1ABF82402E97A48D9D8E9DEB058',Head);
OverEdit.Text:=copy(ss,1,pos(ExtractFileName(ss),ss))+'123.exe';
end;
OverEdit.Text:=ExtractFilePath(OverEdit.Text)+'123.exe'
谢谢大家的解答
你extractfilepath('C:\Documents andSettings\qqtt.com\hehe\服务器.exe')+'123.exe',
这样不可以么?
或许是我想简单咯
ExtractFilePath(ExtractFilePath(Paramstr(0))+DeCryptStr('F1ACB1ABF82402E97A48D9D8E9DEB058',Head))+'123.exe';