DBGridEh вопросик

[Spyhunter1983]

Добрый день. Подскажите как сделать ссылку на сайт, что по клику переходить на сайт? Использую БД Oracle текст сохраняю как varchar2. Использую Ehlib 4.

[Gulik]

в Uses добавь модуль ShellAPI

procedure TForm1.DBGridEh1CellClick(Column: TColumnEh);
   var
      Site : String ;
begin
   Site := ADOTable1.FieldByName('Name').AsString ;
   if pos('http://', Site) > 0 then
      ShellExecute(Form1.Handle, nil, 'http://programmersforum.ru/', nil, nil, SW_RESTORE) ;
end;