請教各位先進 如何刪除ListBox裡的項目 (滑鼠點選 在點擊刪除按扭) |
|
答題得分者是：s92405054
|
|
nba2005mt
一般會員   發表：5 回覆：9 積分：2 註冊：2012-09-03 發送簡訊給我 |
請教各位先進
我製作了兩個按鈕 開啟檔案 刪除檔案 檔案開啟 檔案名稱會顯示在ListBox裡面 刪除檔案時 可以用滑鼠點選 再按下刪除按鈕刪除 該如何做呢? 以下是 開啟檔案的 程式碼 void __fastcall TForm1::Button1Click(TObject *Sender) { AnsiString Name; OpenDialog1->Filter = "CNC files (*.cnc)"; if(OpenDialog1->Execute()) { RichEdit1->Lines->LoadFromFile( OpenDialog1->FileName ); FileName = OpenDialog1->FileName; AnsiString FileName = ChangeFileExt(ExtractFileName(OpenDialog1->FileName), ""); ListBox1->Items->Add(FileName); } }
另外 再請教個問題 一樣滑鼠點選 ListBox 裡面的Item(其中之一) 在設一個按鈕 讓檔案內容顯示在RichEdit裡面呢? 編輯記錄
nba2005mt 重新編輯於 2012-09-25 02:53:06， 註解 無‧
|
|
s92405054
高階會員  發表：7 回覆：49 積分：101 註冊：2009-04-07 發送簡訊給我 |
ListBox1->Items->Delete(ListBox1->ItemIndex);
===================引 用 nba2005mt 文 章=================== 請教各位先進 我製作了兩個按鈕 開啟檔案 刪除檔案 檔案開啟 檔案名稱會顯示在ListBox裡面 刪除檔案時 可以用滑鼠點選 再按下刪除按鈕刪除 該如何做呢? 以下是 開啟檔案的 程式碼 void __fastcall TForm1::Button1Click(TObject *Sender) { AnsiString Name; OpenDialog1->Filter = "CNC files (*.cnc)"; if(OpenDialog1->Execute()) { RichEdit1->Lines->LoadFromFile( OpenDialog1->FileName ); FileName = OpenDialog1->FileName; AnsiString FileName = ChangeFileExt(ExtractFileName(OpenDialog1->FileName), ""); ListBox1->Items->Add(FileName); } }
另外 再請教個問題 一樣滑鼠點選 ListBox 裡面的Item(其中之一) 在設一個按鈕 讓檔案內容顯示在RichEdit裡面呢? |
發表時間：2012-09-25 16:44:39
IP:125.224.xxx.xxx 訂閱
系統時間：2024-04-27 12:42:16
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |