maXbox3 3.9.9.195 14/05/2015 08:37:17 AM
maXbox3 3.9.9.80 13.11.2013 11:25:53
maXbox3 3.9.9.80 13.11.2013 11:25:53
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
<strong>maXbox3</strong> <strong>3.9.9.195</strong><br />
<strong>14</strong>/<strong>05</strong>/<strong>2015</strong> <strong>08</strong>:<strong>37</strong>:<strong>17</strong> <strong>AM</strong><br />
209<strong>37</strong>: else if MatchesMask(sl[I], '*/? DONE (?*#?#)*:*') then<br />
20938: BreakupToDo(Filename, sl, I, 'DONE', True, True) // full info DONE<br />
20939: else if MatchesMask(sl[I], '*/? TODO (#?#)*:*') then<br />
20940: BreakupToDo(Filename, sl, I, 'TODO', False, True) // only priority info TODO<br />
20941: else if MatchesMask(sl[I], '*/? DONE (#?#)*:*') then<br />
20942: BreakupToDo(Filename, sl, I, 'DONE', False, True) // only priority info DONE<br />
20943: else if MatchesMask(sl[I], '*/?*TODO*:*') then<br />
20944: BreakupToDo(Filename, sl, I, 'TODO', False, False) // custom TODO<br />
20945: else if MatchesMask(sl[I], '*/?*DONE*:*') then<br />
20946: BreakupToDo(Filename, sl, I, 'DONE', False, False); // custom DONE<br />
20947: Inc(I);<br />
20948: end;<br />
20949:<br />
20950: //----------------------------------------------------------------------------<br />
20951: //**************mX4 Public Tools API ******************************************<br />
20952: //------------------------------------------------------------------------------<br />
20953: file : unit uPSI_fMain.pas; {$OTAP} Open Tools API Catalog<br />
20954: // Those functions concern the editor and preprocessor, all of the IDE<br />
20955: Example: Call it with maxform1.Info1Click(self)<br />
20956: Note: Call all Methods with maxForm1., e.g.:<br />
20957: maxForm1.ShellStyle1Click(self);<br />
20958:<br />
20959: procedure SIRegister_fMain(CL: TPSPascalCompiler);<br />
20960: begin<br />
20961: Const('BYTECODE','String 'bytecode.txt'<br />
20962: Const('PSTEXT','String PS Scriptfiles (*.txt)|*.TXT)'<br />
20963: Const('PSMODEL','String PS Modelfiles (*.uc)|*.UC<br />
20964: Const('PSPASCAL','String PS Pascalfiles (*.pas)|*.PAS<br />
20965: Const('PSINC','String PS Includes (*.inc)|*.INC<br />
20966: Const('DEFFILEN<strong>AM</strong>E','String 'firstdemo.txt<br />
20967: Const('DEFINIFILE','String 'maxboxdef.ini<br />
20968: Const('EXCEPTLOGFILE','String 'maxboxerrorlog.txt<br />
20969: Const('ALLFUNCTIONSLIST','String 'upsi_allfunctionslist.txt<br />
20970: Const('ALLFUNCTIONSLISTPDF','String 'maxbox_functions_all.pdf<br />
20971: Const('ALLOBJECTSLIST','String 'docs\VCL.pdf<br />
20972: Const('ALLRESOURCELIST','String 'docs\upsi_allresourcelist.txt<br />
20973: Const('ALLUNITLIST','String 'docs\maxbox3_9.xml');<br />
20974: Const('INCLUDEBOX','String 'pas_includebox.inc<br />
20975: Const('BOOTSCRIPT','String 'maxbootscript.txt<br />
20976: Const('MBVERSION','String '3.9.9.190<br />
20977: Const('VERSION','String'3.9.9.190<br />
20978: Const('MBVER','String '399<br />
20979: Const('MBVERI','Integer'(399);<br />
20980: Const('MBVERIALL','Integer'(399190);<br />
20981: Const('EXEN<strong>AM</strong>E','String '<strong>maXbox3</strong>.exe<br />
20982: Const('MXSITE','String 'http://www.softwareschule.ch/maxbox.htm<br />
20983: Const('MXVERSIONFILE','String 'http://www.softwareschule.ch/maxvfile.txt<br />
20984: Const('MXVERSIONFILE2','String 'http://www.softwareschule.ch/maxvfile2.txt<br />
20985: Const('MXINTERNETCHECK','String 'www.ask.com<br />
20986: Const('MXMAIL','String 'max@kleiner.com<br />
20987: Const('TAB','Char #$09);<br />
20988: Const('CODECOMPLETION','String 'bds_delphi.dci<br />
20989: SIRegister_TMaxForm1(CL);<br />
20990: end;<br />
20991:<br />
20992: with FindClass('TForm'),'TMaxForm1') do begin<br />
20993: memo2', 'TMemo', iptrw);<br />
20994: memo1', 'TSynMemo', iptrw);<br />
20995: CB1SCList', 'TComboBox', iptrw);<br />
20996: mxNavigator', 'TComboBox', iptrw);<br />
20997: IPHost', 'string', iptrw);<br />
20998: IPPort', 'integer', iptrw);<br />
20999: COMPort', 'integer', iptrw); //3.9.6.4<br />
21000: Splitter1', 'TSplitter', iptrw);<br />
21001: PSScript', 'TPSScript', iptrw);<br />
21002: PS3DllPlugin', 'TPSDllPlugin', iptrw);<br />
21003: MainMenu1', 'TMainMenu', iptrw);<br />
21004: Program1', 'TMenuItem', iptrw);<br />
210<strong>05</strong>: Compile1', 'TMenuItem', iptrw);<br />
21006: Files1', 'TMenuItem', iptrw);<br />
21007: open1', 'TMenuItem', iptrw);<br />
210<strong>08</strong>: Save2', 'TMenuItem', iptrw);<br />
21009: Options1', 'TMenuItem', iptrw);<br />
21010: Savebefore1', 'TMenuItem', iptrw);<br />
21011: Largefont1', 'TMenuItem', iptrw);<br />
21012: sBytecode1', 'TMenuItem', iptrw);<br />
21013: Saveas3', 'TMenuItem', iptrw);<br />
210<strong>14</strong>: Clear1', 'TMenuItem', iptrw);<br />
21015: Slinenumbers1', 'TMenuItem', iptrw);<br />
21016: About1', 'TMenuItem', iptrw);<br />
210<strong>17</strong>: Search1', 'TMenuItem', iptrw);<br />
21018: SynPasSyn1', 'TSynPasSyn', iptrw);<br />
21019: memo1', 'TSynMemo', iptrw);<br />
21020: SynEditSearch1', 'TSynEditSearch', iptrw);<br />
21021: WordWrap1', 'TMenuItem', iptrw);<br />
21022: XPManifest1', 'TXPManifest', iptrw);<br />
21023: SearchNext1', 'TMenuItem', iptrw);<br />
21024: Replace1', 'TMenuItem', iptrw);<br />
21025: PSImport_Controls1', 'TPSImport_Controls', iptrw);<br />
PC<strong>08</strong> E:\maxbox3\mXGit39988\maxbox3\docs\maxbox_extract_funclist399.txt<br />
http://www.softwareschule.ch/maxbox.htm T: 297<br />
p: 244