以上編寫了一個通用函數，下面我們用它來創建快捷方式。在窗體中放置一
個按鈕，雙擊按鈕寫入如下代碼即可：
procedure TForm1.Button1Click(Sender: TObject);
var
tmp: array [0..MAX—PATH] of Char;
WinDir: string;
begin
GetWindowsDirectory(tmp,MAX—PATH);
文章來源于領測軟件測試網 http://www.kjueaiud.com/
-
暫時沒有公告
如何用Delphi創建快捷方式
發布: 2008-5-21 12:44 | 作者: 不詳 | 來源: csai | 查看: 144次 | 進入軟件測試論壇討論
領測軟件測試網最新更新
關于領測軟件測試網 | 領測軟件測試網合作伙伴 | 廣告服務 | 投稿指南 | 聯系我們 | 網站地圖 | 友情鏈接
版權所有(C) 2003－2010 TestAge（領測軟件測試網）|領測國際科技（北京）有限公司|軟件測試工程師培訓網 All Rights Reserved
北京市海淀區中關村南大街9號北京理工科技大廈1402室 京ICP備10010545號-5
技術支持和業務聯系：info@testage.com.cn 電話：010-51297073
版權所有(C) 2003－2010 TestAge（領測軟件測試網）|領測國際科技（北京）有限公司|軟件測試工程師培訓網 All Rights Reserved
北京市海淀區中關村南大街9號北京理工科技大廈1402室 京ICP備10010545號-5
技術支持和業務聯系：info@testage.com.cn 電話：010-51297073