Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/Giko.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 19 |
{HintWindow,} GikoCoolBar, GikoListView, Search, ExternalBoardManager, |
{HintWindow,} GikoCoolBar, GikoListView, Search, ExternalBoardManager, |
| 20 |
ExternalBoardPlugInMain, StdActns, Variants, ExtActns,IdTCPConnection, |
ExternalBoardPlugInMain, StdActns, Variants, ExtActns,IdTCPConnection, |
| 21 |
IdBaseComponent, IdTCPClient, AppEvnts, BrowserRecord, MoveHistoryItem, |
IdBaseComponent, IdTCPClient, AppEvnts, BrowserRecord, MoveHistoryItem, |
| 22 |
ShellAPI,Preview, HistoryList, ResPopupBrowser; |
ShellAPI,Preview, HistoryList, ResPopupBrowser, ExtPreviewDatamodule; |
| 23 |
|
|
| 24 |
const |
const |
| 25 |
NGWORDNAME_PANEL = 3; |
NGWORDNAME_PANEL = 3; |
| 1992 |
|
|
| 1993 |
//file:///C:/Borland/Projects/gikoNavi/test/read.cgi/qa/990576336/10 |
//file:///C:/Borland/Projects/gikoNavi/test/read.cgi/qa/990576336/10 |
| 1994 |
//file:///C:/Borland/Projects/gikoNavi/test/read.cgi/qa/990576336/10-15 |
//file:///C:/Borland/Projects/gikoNavi/test/read.cgi/qa/990576336/10-15 |
| 1995 |
|
// 他のアプリで処理するURLか確認 |
| 1996 |
|
if (ExtPreviewDM.PreviewURL(Text2)) then begin |
| 1997 |
|
Exit; |
| 1998 |
|
end; |
| 1999 |
s := ''; |
s := ''; |
| 2000 |
Ext := AnsiLowerCase(ExtractFileExt(Text2)); |
Ext := AnsiLowerCase(ExtractFileExt(Text2)); |
| 2001 |
if (Pos('http://', Text2) = 1) and (GikoSys.Setting.PreviewVisible) and |
if (Pos('http://', Text2) = 1) and (GikoSys.Setting.PreviewVisible) and |
|
|
Legend:
| Removed from v.1.662 |
|
| changed lines |
| |
Added in v.1.663 |
|
|
| |