Отобразить гиперссылку из поля БД в Delphi

[Люсьен]

Есть у меня база данных в Access и в одной из таблиц поле Ссылка-гиперссылка на документ различного типа (.doc, .ppd и прочее).
Я подключаю в Делфи эту БД, с помощью компонентов TADOQuery, DataSourse, данные хочу отобразить в DBGrid. И по идее должна получиться табличка, где есть название документа и ссылка на него, нажимаю на ссылку и открывается документ.
Но гиперссылка не отображается, пишет просто (MEMO), вообще возможно ли так сделать и как?
пробовола сделать через компонент DBMemo, не получается.
Может вставить эти документы как OLE объекты в ассеss, если так, то с помощью какого компонента можно их отобразить в делфи.
Очень нужна помощь!

[Yurk@]

1. Можно вставить как ОЛЕ обьект
2. А можно сохранить адресс в виде String-ового поля и потом открывать с помощью ShellExecute

[Люсьен]

1. Вставить как ОЛЕ обьект с помощью компонента OLEContainer?
Как его подключить к БД?

[Gulik]

нет не OLEContainer, модуль ComObj, используется для работы с MS Office

Вот небольшой код для EXCEL тут есть все что тебе нужно для загрузки нужного документа и эго отображения

uses ... ComObj, ...


procedure TForm1.BtnExportClick(Sender: TObject);
var
 XL, XArr: Variant;
begin
 XL:=CreateOLEObject('Excel.Application');     // Создание OLE объекта
 XL.WorkBooks.add;

    // Открытие существующей книги (где path - путь к фалу с расширением xls.):
    // XL.Workbooks.Open[path];

 XL.visible:=true;
end;

Excel меняй на Word принеобходимости

[Люсьен]

Спасибо, попробую.
Слушайте, а что в простом Гриде не может отобразиться гиперссылка на документ, если такое поле есть в таблице БД? Неужели он не может мне его просто вытащить из базы и показать?

[Люсьен]

Они не все одного типа, есть и Wordовские и Excelевские файлы...

[Gulik]

Можешь сделать процедуру. При двайном щелчке на гриде из поля строки по которой ты щелкнул будет браться путь к файлу и загружаться документ.
А порасширению файла можно определить какую процедуру будешь использовать. (для загрузки Word или Excel)

[Люсьен]

Сделала такую вещь:
в базе написала путь к файлу, а в Делфи добавила следующий код:

procedure TForm1.DBGrid1CellClick(Column: TColumn);
var s:string;
begin
s:=AdoQuery1.FieldValues['Reference'];
ShellExecute(Handle,nil,pchar(s),'' ,'',SW_SHOWNORMAL);
end;

Все работает, открываются все приложения, вот только теперь некрасиво ссылка выглядит, весь путь к файлу виден.
Теперь будем бороться за красоту...

[Pilyla]

а как быть,если гиперссылка представляет собой адрес страницы в интеренете?