mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-16 20:49:30 +02:00
made THelpDatabase and THelpViewer a component
git-svn-id: trunk@9279 -
This commit is contained in:
mattias
parent
988f29ba13
commit
b14b7825dc
@ -4,46 +4,11 @@
|
||||
<PathDelim Value="/"/>
|
||||
<Version Value="5"/>
|
||||
<General>
|
||||
<SessionStorage Value="InProjectDir"/>
|
||||
<MainUnit Value="0"/>
|
||||
<IconPath Value="./"/>
|
||||
<TargetFileExt Value=""/>
|
||||
<ActiveEditorIndexAtStart Value="0"/>
|
||||
</General>
|
||||
<LazDoc Paths=""/>
|
||||
<Units Count="4">
|
||||
<Unit0>
|
||||
<Filename Value="project1.lpr"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<UnitName Value="project1"/>
|
||||
<UsageCount Value="22"/>
|
||||
</Unit0>
|
||||
<Unit1>
|
||||
<CursorPos X="67" Y="37"/>
|
||||
<EditorIndex Value="0"/>
|
||||
<Filename Value="unit1.pas"/>
|
||||
<ComponentName Value="Form1"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<Loaded Value="True"/>
|
||||
<ResourceFilename Value="unit1.lrs"/>
|
||||
<TopLine Value="13"/>
|
||||
<UnitName Value="Unit1"/>
|
||||
<UsageCount Value="22"/>
|
||||
</Unit1>
|
||||
<Unit2>
|
||||
<CursorPos X="26" Y="66"/>
|
||||
<Filename Value="/home/andrew/lazfpc/projects/help/lhelp/lhelpcontrol.pas"/>
|
||||
<TopLine Value="61"/>
|
||||
<UnitName Value="LHelpControl"/>
|
||||
<UsageCount Value="11"/>
|
||||
</Unit2>
|
||||
<Unit3>
|
||||
<CursorPos X="3" Y="40"/>
|
||||
<Filename Value="/home/andrew/lazfpc/fpc/fcl/inc/process.pp"/>
|
||||
<TopLine Value="24"/>
|
||||
<UnitName Value="process"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit3>
|
||||
</Units>
|
||||
<PublishOptions>
|
||||
<Version Value="2"/>
|
||||
<IgnoreBinaries Value="False"/>
|
||||
@ -62,7 +27,20 @@
|
||||
<PackageName Value="LCL"/>
|
||||
</Item1>
|
||||
</RequiredPackages>
|
||||
<JumpHistory Count="0" HistoryIndex="-1"/>
|
||||
<Units Count="2">
|
||||
<Unit0>
|
||||
<Filename Value="project1.lpr"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<UnitName Value="project1"/>
|
||||
</Unit0>
|
||||
<Unit1>
|
||||
<Filename Value="unit1.pas"/>
|
||||
<ComponentName Value="Form1"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<ResourceFilename Value="unit1.lrs"/>
|
||||
<UnitName Value="Unit1"/>
|
||||
</Unit1>
|
||||
</Units>
|
||||
</ProjectOptions>
|
||||
<CompilerOptions>
|
||||
<Version Value="5"/>
|
||||
@ -84,12 +62,4 @@
|
||||
<CompilerPath Value="$(CompPath)"/>
|
||||
</Other>
|
||||
</CompilerOptions>
|
||||
<Debugging>
|
||||
<BreakPoints Count="1">
|
||||
<Item1>
|
||||
<Source Value="/home/andrew/lazfpc/lazarus/lcl/interfaces/gtk2/gtk2object.inc"/>
|
||||
<Line Value="857"/>
|
||||
</Item1>
|
||||
</BreakPoints>
|
||||
</Debugging>
|
||||
</CONFIG>
|
||||
|
||||
@ -1,5 +1,3 @@
|
||||
{ This is an automatically generated lazarus resource file }
|
||||
|
||||
LazarusResources.Add('TForm1','FORMDATA',[
|
||||
'TPF0'#6'TForm1'#5'Form1'#13'ActiveControl'#7#7'Button1'#7'Caption'#6#5'Form1'
|
||||
+#12'ClientHeight'#3','#1#11'ClientWidth'#3#144#1#8'OnCreate'#7#10'FormCreate'
|
||||
|
||||
@ -36,7 +36,6 @@ begin
|
||||
if not OpenDialog1.Execute then exit;
|
||||
Help.StartHelpServer('letstestagain', '../lhelp/lhelp --display=192.168.0.250:0');
|
||||
Help.OpenFile(OpenDialog1.FileName);
|
||||
|
||||
end;
|
||||
|
||||
procedure TForm1.FormCreate(Sender: TObject);
|
||||
|
||||
@ -1,5 +1,3 @@
|
||||
{ This is an automatically generated lazarus resource file }
|
||||
|
||||
LazarusResources.Add('THelpPopupForm','FORMDATA',[
|
||||
'TPF0'#14'THelpPopupForm'#13'HelpPopupForm'#7'Caption'#6#13'HelpPopupForm'#12
|
||||
+'ClientHeight'#3'9'#1#11'ClientWidth'#3#200#0#13'PixelsPerInch'#2'Z'#8'Posit'
|
||||
|
||||
@ -4,563 +4,11 @@
|
||||
<PathDelim Value="/"/>
|
||||
<Version Value="5"/>
|
||||
<General>
|
||||
<Flags>
|
||||
<AlwaysBuild Value="True"/>
|
||||
</Flags>
|
||||
<SessionStorage Value="InProjectDir"/>
|
||||
<MainUnit Value="0"/>
|
||||
<IconPath Value="./"/>
|
||||
<TargetFileExt Value=""/>
|
||||
<ActiveEditorIndexAtStart Value="0"/>
|
||||
</General>
|
||||
<LazDoc Paths=""/>
|
||||
<Units Count="78">
|
||||
<Unit0>
|
||||
<CursorPos X="18" Y="46"/>
|
||||
<Filename Value="lhelp.lpr"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<TopLine Value="3"/>
|
||||
<UnitName Value="lhelp"/>
|
||||
<UsageCount Value="201"/>
|
||||
</Unit0>
|
||||
<Unit1>
|
||||
<CursorPos X="49" Y="80"/>
|
||||
<Filename Value="unit1.pas"/>
|
||||
<ComponentName Value="HelpForm"/>
|
||||
<ResourceFilename Value="unit1.lrs"/>
|
||||
<TopLine Value="59"/>
|
||||
<UnitName Value="unit1"/>
|
||||
<UsageCount Value="201"/>
|
||||
</Unit1>
|
||||
<Unit2>
|
||||
<CursorPos X="9" Y="674"/>
|
||||
<Filename Value="/home/andrew/programming/projects/components/help/chmfile.pas"/>
|
||||
<TopLine Value="514"/>
|
||||
<UnitName Value="chmfile"/>
|
||||
<UsageCount Value="80"/>
|
||||
</Unit2>
|
||||
<Unit3>
|
||||
<CursorPos X="33" Y="98"/>
|
||||
<Filename Value="/home/andrew/programming/projects/components/help/chm_lib.pp"/>
|
||||
<TopLine Value="40"/>
|
||||
<UnitName Value="chm_lib"/>
|
||||
<UsageCount Value="73"/>
|
||||
</Unit3>
|
||||
<Unit4>
|
||||
<CursorPos X="10" Y="94"/>
|
||||
<Filename Value="/home/andrew/programming/fpc/rtl/inc/heaph.inc"/>
|
||||
<TopLine Value="67"/>
|
||||
<UsageCount Value="68"/>
|
||||
</Unit4>
|
||||
<Unit5>
|
||||
<CursorPos X="15" Y="1929"/>
|
||||
<Filename Value="/home/andrew/source/chmlib-0.37/src/chm_lib.c"/>
|
||||
<SyntaxHighlighter Value="C++"/>
|
||||
<TopLine Value="1734"/>
|
||||
<UsageCount Value="66"/>
|
||||
</Unit5>
|
||||
<Unit6>
|
||||
<CursorPos X="30" Y="102"/>
|
||||
<Filename Value="/home/andrew/source/chmlib-0.37/src/chm_lib.h"/>
|
||||
<SyntaxHighlighter Value="C++"/>
|
||||
<TopLine Value="103"/>
|
||||
<UsageCount Value="53"/>
|
||||
</Unit6>
|
||||
<Unit7>
|
||||
<CursorPos X="55" Y="791"/>
|
||||
<Filename Value="/home/andrew/source/xchm-1.0/src/chmfile.cpp"/>
|
||||
<SyntaxHighlighter Value="C++"/>
|
||||
<TopLine Value="656"/>
|
||||
<UsageCount Value="41"/>
|
||||
</Unit7>
|
||||
<Unit8>
|
||||
<CursorPos X="23" Y="1839"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/trunk/lcl/lclproc.pas"/>
|
||||
<TopLine Value="1832"/>
|
||||
<UnitName Value="LCLProc"/>
|
||||
<UsageCount Value="45"/>
|
||||
</Unit8>
|
||||
<Unit9>
|
||||
<CursorPos X="11" Y="29"/>
|
||||
<Filename Value="/home/andrew/programming/fpc/rtl/inc/wstringh.inc"/>
|
||||
<TopLine Value="12"/>
|
||||
<UsageCount Value="14"/>
|
||||
</Unit9>
|
||||
<Unit10>
|
||||
<CursorPos X="21" Y="138"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/trunk/lcl/interfaces/gtk/gtkint.pp"/>
|
||||
<TopLine Value="118"/>
|
||||
<UnitName Value="GtkInt"/>
|
||||
<UsageCount Value="13"/>
|
||||
</Unit10>
|
||||
<Unit11>
|
||||
<CursorPos X="1" Y="1504"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/trunk/lcl/interfaces/gtk/gtkobject.inc"/>
|
||||
<TopLine Value="1487"/>
|
||||
<UsageCount Value="13"/>
|
||||
</Unit11>
|
||||
<Unit12>
|
||||
<CursorPos X="11" Y="488"/>
|
||||
<Filename Value="/home/andrew/programming/fpc/rtl/inc/systemh.inc"/>
|
||||
<TopLine Value="471"/>
|
||||
<UsageCount Value="3"/>
|
||||
</Unit12>
|
||||
<Unit13>
|
||||
<CursorPos X="19" Y="1780"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/trunk/lcl/include/control.inc"/>
|
||||
<TopLine Value="1763"/>
|
||||
<UsageCount Value="21"/>
|
||||
</Unit13>
|
||||
<Unit14>
|
||||
<CursorPos X="29" Y="2420"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/trunk/components/turbopower_ipro/iphtml.pas"/>
|
||||
<TopLine Value="2402"/>
|
||||
<UnitName Value="IpHtml"/>
|
||||
<UsageCount Value="25"/>
|
||||
</Unit14>
|
||||
<Unit15>
|
||||
<CursorPos X="3" Y="239"/>
|
||||
<Filename Value="chmdataprovider.pas"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<TopLine Value="200"/>
|
||||
<UnitName Value="ChmDataProvider"/>
|
||||
<UsageCount Value="208"/>
|
||||
</Unit15>
|
||||
<Unit16>
|
||||
<CursorPos X="3" Y="1704"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/trunk/components/turbopower_ipro/iputils.pas"/>
|
||||
<TopLine Value="1668"/>
|
||||
<UnitName Value="IpUtils"/>
|
||||
<UsageCount Value="8"/>
|
||||
</Unit16>
|
||||
<Unit17>
|
||||
<CursorPos X="26" Y="21"/>
|
||||
<Filename Value="/home/andrew/programming/fpc/fcl/image/imgconv.pp"/>
|
||||
<TopLine Value="18"/>
|
||||
<UnitName Value="ImgConv"/>
|
||||
<UsageCount Value="8"/>
|
||||
</Unit17>
|
||||
<Unit18>
|
||||
<CursorPos X="26" Y="7"/>
|
||||
<Filename Value="chmspecialparser.pas"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="ChmSpecialParser"/>
|
||||
<UsageCount Value="203"/>
|
||||
</Unit18>
|
||||
<Unit19>
|
||||
<CursorPos X="35" Y="13"/>
|
||||
<Filename Value="/tmp/index.txt"/>
|
||||
<SyntaxHighlighter Value="None"/>
|
||||
<TopLine Value="1"/>
|
||||
<UsageCount Value="5"/>
|
||||
</Unit19>
|
||||
<Unit20>
|
||||
<CursorPos X="46" Y="1"/>
|
||||
<Filename Value="lhelpcontrol.pas"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="LHelpControl"/>
|
||||
<UsageCount Value="191"/>
|
||||
</Unit20>
|
||||
<Unit21>
|
||||
<CursorPos X="14" Y="181"/>
|
||||
<Filename Value="/home/andrew/lazfpc/fpc/rtl/objpas/classes/classesh.inc"/>
|
||||
<TopLine Value="166"/>
|
||||
<UsageCount Value="2"/>
|
||||
</Unit21>
|
||||
<Unit22>
|
||||
<CursorPos X="3" Y="496"/>
|
||||
<Filename Value="/home/andrew/lazfpc/projects/help/chmfile.pas"/>
|
||||
<TopLine Value="606"/>
|
||||
<UnitName Value="chmfile"/>
|
||||
<UsageCount Value="5"/>
|
||||
</Unit22>
|
||||
<Unit23>
|
||||
<CursorPos X="1" Y="2640"/>
|
||||
<Filename Value="/home/andrew/lazfpc/lazarus/components/turbopower_ipro/iphtml.pas"/>
|
||||
<TopLine Value="2611"/>
|
||||
<UnitName Value="IpHtml"/>
|
||||
<UsageCount Value="4"/>
|
||||
</Unit23>
|
||||
<Unit24>
|
||||
<CursorPos X="21" Y="311"/>
|
||||
<Filename Value="/home/andrew/lazfpc/fpc/rtl/objpas/classes/collect.inc"/>
|
||||
<TopLine Value="296"/>
|
||||
<UsageCount Value="2"/>
|
||||
</Unit24>
|
||||
<Unit25>
|
||||
<CursorPos X="3" Y="1222"/>
|
||||
<Filename Value="/home/andrew/lazfpc/lazarus/lcl/forms.pp"/>
|
||||
<TopLine Value="1198"/>
|
||||
<UnitName Value="Forms"/>
|
||||
<UsageCount Value="5"/>
|
||||
</Unit25>
|
||||
<Unit26>
|
||||
<CursorPos X="10" Y="107"/>
|
||||
<Filename Value="/home/andrew/lazfpc/fpc/rtl/objpas/sysutils/sysstrh.inc"/>
|
||||
<TopLine Value="92"/>
|
||||
<UsageCount Value="5"/>
|
||||
</Unit26>
|
||||
<Unit27>
|
||||
<CursorPos X="11" Y="373"/>
|
||||
<Filename Value="/home/andrew/lazfpc/fpc/rtl/inc/systemh.inc"/>
|
||||
<TopLine Value="358"/>
|
||||
<UsageCount Value="5"/>
|
||||
</Unit27>
|
||||
<Unit28>
|
||||
<CursorPos X="65" Y="129"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/trunk/lcl/interfaces/gtk/gtkmemostrings.inc"/>
|
||||
<TopLine Value="111"/>
|
||||
<UsageCount Value="5"/>
|
||||
</Unit28>
|
||||
<Unit29>
|
||||
<CursorPos X="56" Y="16186"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/components/turbopower_ipro/iphtml.pas"/>
|
||||
<TopLine Value="16162"/>
|
||||
<UnitName Value="IpHtml"/>
|
||||
<UsageCount Value="69"/>
|
||||
<Bookmarks Count="2">
|
||||
<Item0 X="2" Y="17445" ID="0"/>
|
||||
<Item1 X="17" Y="3843" ID="3"/>
|
||||
</Bookmarks>
|
||||
</Unit29>
|
||||
<Unit30>
|
||||
<CursorPos X="8" Y="6"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/include/control.inc"/>
|
||||
<TopLine Value="1"/>
|
||||
<UsageCount Value="7"/>
|
||||
</Unit30>
|
||||
<Unit31>
|
||||
<CursorPos X="8" Y="6"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/interfaces/gtk/gtkcallback.inc"/>
|
||||
<TopLine Value="1"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit31>
|
||||
<Unit32>
|
||||
<CursorPos X="8" Y="6"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/controls.pp"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="Controls"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit32>
|
||||
<Unit33>
|
||||
<CursorPos X="5" Y="16"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/forms.pp"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="Forms"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit33>
|
||||
<Unit34>
|
||||
<CursorPos X="8" Y="6"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/interfaces/gtk2/gtk2wscustomlistview.inc"/>
|
||||
<TopLine Value="1"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit34>
|
||||
<Unit35>
|
||||
<CursorPos X="8" Y="6"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/interfaces/gtk2/gtk2wscomctrls.pp"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="Gtk2WSComCtrls"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit35>
|
||||
<Unit36>
|
||||
<CursorPos X="8" Y="6"/>
|
||||
<Filename Value="/home/andrew/programming/fpc/packages/extra/gtk2/gtk+/gtk/gtkenums.inc"/>
|
||||
<TopLine Value="1"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit36>
|
||||
<Unit37>
|
||||
<CursorPos X="8" Y="6"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/ide/main.pp"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="Main"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit37>
|
||||
<Unit38>
|
||||
<CursorPos X="13" Y="62"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/components/turbopower_ipro/ipanim.pas"/>
|
||||
<TopLine Value="24"/>
|
||||
<UnitName Value="IpAnim"/>
|
||||
<UsageCount Value="18"/>
|
||||
</Unit38>
|
||||
<Unit39>
|
||||
<CursorPos X="42" Y="8"/>
|
||||
<Filename Value="/home/andrew/programming/projects/components/paschm/chmreader.pas"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="chmreader"/>
|
||||
<UsageCount Value="24"/>
|
||||
</Unit39>
|
||||
<Unit40>
|
||||
<CursorPos X="3" Y="154"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/components/turbopower_ipro/iputils.pas"/>
|
||||
<TopLine Value="131"/>
|
||||
<UnitName Value="IpUtils"/>
|
||||
<UsageCount Value="32"/>
|
||||
</Unit40>
|
||||
<Unit41>
|
||||
<CursorPos X="43" Y="1"/>
|
||||
<Filename Value="chmpopup.pas"/>
|
||||
<ComponentName Value="HelpPopupForm"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<ResourceFilename Value="chmpopup.lrs"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="ChmPopup"/>
|
||||
<UsageCount Value="178"/>
|
||||
</Unit41>
|
||||
<Unit42>
|
||||
<CursorPos X="12" Y="130"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/interfaces/carbon/carbonint.pas"/>
|
||||
<TopLine Value="96"/>
|
||||
<UnitName Value="CarbonInt"/>
|
||||
<UsageCount Value="5"/>
|
||||
</Unit42>
|
||||
<Unit43>
|
||||
<CursorPos X="2" Y="333"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/interfaces/carbon/carbonwsstdctrls.pp"/>
|
||||
<TopLine Value="408"/>
|
||||
<UnitName Value="CarbonWSStdCtrls"/>
|
||||
<UsageCount Value="5"/>
|
||||
</Unit43>
|
||||
<Unit44>
|
||||
<CursorPos X="1" Y="1"/>
|
||||
<Filename Value="/home/andrew/programming/projects/components/paschm/chmbase.pas"/>
|
||||
<TopLine Value="48"/>
|
||||
<UnitName Value="chmbase"/>
|
||||
<UsageCount Value="2"/>
|
||||
</Unit44>
|
||||
<Unit45>
|
||||
<CursorPos X="20" Y="641"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/lcltype.pp"/>
|
||||
<TopLine Value="666"/>
|
||||
<UnitName Value="LCLType"/>
|
||||
<UsageCount Value="8"/>
|
||||
</Unit45>
|
||||
<Unit46>
|
||||
<CursorPos X="1" Y="1116"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/include/winapi.inc"/>
|
||||
<TopLine Value="1091"/>
|
||||
<UsageCount Value="9"/>
|
||||
</Unit46>
|
||||
<Unit47>
|
||||
<CursorPos X="13" Y="2694"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/interfaces/win32/win32winapi.inc"/>
|
||||
<TopLine Value="2664"/>
|
||||
<UsageCount Value="8"/>
|
||||
</Unit47>
|
||||
<Unit48>
|
||||
<CursorPos X="3" Y="172"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/ide/helpoptions.pas"/>
|
||||
<ComponentName Value="HelpOptionsDialog"/>
|
||||
<HasResources Value="True"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="HelpOptions"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit48>
|
||||
<Unit49>
|
||||
<CursorPos X="14" Y="412"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/ide/helpmanager.pas"/>
|
||||
<TopLine Value="389"/>
|
||||
<UnitName Value="HelpManager"/>
|
||||
<UsageCount Value="18"/>
|
||||
</Unit49>
|
||||
<Unit50>
|
||||
<CursorPos X="29" Y="1892"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/ideintf/helpintf.pas"/>
|
||||
<TopLine Value="1864"/>
|
||||
<UnitName Value="HelpIntf"/>
|
||||
<UsageCount Value="12"/>
|
||||
</Unit50>
|
||||
<Unit51>
|
||||
<CursorPos X="3" Y="221"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/ideintf/helphtml.pas"/>
|
||||
<TopLine Value="219"/>
|
||||
<UnitName Value="HelpHTML"/>
|
||||
<UsageCount Value="18"/>
|
||||
</Unit51>
|
||||
<Unit52>
|
||||
<CursorPos X="38" Y="123"/>
|
||||
<Filename Value="lazchmhelp.pas"/>
|
||||
<TopLine Value="89"/>
|
||||
<UnitName Value="LazChmHelp"/>
|
||||
<UsageCount Value="33"/>
|
||||
</Unit52>
|
||||
<Unit53>
|
||||
<CursorPos X="3" Y="30"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/ideintf/configstorage.pas"/>
|
||||
<TopLine Value="7"/>
|
||||
<UnitName Value="ConfigStorage"/>
|
||||
<UsageCount Value="11"/>
|
||||
</Unit53>
|
||||
<Unit54>
|
||||
<CursorPos X="14" Y="4808"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/ideintf/propedits.pp"/>
|
||||
<TopLine Value="4806"/>
|
||||
<UnitName Value="PropEdits"/>
|
||||
<UsageCount Value="15"/>
|
||||
</Unit54>
|
||||
<Unit55>
|
||||
<CursorPos X="18" Y="17"/>
|
||||
<Filename Value="chmhelppkg.pas"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="ChmHelpPkg"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit55>
|
||||
<Unit56>
|
||||
<CursorPos X="35" Y="208"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/ideintf/objinspstrconsts.pas"/>
|
||||
<TopLine Value="212"/>
|
||||
<UnitName Value="ObjInspStrConsts"/>
|
||||
<UsageCount Value="15"/>
|
||||
</Unit56>
|
||||
<Unit57>
|
||||
<CursorPos X="21" Y="2958"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/components/codetools/definetemplates.pas"/>
|
||||
<TopLine Value="2952"/>
|
||||
<UnitName Value="DefineTemplates"/>
|
||||
<UsageCount Value="9"/>
|
||||
</Unit57>
|
||||
<Unit58>
|
||||
<CursorPos X="48" Y="559"/>
|
||||
<Filename Value="/home/andrew/programming/fpc/rtl/objpas/classes/classesh.inc"/>
|
||||
<TopLine Value="536"/>
|
||||
<UsageCount Value="15"/>
|
||||
</Unit58>
|
||||
<Unit59>
|
||||
<CursorPos X="12" Y="39"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/components/turbopower_ipro/ipconst.pas"/>
|
||||
<TopLine Value="14"/>
|
||||
<UnitName Value="IpConst"/>
|
||||
<UsageCount Value="1"/>
|
||||
</Unit59>
|
||||
<Unit60>
|
||||
<CursorPos X="1" Y="1"/>
|
||||
<Filename Value="/home/andrew/programming/projects/components/paschm/paslzx.pas"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="paslzx"/>
|
||||
<UsageCount Value="1"/>
|
||||
</Unit60>
|
||||
<Unit61>
|
||||
<CursorPos X="1" Y="289"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/extctrls.pp"/>
|
||||
<TopLine Value="260"/>
|
||||
<UnitName Value="ExtCtrls"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit61>
|
||||
<Unit62>
|
||||
<CursorPos X="58" Y="65"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/customtimer.pas"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="CustomTimer"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit62>
|
||||
<Unit63>
|
||||
<CursorPos X="11" Y="391"/>
|
||||
<Filename Value="/home/andrew/programming/projects/components/help/packages/chm/chmreader.pas"/>
|
||||
<TopLine Value="368"/>
|
||||
<UnitName Value="chmreader"/>
|
||||
<UsageCount Value="22"/>
|
||||
</Unit63>
|
||||
<Unit64>
|
||||
<CursorPos X="35" Y="11"/>
|
||||
<Filename Value="/home/andrew/programming/projects/components/help/packages/chm/chmbase.pas"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="chmbase"/>
|
||||
<UsageCount Value="5"/>
|
||||
</Unit64>
|
||||
<Unit65>
|
||||
<CursorPos X="12" Y="472"/>
|
||||
<Filename Value="/home/andrew/programming/projects/components/help/packages/chm/paslzx.pas"/>
|
||||
<TopLine Value="576"/>
|
||||
<UnitName Value="paslzx"/>
|
||||
<UsageCount Value="5"/>
|
||||
</Unit65>
|
||||
<Unit66>
|
||||
<CursorPos X="1" Y="1"/>
|
||||
<Filename Value="/home/andrew/programming/projects/components/help/packages/idehelp/lazchmhelp.pas"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="LazChmHelp"/>
|
||||
<UsageCount Value="5"/>
|
||||
</Unit66>
|
||||
<Unit67>
|
||||
<CursorPos X="1" Y="1"/>
|
||||
<Filename Value="/home/andrew/programming/fpc/rtl/unix/sysutils.pp"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="sysutils"/>
|
||||
<UsageCount Value="5"/>
|
||||
</Unit67>
|
||||
<Unit68>
|
||||
<CursorPos X="1" Y="1"/>
|
||||
<Filename Value="/home/andrew/programming/projects/components/help/packages/chm/chmpkg.pas"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="chmpkg"/>
|
||||
<UsageCount Value="5"/>
|
||||
</Unit68>
|
||||
<Unit69>
|
||||
<CursorPos X="22" Y="89"/>
|
||||
<Filename Value="/home/mattias/freepascal/fpc/fcl/inc/simpleipc.pp"/>
|
||||
<TopLine Value="69"/>
|
||||
<UnitName Value="simpleipc"/>
|
||||
<UsageCount Value="7"/>
|
||||
</Unit69>
|
||||
<Unit70>
|
||||
<CursorPos X="42" Y="154"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/components/chmhelp/packages/idehelp/lazchmhelp.pas"/>
|
||||
<TopLine Value="112"/>
|
||||
<UnitName Value="LazChmHelp"/>
|
||||
<UsageCount Value="6"/>
|
||||
</Unit70>
|
||||
<Unit71>
|
||||
<CursorPos X="41" Y="28"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/components/chmhelp/packages/chm/chmreader.pas"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="chmreader"/>
|
||||
<UsageCount Value="26"/>
|
||||
</Unit71>
|
||||
<Unit72>
|
||||
<CursorPos X="3" Y="77"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/lclmemmanager.pas"/>
|
||||
<TopLine Value="54"/>
|
||||
<UnitName Value="LCLMemManager"/>
|
||||
<UsageCount Value="7"/>
|
||||
</Unit72>
|
||||
<Unit73>
|
||||
<CursorPos X="1" Y="1162"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/include/customform.inc"/>
|
||||
<TopLine Value="1139"/>
|
||||
<UsageCount Value="8"/>
|
||||
</Unit73>
|
||||
<Unit74>
|
||||
<CursorPos X="24" Y="1078"/>
|
||||
<Filename Value="/home/andrew/programming/fpc/rtl/objpas/classes/stringl.inc"/>
|
||||
<TopLine Value="1078"/>
|
||||
<UsageCount Value="15"/>
|
||||
</Unit74>
|
||||
<Unit75>
|
||||
<CursorPos X="12" Y="1111"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/lcl/include/treeview.inc"/>
|
||||
<TopLine Value="1080"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit75>
|
||||
<Unit76>
|
||||
<CursorPos X="3" Y="34"/>
|
||||
<Filename Value="/home/andrew/programming/lazarus/components/chmhelp/packages/chm/paslzx.pas"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="paslzx"/>
|
||||
<UsageCount Value="10"/>
|
||||
</Unit76>
|
||||
<Unit77>
|
||||
<CursorPos X="1" Y="1"/>
|
||||
<EditorIndex Value="0"/>
|
||||
<Filename Value="lhelpcore.pas"/>
|
||||
<ComponentName Value="HelpForm"/>
|
||||
<HasResources Value="True"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<Loaded Value="True"/>
|
||||
<ResourceFilename Value="lhelpcore.lrs"/>
|
||||
<TopLine Value="1"/>
|
||||
<UnitName Value="lhelpcore"/>
|
||||
<UsageCount Value="20"/>
|
||||
</Unit77>
|
||||
</Units>
|
||||
<PublishOptions>
|
||||
<Version Value="2"/>
|
||||
<IgnoreBinaries Value="False"/>
|
||||
@ -589,16 +37,38 @@
|
||||
<PackageName Value="chmpkg"/>
|
||||
</Item4>
|
||||
</RequiredPackages>
|
||||
<JumpHistory Count="2" HistoryIndex="1">
|
||||
<Position1>
|
||||
<Units Count="5">
|
||||
<Unit0>
|
||||
<Filename Value="lhelp.lpr"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<UnitName Value="lhelp"/>
|
||||
</Unit0>
|
||||
<Unit1>
|
||||
<Filename Value="chmdataprovider.pas"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<UnitName Value="ChmDataProvider"/>
|
||||
</Unit1>
|
||||
<Unit2>
|
||||
<Filename Value="chmspecialparser.pas"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<UnitName Value="ChmSpecialParser"/>
|
||||
</Unit2>
|
||||
<Unit3>
|
||||
<Filename Value="chmpopup.pas"/>
|
||||
<ComponentName Value="HelpPopupForm"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<ResourceFilename Value="chmpopup.lrs"/>
|
||||
<UnitName Value="ChmPopup"/>
|
||||
</Unit3>
|
||||
<Unit4>
|
||||
<Filename Value="lhelpcore.pas"/>
|
||||
<Caret Line="3" Column="5" TopLine="1"/>
|
||||
</Position1>
|
||||
<Position2>
|
||||
<Filename Value="lhelpcore.pas"/>
|
||||
<Caret Line="566" Column="4" TopLine="523"/>
|
||||
</Position2>
|
||||
</JumpHistory>
|
||||
<ComponentName Value="HelpForm"/>
|
||||
<HasResources Value="True"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<ResourceFilename Value="lhelpcore.lrs"/>
|
||||
<UnitName Value="lhelpcore"/>
|
||||
</Unit4>
|
||||
</Units>
|
||||
</ProjectOptions>
|
||||
<CompilerOptions>
|
||||
<Version Value="5"/>
|
||||
@ -622,12 +92,4 @@
|
||||
<CompilerPath Value="$(CompPath)"/>
|
||||
</Other>
|
||||
</CompilerOptions>
|
||||
<Debugging>
|
||||
<BreakPoints Count="1">
|
||||
<Item1>
|
||||
<Source Value="/home/andrew/lazfpc/lazarus/lcl/interfaces/gtk2/gtk2object.inc"/>
|
||||
<Line Value="857"/>
|
||||
</Item1>
|
||||
</BreakPoints>
|
||||
</Debugging>
|
||||
</CONFIG>
|
||||
|
||||
@ -23,8 +23,8 @@ unit LazChmHelp;
|
||||
interface
|
||||
|
||||
uses
|
||||
Classes, SysUtils, LazHelpIntf, HelpManager, LazConfigStorage, PropEdits,
|
||||
LHelpControl;
|
||||
Classes, SysUtils, LazHelpIntf, HelpManager, HelpIntfs, LazConfigStorage,
|
||||
PropEdits, LHelpControl;
|
||||
|
||||
type
|
||||
|
||||
@ -41,7 +41,7 @@ type
|
||||
procedure SetHelpEXE(AValue: String);
|
||||
procedure SetHelpLabel(AValue: String);
|
||||
public
|
||||
constructor Create;
|
||||
constructor Create(TheOwner: TComponent); override;
|
||||
destructor Destroy; override;
|
||||
function SupportsTableOfContents: boolean; override;
|
||||
procedure ShowTableOfContents(Node: THelpNode); override;
|
||||
@ -90,9 +90,9 @@ begin
|
||||
fHelpLabel := AValue;
|
||||
end;
|
||||
|
||||
constructor TChmHelpViewer.Create;
|
||||
constructor TChmHelpViewer.Create(TheOwner: TComponent);
|
||||
begin
|
||||
inherited Create;
|
||||
inherited Create(TheOwner);
|
||||
fHelpConnection := TLHelpConnection.Create;
|
||||
AddSupportedMimeType('text/html');
|
||||
end;
|
||||
@ -171,7 +171,7 @@ procedure Register;
|
||||
var
|
||||
ChmHelp: TChmHelpViewer;
|
||||
begin
|
||||
ChmHelp := TChmHelpViewer.Create;
|
||||
ChmHelp := TChmHelpViewer.Create(nil);
|
||||
HelpViewers.RegisterViewer(ChmHelp);
|
||||
end;
|
||||
|
||||
|
||||
@ -59,7 +59,7 @@ type
|
||||
procedure SetFoundComment(const AValue: string);
|
||||
procedure SetLastMessage(const AValue: string);
|
||||
public
|
||||
constructor Create(TheID: THelpDatabaseID); override;
|
||||
constructor Create(TheOwner: TComponent); override;
|
||||
destructor Destroy; override;
|
||||
function GetNodesForMessage(const AMessage: string; MessageParts: TStrings;
|
||||
var ListOfNodes: THelpNodeQueryList;
|
||||
@ -322,9 +322,9 @@ begin
|
||||
FLastMessage:=AValue;
|
||||
end;
|
||||
|
||||
constructor TFPCMessagesHelpDatabase.Create(TheID: THelpDatabaseID);
|
||||
constructor TFPCMessagesHelpDatabase.Create(TheOwner: TComponent);
|
||||
begin
|
||||
inherited Create(TheID);
|
||||
inherited Create(TheOwner);
|
||||
FDefaultNode:=THelpNode.CreateURL(Self,'FPC messages: Appendix',
|
||||
'http://lazarus-ccr.sourceforge.net/fpcdoc/user/userap3.html#x81-168000C');
|
||||
end;
|
||||
|
||||
@ -367,7 +367,7 @@ procedure THelpManager.RegisterDefaultIDEHelpViewers;
|
||||
var
|
||||
HelpViewer: THTMLBrowserHelpViewer;
|
||||
begin
|
||||
HelpViewer:= THTMLBrowserHelpViewer.Create;
|
||||
HelpViewer:= THTMLBrowserHelpViewer.Create(nil);
|
||||
HelpViewer.OnFindDefaultBrowser := @FindDefaultBrowser;
|
||||
HelpViewers.RegisterViewer(HelpViewer);
|
||||
end;
|
||||
|
||||
@ -149,6 +149,7 @@ end;
|
||||
|
||||
procedure GetDefaultCompilerFilenames(List: TStrings);
|
||||
begin
|
||||
List.Add('/usr/local/bin/'+GetDefaultCompilerFilename);
|
||||
List.Add('/usr/bin/'+GetDefaultCompilerFilename);
|
||||
List.Add('/opt/fpc/'+GetDefaultCompilerFilename);
|
||||
end;
|
||||
|
||||
@ -242,7 +242,7 @@ end;
|
||||
|
||||
function GetDefaultCompilerFilename: string;
|
||||
begin
|
||||
Result:='undefined';
|
||||
Result:='fpc';
|
||||
|
||||
{$IFDEF CPUi386}
|
||||
{$IFdef MSWindows}
|
||||
|
||||
@ -47,7 +47,7 @@ type
|
||||
procedure SetBaseURL(const AValue: string);
|
||||
procedure SetDefaultBaseURL(const AValue: string);
|
||||
public
|
||||
constructor Create(TheID: THelpDatabaseID); override;
|
||||
constructor Create(TheOwner: TComponent); override;
|
||||
function ShowURL(const URL, Title: string;
|
||||
var ErrMsg: string): TShowHelpResult; virtual;
|
||||
function ShowHelp(Query: THelpQuery; BaseNode, NewNode: THelpNode;
|
||||
@ -76,7 +76,7 @@ type
|
||||
procedure SetBrowserParams(const AValue: string);
|
||||
procedure SetBrowserPath(const AValue: string);
|
||||
public
|
||||
constructor Create;
|
||||
constructor Create(TheOwner: TComponent); override;
|
||||
function ShowNode(Node: THelpNode; var ErrMsg: string): TShowHelpResult; override;
|
||||
procedure FindDefaultBrowser(var Browser, Params: string); virtual;
|
||||
procedure Assign(Source: TPersistent); override;
|
||||
@ -118,9 +118,9 @@ begin
|
||||
Result:=FBaseURL<>DefaultBaseURL;
|
||||
end;
|
||||
|
||||
constructor THTMLHelpDatabase.Create(TheID: THelpDatabaseID);
|
||||
constructor THTMLHelpDatabase.Create(TheOwner: TComponent);
|
||||
begin
|
||||
inherited Create(TheID);
|
||||
inherited Create(TheOwner);
|
||||
AddSupportedMimeType('text/html');
|
||||
end;
|
||||
|
||||
@ -237,9 +237,9 @@ begin
|
||||
FBrowserPath:=AValue;
|
||||
end;
|
||||
|
||||
constructor THTMLBrowserHelpViewer.Create;
|
||||
constructor THTMLBrowserHelpViewer.Create(TheOwner: TComponent);
|
||||
begin
|
||||
inherited Create;
|
||||
inherited Create(TheOwner);
|
||||
AddSupportedMimeType('text/html');
|
||||
FBrowserParams:='%s';
|
||||
ParameterHelp:=hhsHelpTheMacroSInBrowserParamsWillBeReplacedByTheURL;
|
||||
|
||||
@ -17,6 +17,8 @@
|
||||
This unit defines various base classes for the LCL Help System.
|
||||
|
||||
ToDo:
|
||||
- fix TCHMHelpViewer
|
||||
- Make THelpDatabase and THelpViewer components usable in the designer.
|
||||
- localization support.
|
||||
- Add Help Editing functions
|
||||
}
|
||||
@ -282,7 +284,7 @@ type
|
||||
THelpDatabases = class;
|
||||
THelpViewer = class;
|
||||
|
||||
THelpDatabase = class(TPersistent)
|
||||
THelpDatabase = class(TComponent)
|
||||
private
|
||||
FBasePathObject: TObject;
|
||||
FID: THelpDatabaseID;
|
||||
@ -297,7 +299,7 @@ type
|
||||
procedure SetSupportedMimeTypes(List: TStrings); virtual;
|
||||
procedure AddSupportedMimeType(const AMimeType: string); virtual;
|
||||
public
|
||||
constructor Create(TheID: THelpDatabaseID); virtual;
|
||||
constructor Create(TheOwner: TComponent); override;
|
||||
destructor Destroy; override;
|
||||
procedure Reference;
|
||||
procedure RegisterSelf;
|
||||
@ -441,7 +443,7 @@ type
|
||||
{ THelpViewer
|
||||
base class for all Help viewers }
|
||||
|
||||
THelpViewer = class(TPersistent)
|
||||
THelpViewer = class(TComponent)
|
||||
private
|
||||
FParameterHelp: string;
|
||||
FStorageName: string;
|
||||
@ -450,7 +452,7 @@ type
|
||||
procedure SetSupportedMimeTypes(List: TStrings); virtual;
|
||||
procedure AddSupportedMimeType(const AMimeType: string); virtual;
|
||||
public
|
||||
constructor Create;
|
||||
constructor Create(TheOwner: TComponent); override;
|
||||
destructor Destroy; override;
|
||||
function SupportsTableOfContents: boolean; virtual;
|
||||
procedure ShowTableOfContents(Node: THelpNode); virtual;
|
||||
@ -750,9 +752,9 @@ begin
|
||||
FSupportedMimeTypes.Add(AMimeType);
|
||||
end;
|
||||
|
||||
constructor THelpDatabase.Create(TheID: THelpDatabaseID);
|
||||
constructor THelpDatabase.Create(TheOwner: TComponent);
|
||||
begin
|
||||
FID:=TheID;
|
||||
inherited Create(TheOwner);
|
||||
end;
|
||||
|
||||
destructor THelpDatabase.Destroy;
|
||||
@ -1165,7 +1167,8 @@ end;
|
||||
function THelpDatabases.CreateHelpDatabase(const WishID: string;
|
||||
HelpDataBaseClass: THelpDatabaseClass; AutoRegister: boolean): THelpDatabase;
|
||||
begin
|
||||
Result:=HelpDataBaseClass.Create(CreateUniqueDatabaseID(WishID));
|
||||
Result:=HelpDataBaseClass.Create(nil);
|
||||
Result.FID:=CreateUniqueDatabaseID(WishID);
|
||||
if AutoRegister then Result.RegisterSelf;
|
||||
end;
|
||||
|
||||
@ -1701,7 +1704,8 @@ begin
|
||||
i:=Count-1;
|
||||
while (i>=0) do begin
|
||||
if i<Count then begin
|
||||
Items[i].Free;
|
||||
if Items[i].Owner=nil then
|
||||
Items[i].Free;
|
||||
FItems[i]:=nil;
|
||||
end;
|
||||
dec(i);
|
||||
@ -1790,8 +1794,9 @@ begin
|
||||
FSupportedMimeTypes.Add(AMimeType);
|
||||
end;
|
||||
|
||||
constructor THelpViewer.Create;
|
||||
constructor THelpViewer.Create(TheOwner: TComponent);
|
||||
begin
|
||||
inherited Create(TheOwner);
|
||||
FStorageName:=ClassName;
|
||||
end;
|
||||
|
||||
|
||||
Loading…
Reference in New Issue
Block a user