uses shellapi;0DShellExecute(0,'explore','aa.txt',0,0,SW_SHOW);
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”等字样,删除它们';
I.Desire := '加不加分随你';
—————————————————————————————————
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”等字样,删除它们';
I.Desire := '加不加分随你';
—————————————————————————————————
解决方案 »
- delphi tdatetimepicker
- Websnap入门路上体验CGI遭遇500错误!
- 组件奇怪的消失了
- 在线请教:如何对一个树组按照树组内值的大小进行排序,并且求出50%的那个点的值
- 提供 ,,提供 --------在线等待
- 一个关于insert的简单问题
- 请提供列车查询,有票价(包括卧铺)显示的网站,
- 请问有没有vss for delphi的???
- 上次有个朋友问过的(我找不到):“Query中的DataSource属性的用法”
- 发布文档管理助手4.0版本,请大家提宝贵建议
- DEPHI与ORACLE存储BLOB的问题
- 如何截获某个指定端口所有的Tcp包,和Udp包并显示其内容!!!
ShellExecute(0,'explore','',0,0,SW_SHOW);
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”等字样,删除它们';
I.Desire := '加不加分随你';
—————————————————————————————————
这个问题也回答了N次了,