[s-mail]

Всем привет! проблема такова, у меня есть БД на акцессе, там поле с гиперссылкой на документ, причём в ней всё работает, док открывается, но когда пытаюсь запустить проект в делфи,в этом поле пишется (WideMemo)..как сделать так чтобы и при выполнении ссылка была доступна? Помогите пожалуйста!
PS: Таблица 1, связывал по ADO. добавляет, редактирует записи, поиск сделал...а ссылка не пашет(((

[WildChild]

немного не то что тебе надо наверно, но может поможет:
Используй тип данных для поля "Поле объекта OLE" в это поле ты сможешь сохранять фаилы, а потом их брать от туда. Если интересномогу написать код.

[s-mail]

Сообщение от WildChild

немного не то что тебе надо наверно, но может поможет:
Используй тип данных для поля "Поле объекта OLE" в это поле ты сможешь сохранять фаилы, а потом их брать от туда. Если интересномогу написать код.

хм, в первый раз с ним сталкиваюсь...буду премного благодарен!

[WildChild]

создаёшь поле в своей таблице с типом данных "Поле объекта OLE".
кидаешь на форму опендиалог

Код:

if opendialog1.Execute then
  begin
   TTable.Edit;
   TTabledoc.LoadFromFile(OpenDialog1.FileName);
   
   ttable.Post;
  end;

где ttable - таблица, doc название поля с типом данных "Поле объекта OLE".


правда не знаю можно ли его открыть на прямую из базы.... я его сохраняю и дальше уже обращаюсь к нему.
сохранять так:

Код:

ttabledoc.savetofile(имя файла);

надеюсь доступно описал. если что непонятно задавай вопросы, не стесняйся

[s-mail]

первое. куда писать код

Код:

if opendialog1.Execute then
begin
TTable.Edit;
TTabledoc.LoadFromFile(OpenDialog1.FileName);

ttable.Post;
end;

"
второе.открывает его в вёрде?
ну и третье)) СПасибо и на этом!

[WildChild]

тебе надо на форму закинуть dbgrid и подключить её к таблице твой базы.
потом закидываешь на форму opendialog и button на действие button onclick
пишишь:

Код:

if opendialog1.Execute then
  begin
  TTable.Edit;
   TTabledoc.LoadFromFile(OpenDialog1.FileName);
   
   ttable.Post;
end;

а чтобы открыть можно то же кнопку создать и действие onclick в

Код:

  var
  WordApp: OLEVariant;
 begin
     TTabledoc.SaveToFile(имя документа);
    WordApp := CreateOleObject('Word.Application');
     WordApp.Visible := True;
     WordApp.Documents.Open(имя документа); 
 end;

это пример для документа ворд.

[s-mail]

Что то не получается, проблема с именем таблицы, ввожу как есть, а почему то ругается...сцуко. А между TTable и doc нет точки "."?? туплюююю уже

[WildChild]

ttable это я для примера назвал это должен быть объект типа TADOTable
а как ты её назовешь это уже твоё дело. Точки там не должно быть.
p.s. в книжке "Библия Делфи" автор Михаил Фленов есть четкое описание в главе про базы данных.

[s-mail]

Спасибо большое за попытку помочь, но не сработало, пришлось изменить проект и вышло даже лучше прошлой задумки) тема закрыта.