Текст сделать ссылкой

[puma]

Как в Делфи из колонки Грида превратить текст в ссылку, чтобы можно было открыть веб-страницу?

Подскажите, кто знает?

[superedward]

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

Как в Делфи из колонки Грида превратить текст в ссылку, чтобы можно было открыть веб-страницу?

Подскажите, кто знает?

Обработать OnMouseMove & OnMouseClick

[puma]

а примерчик можно для наглядности? плиз..

[superedward]

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

а примерчик можно для наглядности? плиз..

в обработчике Grid.OnMouseMove

 var sURL: string;
 //sURL равен содержимому ячейки в гриде
 bIsURL:=(Pos('http://',sURL)>0)or(Pos('https://',sURL)>0);
 if bIsURL then Grid.Cursors:=crHandPoint
else Grid.Cursor:=crDefault;

в обработчике Grid.OnClick

 var sURL: string;
 //sURL равен содержимому ячейки в гриде
 if Grid.Cursor=crHandPoint then  ShellExecute(Application.Handle,'Open',PChar(sURL),'','',SW_SHOW);