線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:5637
推到 Plurk!
推到 Facebook!

請問BCB高手,怎麼秀出開啟檔案跟另存檔案??

尚未結案
kingofwind
一般會員


發表:2
回覆:3
積分:1
註冊:2005-04-21

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-04-22 02:13:28 IP:218.172.xxx.xxx 未訂閱
請問怎麼秀出開啟圖片檔案跟另存檔案的程式 我是新手,雖然爬了很多文章但還是看不懂 ˊˋ
terence_lee
初階會員


發表:62
回覆:82
積分:28
註冊:2004-07-15

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-04-22 08:54:47 IP:61.221.xxx.xxx 未訂閱
kingofwind 你好, 要秀出開啟圖片檔案請用" Dialogs" paltte 的openPictureDialog元件 用法如下: if(openPictureDialog1->Execute()) { //會得到openPictureDialog1->->FileName 就是檔案完整的路徑 //選擇圖片時,右方會有預覽視窗 } 要秀出另存檔案請用" Dialogs" paltte 的saveDialog元件 用法如下: if(saveDialog1->Execute()) { //SveDlg1->FileName 會得到另存檔案的路徑 //.....要做的事情 } 所以無論是開啟圖片檔案或是另存檔案最後都會得到一個檔案路徑 例如: c:\aaa\ya.jpg ,若你真的要存成檔案,還要自己寫檔案複製的 功能或是讀取檔案的功能,就是我寫的"要做的事情" 還有這兩個元件都有一些選項可以設定,你可以看看屬性options裡面 相關細部設定
kingofwind
一般會員


發表:2
回覆:3
積分:1
註冊:2005-04-21

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-04-23 00:03:54 IP:218.172.xxx.xxx 未訂閱
謝謝 請問我想利用 Button和 image 作出開啟圖片跟另存檔案 要怎麼做??
bala0514
一般會員


發表:42
回覆:37
積分:15
註冊:2004-07-26

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-04-25 00:39:10 IP:220.139.xxx.xxx 未訂閱
引言: 謝謝 請問我想利用 Button和 image 作出開啟圖片跟另存檔案 要怎麼做??
妳試試以下的程式碼吧!
void __fastcall TForm1::Open1Click(TObject *Sender)
{
if(OpenDialog1->Execute())
{
Graphics::TBitmap* BMP = new Graphics::TBitmap();
BMP->PixelFormat = pf24bit;
BMP->LoadFromFile(OpenDialog1->FileName);
Image1->Picture->Assign(BMP);
}
//----
void __fastcall TForm1::Save1Click(TObject *Sender)
{
if (Image1->Picture->Bitmap->Empty==true)
  ShowMessage("沒有可以存檔的畫面喔!!");
 else
  if (SavePictureDialog1->Execute())
   Image1->Picture->SaveToFile(SavePictureDialog1->FileName);
}
//-----
***程式語言真是一門高深的學問***
------
***程式語言真是一門高深的學問***
系統時間:2024-05-13 7:14:58
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!