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

關於ACCESS資料庫的圖檔超連結

尚未結案
coolming
一般會員


發表:2
回覆:1
積分:0
註冊:2009-09-26

發送簡訊給我
#1 引用回覆 回覆 發表時間:2009-11-27 19:31:20 IP:114.37.xxx.xxx 訂閱
請教各位

我用Access做了一個資料庫(ooxx.mdb)

其中一個欄位資料類型是用超連結,可以連結開啟指定位置的圖片(.JPG)

現在我用BCB中ADO標籤頁中的元件連結此資料庫

也用DataControl標籤頁中的DBGrid拉了一個表單,可以正確連結沒有問題

但超連結那個欄位卻是無效的 只顯示(MEMO)的字樣

BCB中有甚麼辦法使它有效呢? 就是使它可以開啟指定路徑的圖檔

(由於我資料庫的資料都是由BCB程式介面去新增、修改,所以這個超連結路徑也是由使用者自行做連結)

我能想到的是需要有一個Image元件、OpenPictureDialog 讓使用者選擇圖檔後 紀錄下圖檔的路徑

再用一個Button將路徑存給資料庫中那個超連結的欄位 讓以後使用者觸發那個欄位中的Cell的時候可以在Image元件中Show出圖檔

這樣想是對的嗎?只是我對語法還不甚了解

另外,OpenPictureDialog是否不支援JPG,該怎麼處理呢?

感激不盡~~~~~~~!!
GrandRURU
站務副站長


發表:235
回覆:1655
積分:1753
註冊:2005-06-21

發送簡訊給我
#2 引用回覆 回覆 發表時間:2009-12-17 20:10:56 IP:61.219.xxx.xxx 未訂閱
顯示DB圖檔的部份,可使用DBMemo來處理,但它只支援BMP檔,網路上有三方DBMemo元件提供對於JPG圖檔的存取。

OpenPictureDialog是否不支援JPG?
如何在Image裡開起網址裡的圖
请问如何用OpenPictureDialog控件来打开Jpg图片文件

以上

===================引 用 coolming 文 章===================
請教各位

我用Access做了一個資料庫(ooxx.mdb)

其中一個欄位資料類型是用超連結,可以連結開啟指定位置的圖片(.JPG)

現在我用BCB中ADO標籤頁中的元件連結此資料庫

也用DataControl標籤頁中的DBGrid拉了一個表單,可以正確連結沒有問題

但超連結那個欄位卻是無效的 只顯示(MEMO)的字樣

BCB中有甚麼辦法使它有效呢? 就是使它可以開啟指定路徑的圖檔

(由於我資料庫的資料都是由BCB程式介面去新增、修改,所以這個超連結路徑也是由使用者自行做連結)

我能想到的是需要有一個Image元件、OpenPictureDialog 讓使用者選擇圖檔後 紀錄下圖檔的路徑

再用一個Button將路徑存給資料庫中那個超連結的欄位 讓以後使用者觸發那個欄位中的Cell的時候可以在Image元件中Show出圖檔

這樣想是對的嗎?只是我對語法還不甚了解

另外,OpenPictureDialog是否不支援JPG,該怎麼處理呢?

感激不盡~~~~~~~!!
cakeboy
一般會員


發表:3
回覆:5
積分:1
註冊:2005-10-24

發送簡訊給我
#3 引用回覆 回覆 發表時間:2010-02-23 03:23:02 IP:114.46.xxx.xxx 訂閱
觀念和DELPHI是差不多的

要有image 和OpenPictureDialog

OpenPictureDialog可以使用ico bmp jpeg 把要顯示的類型在OpenPictureDialog全寫上..這樣就可以打開資料庫裡面的路徑丟給image去顯示

在image 屬性 click 加入
procedure TForm1.Image1Click(Sender: TObject);
begin
Image1.Picture.LoadFromFile(DBMemo1.Text);
end;

query的觸發 afterscroll
procedure TForm1.Query1AfterScroll(DataSet: TDataSet);
begin
If FileExists(DBMemo1.text) then
Image1.Picture.LoadFromFile(DBMemo1.text)
else
Image1.Picture := nil;
end;

存入圖檔的按鈕
procedure TForm1.Button4Click(Sender: TObject);
begin
if Not OpenPictureDialog1.Execute then Exit;
if not (Table1.State in [dsEdit,dsInsert]) then
Query1.Edit;
DBMemo1.text := OpenPictureDialog1.FileName;
Image1.Picture.LoadFromFile(DBMemo1.text);
end;

當初是VB概念引用到delphi..相同的只要把這些改成 c語言 就可以了

現在想從delphi轉到c..大家一起來學習
編輯記錄
cakeboy 重新編輯於 2010-02-23 03:26:34, 註解 無‧
cakeboy 重新編輯於 2010-02-23 03:27:24, 註解 無‧
系統時間:2017-12-15 18:02:31
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!