關於新稱、移除、全部重置、儲存圖片(Image)的程式...

發文回覆瀏覽次數：960

推到 Plurk!

推到 Facebook!

關於新稱、移除、全部重置、儲存圖片(Image)的程式...

尚未結案

kj68215
初階會員

發表：47
回覆：91
積分：27
註冊：2003-08-09

發送簡訊給我

#1 引用回覆回覆

發表時間：2003-10-23 23:27:08

IP:218.168.xxx.xxx 未訂閱

下載程式網址↙ http://delphi.ktop.com.tw/topic.php?TOPIC_ID=39432 之前在gemi0305大大的協助之下... 寫完了新增的部分!(真感謝) 剩餘的三個還是沒頭緒.. 但是"儲存"的部分,小弟是想到儲存成 > > < class="code">Picture->LoadFromFile("D:/Project/icon/AddPc.bmp"); 有朋友建議我用自動偵測的方式,如以下4行所示：

AppPath  = ExtractFilePath(Application->ExeName);
DBPath   = ExtractFilePath(Application->ExeName)  "DataBase\\";
SyncPath = ExtractFilePath(Application->ExeName)  "DataBase\\Sync\\";
ImagePath= ExtractFilePath(Application->ExeName)  "Image\\";
LogPath  = ExtractFilePath(Application->ExeName)  "Log\\";

這樣也就是說,AppPath 就放著程式執行的目錄,這樣路徑就不會寫死了.. 但小弟不太懂那4行code該如何運用,有誰知道該如何運用嗎?? ----------------------- 請多多指教啦!!^^

------
-----------------------
請多多指教啦!!^^

taishyang
站務副站長

發表：377
回覆：5490
積分：4563
註冊：2002-10-08

發送簡訊給我

#2 引用回覆回覆

發表時間：2003-10-23 23:54:09

IP:140.135.xxx.xxx 未訂閱

kj68215您好: 使用INI檔案的方式站上有很多搜尋一下就有了

引言: 小弟不太懂那4行code該如何運用,有誰知道該如何運用嗎??

試試改成這樣

AnsiString AppPath  = ExtractFilePath(Application->ExeName);
PC_Image->Picture->LoadFromFile(AppPath "AddPc.bmp");

順心 <>～我也是在學習的階段,回答的不好請您多多見諒與指教～

系統時間：2024-05-04 3:57:44

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！