From 5aed11e87b998dc1f7d09a1b9f5de1be0e7ff385 Mon Sep 17 00:00:00 2001 From: Pritpal Bedi Date: Mon, 12 Jul 2010 04:41:12 +0000 Subject: [PATCH] 2010-07-11 19:29 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com) * contrib/hbide/hbide.hbp - Deleted: ideprotos.prg - contrib/hbide/plugins/example_gui.hbs + contrib/hbide/plugins/hbide_script_qtgui.hbs + Added: the prefix "hbide_script_" to hbide callable script files. - contrib/hbide/plugins/savebackup.hbs + contrib/hbide/plugins/hbide_plugin_savebackup.hbs + Added: the prefix "hbide_plugin_" to hbIDE plugin files. + contrib/hbide/resources/file-open.png * contrib/hbide/hbide.qrc + Added: one more image for tool-buttons on "Files" page of "Setup". * contrib/hbide/editor.ui * contrib/hbide/environments.ui * contrib/hbide/setup.ui % Modified and Added: some of the components. * contrib/hbide/hbide.prg * contrib/hbide/ideeditor.prg * contrib/hbide/ideenviron.prg * contrib/hbide/ideharbourhelp.prg * contrib/hbide/idehbprotos.prg * contrib/hbide/idemisc.prg * contrib/hbide/ideplugins.prg * contrib/hbide/ideprojmanager.prg * contrib/hbide/idesaveload.prg * contrib/hbide/ideskeletons.prg * contrib/hbide/idesources.prg * contrib/hbide/idethemes.prg + Implemented: hbIDE installation independent paths to hold various files and components. Now only hbide.ini reference is required to load all other parameters pointing to next needed locations for various components. It also effectively means that hbIDE can be distributed as stand alone single executable ( if linked statically with Qt ) or only with Qt's run-time .dlls. hbIDE now makes no assumptions itself. User has to furnish few infos, though, interfaced at a single point. The Interface to hold information : The Paths and Files Interpretation: 0. hbide.ini Path - File - Cmd Line: APPDATA|HOME/hbide 1. Harbour's Root Path - Path - No Assumptions: should be provided 2. Hbmk2 Executable Location - File - Default: hb_getenv("HBIDE_DIR_HBMK2")/hbmk2 3. Resources [Plugins,Scripts,etc] - Path - Default: _Path_of_hbIDE_ini_ 4. Temporary Files - Path - Reserved: TODO 5. Environments [.env] - File - Default: _Path_of_hbIDE_ini_dot_env 6. Keyboard Mappings [.scu] - File - Default: _Path_of_hbIDE_ini_dot_scu 7. Code Snippets [.skl] - File - Default: _Path_of_hbIDE_ini_dot_skl 8. Syntax Highlighter Themes [.hbt]- File - Default: _Path_of_hbIDE_ini_dot_hbt The interface provides for a quick editing of .env.skl.hbt files in-place. Interface also provides for viewing facility of hbide.ini file. Plugins and scripts have gone prefix and usage changes: 1. _Path_to_Resources/hbide_auto_*.hbs|prg are automatically executed just after hbIDE appears on the screen. 2. _Path_to_Resources/hbide_plugin_*.prg|hbs|hrb can be defined to be executed as per previous instructions. 3. _Path_to_Resources/hbide_protos_* are automatically loaded for code completion lists leading to proto-tips. [New - details below] + Implemented: auto loading of code completion lists and proto-tips. Any file as hbide_protos_SOMENAME_with_or_without_extention placed in _Resources_ folder will be automatically loaded at startup. These files are plain text files. The following rules apply: 1. Each proto must be placed on one line. 2. Blank lines are permissible. 3. Commands can be placed on multiple lines, each line ending with ";" except the last one, like: COPY [TO <(f)>] [SDF] [FIELDS ] ; [FOR ] [WHILE ] [NEXT ] ; [RECORD ] [] [ALL] [CODEPAGE ] 4. Functions must be opened with a brace without any preceeding space: MyFunction ( abd, cde, efg ) => Wrong MyFunction( abd, cde, efg ) => Right I must be omitting some more facts which may have been changed|removed. Also regression is possible, please make few tests and report back if something went weired. --- harbour/ChangeLog | 90 ++ harbour/contrib/hbide/editor.ui | 35 +- harbour/contrib/hbide/environments.ui | 72 +- harbour/contrib/hbide/hbide.hbp | 1 - harbour/contrib/hbide/hbide.prg | 5 +- harbour/contrib/hbide/hbide.qrc | 1 + harbour/contrib/hbide/ideeditor.prg | 4 +- harbour/contrib/hbide/ideenviron.prg | 131 +- harbour/contrib/hbide/ideharbourhelp.prg | 8 +- harbour/contrib/hbide/idehbprotos.prg | 1363 ----------------- harbour/contrib/hbide/idemisc.prg | 6 + harbour/contrib/hbide/ideplugins.prg | 125 +- harbour/contrib/hbide/ideprojmanager.prg | 22 +- harbour/contrib/hbide/idesaveload.prg | 524 +++++-- harbour/contrib/hbide/ideskeletons.prg | 58 +- harbour/contrib/hbide/idesources.prg | 3 +- harbour/contrib/hbide/idethemes.prg | 100 +- ...backup.hbs => hbide_plugin_savebackup.hbs} | 0 ...example_gui.hbs => hbide_script_qtgui.hbs} | 0 harbour/contrib/hbide/resources/file-open.png | Bin 0 -> 797 bytes harbour/contrib/hbide/setup.ui | 187 ++- 21 files changed, 820 insertions(+), 1915 deletions(-) delete mode 100644 harbour/contrib/hbide/idehbprotos.prg rename harbour/contrib/hbide/plugins/{savebackup.hbs => hbide_plugin_savebackup.hbs} (100%) rename harbour/contrib/hbide/plugins/{example_gui.hbs => hbide_script_qtgui.hbs} (100%) create mode 100644 harbour/contrib/hbide/resources/file-open.png diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 03b464ae7b..d9d69ab610 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,96 @@ The license applies to all entries newer than 2009-04-28. */ +2010-07-11 19:29 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com) + * contrib/hbide/hbide.hbp + - Deleted: ideprotos.prg + + - contrib/hbide/plugins/example_gui.hbs + + contrib/hbide/plugins/hbide_script_qtgui.hbs + + Added: the prefix "hbide_script_" to hbide callable script files. + + - contrib/hbide/plugins/savebackup.hbs + + contrib/hbide/plugins/hbide_plugin_savebackup.hbs + + Added: the prefix "hbide_plugin_" to hbIDE plugin files. + + + contrib/hbide/resources/file-open.png + * contrib/hbide/hbide.qrc + + Added: one more image for tool-buttons on "Files" page of "Setup". + + * contrib/hbide/editor.ui + * contrib/hbide/environments.ui + * contrib/hbide/setup.ui + % Modified and Added: some of the components. + + * contrib/hbide/hbide.prg + * contrib/hbide/ideeditor.prg + * contrib/hbide/ideenviron.prg + * contrib/hbide/ideharbourhelp.prg + * contrib/hbide/idehbprotos.prg + * contrib/hbide/idemisc.prg + * contrib/hbide/ideplugins.prg + * contrib/hbide/ideprojmanager.prg + * contrib/hbide/idesaveload.prg + * contrib/hbide/ideskeletons.prg + * contrib/hbide/idesources.prg + * contrib/hbide/idethemes.prg + + Implemented: hbIDE installation independent paths to hold + various files and components. Now only hbide.ini reference is + required to load all other parameters pointing to next + needed locations for various components. It also effectively + means that hbIDE can be distributed as stand alone single + executable ( if linked statically with Qt ) or only with + Qt's run-time .dlls. hbIDE now makes no assumptions itself. + User has to furnish few infos, though, interfaced at a single point. + + The Interface to hold information : + + The Paths and Files Interpretation: + + 0. hbide.ini Path - File - Cmd Line: APPDATA|HOME/hbide + 1. Harbour's Root Path - Path - No Assumptions: should be provided + 2. Hbmk2 Executable Location - File - Default: hb_getenv("HBIDE_DIR_HBMK2")/hbmk2 + 3. Resources [Plugins,Scripts,etc] - Path - Default: _Path_of_hbIDE_ini_ + 4. Temporary Files - Path - Reserved: TODO + 5. Environments [.env] - File - Default: _Path_of_hbIDE_ini_dot_env + 6. Keyboard Mappings [.scu] - File - Default: _Path_of_hbIDE_ini_dot_scu + 7. Code Snippets [.skl] - File - Default: _Path_of_hbIDE_ini_dot_skl + 8. Syntax Highlighter Themes [.hbt]- File - Default: _Path_of_hbIDE_ini_dot_hbt + + The interface provides for a quick editing of .env.skl.hbt files in-place. + Interface also provides for viewing facility of hbide.ini file. + + Plugins and scripts have gone prefix and usage changes: + + 1. _Path_to_Resources/hbide_auto_*.hbs|prg are automatically executed + just after hbIDE appears on the screen. + + 2. _Path_to_Resources/hbide_plugin_*.prg|hbs|hrb can be defined to be + executed as per previous instructions. + + 3. _Path_to_Resources/hbide_protos_* are automatically loaded for + code completion lists leading to proto-tips. [New - details below] + + + Implemented: auto loading of code completion lists and proto-tips. + Any file as hbide_protos_SOMENAME_with_or_without_extention placed in + _Resources_ folder will be automatically loaded at startup. These files + are plain text files. The following rules apply: + + 1. Each proto must be placed on one line. + 2. Blank lines are permissible. + 3. Commands can be placed on multiple lines, + each line ending with ";" except the last one, like: + COPY [TO <(f)>] [SDF] [FIELDS ] ; + [FOR ] [WHILE ] [NEXT ] ; + [RECORD ] [] [ALL] [CODEPAGE ] + 4. Functions must be opened with a brace without any preceeding space: + MyFunction ( abd, cde, efg ) => Wrong + MyFunction( abd, cde, efg ) => Right + + I must be omitting some more facts which may have been changed|removed. + Also regression is possible, please make few tests and report back if + something went weired. + 2010-07-11 22:40 UTC+0200 Viktor Szakats (harbour.01 syenar.hu) - examples/hbdoc2 + contrib/hbdoc2 diff --git a/harbour/contrib/hbide/editor.ui b/harbour/contrib/hbide/editor.ui index 45f20c78a3..0262306bc4 100644 --- a/harbour/contrib/hbide/editor.ui +++ b/harbour/contrib/hbide/editor.ui @@ -6,27 +6,20 @@ 0 0 - 454 - 544 + 413 + 522 Editor - - + + - - - - Cancel - - - @@ -55,10 +48,10 @@ - - + + - OK + Close @@ -75,6 +68,20 @@ + + + + Save + + + + + + + SaveAs + + + diff --git a/harbour/contrib/hbide/environments.ui b/harbour/contrib/hbide/environments.ui index 91b8ea3e30..b2112cd42f 100644 --- a/harbour/contrib/hbide/environments.ui +++ b/harbour/contrib/hbide/environments.ui @@ -14,52 +14,7 @@ Form - - - - - - - - 0 - 0 - - - - - - - - - - - - 100 - 0 - - - - - 100 - 16777215 - - - - Path to hbide.env - - - - - - - - - - - - - - + @@ -83,7 +38,7 @@ p, li { white-space: pre-wrap; } - + Cancel @@ -93,33 +48,14 @@ p, li { white-space: pre-wrap; } - - - - - 100 - 0 - - - - - 100 - 16777215 - - - - Path to hbmk2 - - - - + Save and Close - + Save diff --git a/harbour/contrib/hbide/hbide.hbp b/harbour/contrib/hbide/hbide.hbp index 87ea4dc8fd..34d9b8a884 100644 --- a/harbour/contrib/hbide/hbide.hbp +++ b/harbour/contrib/hbide/hbide.hbp @@ -46,7 +46,6 @@ ideedit.prg ideplugins.prg idedict.prg idebrowse.prg -idehbprotos.prg docviewgenerator.ui docwriter.ui diff --git a/harbour/contrib/hbide/hbide.prg b/harbour/contrib/hbide/hbide.prg index 1e0d67dfb6..80b7578724 100644 --- a/harbour/contrib/hbide/hbide.prg +++ b/harbour/contrib/hbide/hbide.prg @@ -427,10 +427,7 @@ METHOD HbIde:create( aParams ) HbXbp_SetCodec( ::cWrkCodec ) /* Load IDE|User defined Themes */ - hbide_loadThemes( Self ) - - /* Harbour Help Object */ -// ::oHL := ideHarbourHelp():new():create( Self ) + ::oTH := IdeThemes():new( Self, ::oINI:getThemesFile() ):create() /* DOCKing windows and ancilliary windows */ ::oDK := IdeDocks():new():create( Self ) diff --git a/harbour/contrib/hbide/hbide.qrc b/harbour/contrib/hbide/hbide.qrc index 1825670c33..5a93b36ebd 100644 --- a/harbour/contrib/hbide/hbide.qrc +++ b/harbour/contrib/hbide/hbide.qrc @@ -66,6 +66,7 @@ resources/fl_prg.png resources/fl_res.png resources/fl_txt.png +resources/file-open.png resources/folder.png resources/font.png resources/formview.png diff --git a/harbour/contrib/hbide/ideeditor.prg b/harbour/contrib/hbide/ideeditor.prg index 8629ebc6e7..4fe71876c0 100644 --- a/harbour/contrib/hbide/ideeditor.prg +++ b/harbour/contrib/hbide/ideeditor.prg @@ -238,18 +238,20 @@ METHOD IdeEditsManager:create( oIde ) /*----------------------------------------------------------------------*/ METHOD IdeEditsManager:updateCompleter() - LOCAL aFun, aHrb, n, s, k_ + LOCAL aFun, aHrb, aUsr, n, s, k_ /* Collection of prototypes can be extended to honor plugins and defined in "setup" */ aFun := ::oFN:getFunctionPrototypes() aHrb := ::oHL:getFunctionPrototypes() + aUsr := hbide_getUserPrototypes() ::disconnect( ::qCompleter, "activated(QString)", {|p| ::execEvent( "qcompleter_activated", p ) } ) ::aProtos := {} aeval( aHrb, {|e| aadd( ::aProtos, e ) } ) aeval( aFun, {|e| aadd( ::aProtos, e ) } ) + aeval( aUsr, {|e| aadd( ::aProtos, e ) } ) k_:= {} FOR EACH s IN ::aProtos diff --git a/harbour/contrib/hbide/ideenviron.prg b/harbour/contrib/hbide/ideenviron.prg index b5eead48da..b3828e2b42 100644 --- a/harbour/contrib/hbide/ideenviron.prg +++ b/harbour/contrib/hbide/ideenviron.prg @@ -77,68 +77,45 @@ CLASS IdeEnvironments INHERIT IdeObject - DATA cEnvFile DATA aNames INIT {} DATA aEnvrns INIT {} DATA aShellContents INIT {} DATA aCommons INIT {} DATA oUI_1 - METHOD new( oIDE, cEnvFile ) - METHOD create( oIDE, cEnvFile ) + METHOD new( oIDE ) + METHOD create( oIDE ) METHOD destroy() METHOD parse( cEnvFile ) METHOD prepareBatch( cEnvName ) METHOD getNames() INLINE ::aNames METHOD saveEnv() METHOD show() - METHOD execEnv( nMode, p ) METHOD fetchNew() METHOD getHbmk2Commands( cEnvName ) ENDCLASS -/*----------------------------------------------------------------------*/ - -METHOD IdeEnvironments:new( oIDE, cEnvFile ) - - ::oIDE := oIDE - ::cEnvFile := cEnvFile +/*------------------------------------------------------------------------*/ +METHOD IdeEnvironments:new( oIde ) + ::oIde := oIde RETURN Self -/*----------------------------------------------------------------------*/ +/*------------------------------------------------------------------------*/ -METHOD IdeEnvironments:create( oIDE, cEnvFile ) - LOCAL cPath, cFile +METHOD IdeEnvironments:create( oIde ) - DEFAULT oIDE TO ::oIDE - DEFAULT cEnvFile TO ::cEnvFile + DEFAULT oIde TO ::oIde + ::oIde := oIde - ::oIDE := oIDE - ::cEnvFile := cEnvFile - - IF empty( ::cEnvFile ) - cFile := ::oINI:cPathEnv - cFile := iif( empty( cFile ), cFile, hbide_pathAppendLastSlash( cFile ) ) - IF empty( cFile ) - cFile := oIde:cProjIni - ENDIF - hb_fNameSplit( cFile, @cPath ) - ::cEnvFile := cPath + "hbide.env" - ENDIF - - hb_fNameSplit( ::cEnvFile, @cPath ) - ::oIDE:cWrkPathEnv := hbide_pathNormalized( cPath, .f. ) - ::oIde:oINI:cPathEnv := ::oIDE:cWrkPathEnv - - IF !empty( ::cEnvFile ) .AND. hb_fileExists( ::cEnvFile ) - ::parse( ::cEnvFile ) + IF hb_fileExists( ::oINI:getEnvFile() ) + ::parse( ::oINI:getEnvFile() ) ENDIF RETURN Self -/*----------------------------------------------------------------------*/ +/*------------------------------------------------------------------------*/ METHOD IdeEnvironments:destroy() @@ -151,7 +128,7 @@ METHOD IdeEnvironments:destroy() RETURN Self -/*----------------------------------------------------------------------*/ +/*------------------------------------------------------------------------*/ METHOD IdeEnvironments:parse( cEnvFile ) LOCAL s, cPart, cEnv, a_, cKey, cVal @@ -200,7 +177,7 @@ METHOD IdeEnvironments:parse( cEnvFile ) RETURN Self -/*----------------------------------------------------------------------*/ +/*------------------------------------------------------------------------*/ METHOD IdeEnvironments:getHbmk2Commands( cEnvName ) LOCAL n, s, a_, aCmd := {} @@ -216,7 +193,7 @@ METHOD IdeEnvironments:getHbmk2Commands( cEnvName ) RETURN aCmd -/*----------------------------------------------------------------------*/ +/*------------------------------------------------------------------------*/ METHOD IdeEnvironments:prepareBatch( cEnvName ) LOCAL n, s, a_, aCmd := {} @@ -232,7 +209,7 @@ METHOD IdeEnvironments:prepareBatch( cEnvName ) RETURN hbide_getShellCommandsTempFile( aCmd ) -/*----------------------------------------------------------------------*/ +/*------------------------------------------------------------------------*/ METHOD IdeEnvironments:show() @@ -241,87 +218,31 @@ METHOD IdeEnvironments:show() ::oEnvironDock:oWidget:setWidget( ::oUI ) - ::oUI:q_buttonPathMk2:setIcon( hbide_image( "folder" ) ) - ::oUI:q_buttonPathEnv:setIcon( hbide_image( "folder" ) ) - ::oUI:signal( "buttonCn" , "clicked()", {|| ::oEnvironDock:hide() } ) ::oUI:signal( "buttonSave" , "clicked()", {|| ::saveEnv() } ) ::oUI:signal( "buttonSaveExit", "clicked()", {|| ::saveEnv(), ::oEnvironDock:hide() } ) - ::oUI:signal( "buttonPathMk2" , "clicked()", {|| ::execEnv( 1 ) } ) - ::oUI:signal( "buttonPathEnv" , "clicked()", {|| ::execEnv( 2 ) } ) ::oUI:q_editCompilers:setFont( ::oFont:oWidget ) - - #if 0 - ::oUI:q_editPathEnv:setFont( ::oFont:oWidget ) - ::oUI:q_editPathMk2:setFont( ::oFont:oWidget ) - #endif ENDIF - - ::oUI:q_editPathMk2 :setText( ::oINI:cPathMk2 ) - ::oUI:q_editPathEnv :setText( ::oINI:cPathEnv ) - ::oUI:q_editCompilers:setPlainText( hb_memoread( hbide_pathFile( ::oINI:cPathEnv, "hbide.env" ) ) ) + ::oUI:q_editCompilers:setPlainText( hb_memoread( ::oINI:getEnvFile() ) ) RETURN Self -/*----------------------------------------------------------------------*/ - -METHOD IdeEnvironments:execEnv( nMode, p ) - LOCAL cPath, cP - - HB_SYMBOL_UNUSED( p ) - - DO CASE - CASE nMode == 1 - cPath := hbide_fetchAFile( ::oDlg, "Select location of hbmk2", ; - { { "Harbour Projects Builder - hbmk2", "*" } }, ::cWrkPathMK2 ) - IF !empty( cPath ) - hb_fNameSplit( cPath, @cP ) - ::oIde:cWrkPathMK2 := cP - ::oUI:q_editPathMk2:setText( hbide_pathStripLastSlash( cP ) ) - ENDIF - - CASE nMode == 2 - cPath := hbide_fetchAFile( ::oDlg, "Select location of hbide.env", ; - { { "Harbour Projects", "*.env" } }, ::cWrkPathEnv ) - IF !empty( cPath ) - hb_fNameSplit( cPath, @cP ) - ::oIDE:cWrkPathEnv := cP - ::oUI:q_editPathEnv:setText( cP ) // hbide_pathStripLastSlash( cP ) ) - - ::oUI:q_editCompilers:setPlainText( ; - hb_memoread( hbide_pathFile( ::oUI:q_editPathEnv:text(), "hbide.env" ) ) ) - ENDIF - - ENDCASE - - RETURN Self - -/*----------------------------------------------------------------------*/ +/*------------------------------------------------------------------------*/ METHOD IdeEnvironments:saveEnv() - LOCAL cText, cPathMk2, cPathEnv, cEnvFile - LOCAL oUIEnv := ::oUI + LOCAL cText - cPathMk2 := oUIEnv:q_editPathMk2:text() - cPathEnv := oUIEnv:q_editPathEnv:text() - - ::oIDE:oINI:cPathMk2 := cPathMk2 - ::oIDE:oINI:cPathEnv := cPathEnv - // - ::oIDE:cWrkPathMk2 := cPathMk2 - ::oIDE:cWrkPathEnv := cPathEnv - - IF !empty( cText := oUIEnv:q_editCompilers:toPlainText() ) - cEnvFile := hbide_pathFile( cPathEnv, "hbide.env" ) - hb_MemoWrit( cEnvFile, cText ) - - ::parse( cEnvFile ) + IF !empty( cText := ::oUI:q_editCompilers:toPlainText() ) + hb_MemoWrit( ::oINI:getEnvFile(), cText ) + ::parse( ::oINI:getEnvFile() ) ENDIF RETURN Self -/*----------------------------------------------------------------------*/ +/*------------------------------------------------------------------------*/ +// New Interface to Environments : TODO +/*------------------------------------------------------------------------*/ METHOD IdeEnvironments:fetchNew() @@ -333,4 +254,4 @@ METHOD IdeEnvironments:fetchNew() RETURN Self -/*----------------------------------------------------------------------*/ +/*------------------------------------------------------------------------*/ diff --git a/harbour/contrib/hbide/ideharbourhelp.prg b/harbour/contrib/hbide/ideharbourhelp.prg index fe8a111215..ea53288dc6 100644 --- a/harbour/contrib/hbide/ideharbourhelp.prg +++ b/harbour/contrib/hbide/ideharbourhelp.prg @@ -201,7 +201,7 @@ METHOD IdeHarbourHelp:create( oIde ) DEFAULT oIde TO ::oIde ::oIde := oIde - ::cPathInstall := ::cWrkHarbour + ::cPathInstall := ::oINI:getHarbourPath() RETURN Self @@ -463,7 +463,7 @@ METHOD IdeHarbourHelp:execEvent( nMode, p, p1 ) IF hb_dirExists( p ) ::oUI:q_editInstall:setStyleSheet( "" ) ::cPathInstall := hbide_pathStripLastSlash( hbide_pathNormalized( p, .f. ) ) - ::oIde:cWrkHarbour := ::cPathInstall +// ::oIde:cWrkHarbour := ::cPathInstall ELSE ::oUI:q_editInstall:setStyleSheet( getStyleSheet( "PathIsWrong", ::nAnimantionMode ) ) ENDIF @@ -961,7 +961,7 @@ METHOD IdeHarbourHelp:getFunctionPrototypes() LOCAL aDocs := {} LOCAL aProto - IF empty( ::aProtoTypes ) .AND. empty( ::aProtoTypes := hbide_loadHarbourProtos( ::oIde ) ) + IF empty( ::aProtoTypes ) //.AND. empty( ::aProtoTypes := hbide_loadHarbourProtos( ::oIde ) ) IF !empty( ::cPathInstall ) IF ! ::lLoadedProto hbide_fetchSubPaths( @aPaths, ::cPathInstall, .t. ) @@ -993,7 +993,7 @@ METHOD IdeHarbourHelp:getFunctionPrototypes() NEXT NEXT - hbide_saveHarbourProtos( ::oIde, aProto ) + /* hbide_saveHarbourProtos( ::oIde, aProto ) */ ::aProtoTypes := aProto ::lLoadedProto := .t. ENDIF diff --git a/harbour/contrib/hbide/idehbprotos.prg b/harbour/contrib/hbide/idehbprotos.prg deleted file mode 100644 index 66f22f8c5e..0000000000 --- a/harbour/contrib/hbide/idehbprotos.prg +++ /dev/null @@ -1,1363 +0,0 @@ -/* - * $Id$ - */ - -/* -------------------------------------------------------------------- */ -/* WARNING: Automatically generated source file. DO NOT EDIT! */ -/* Instead, edit corresponding .qth file, */ -/* or the generator tool itself, and run regenarate. */ -/* -------------------------------------------------------------------- */ - - -FUNCTION hbide_harbourProtos() - LOCAL aProto := {} - - aadd( aProto, "long hb_dateEncStr( char * szDate )" ) - aadd( aProto, "ARRAY( [, ...] ) --> aArray" ) - aadd( aProto, "AADD([, ]) --> Value" ) - aadd( aProto, "ASIZE(, ) --> aTarget" ) - aadd( aProto, "ATAIL( ) --> Element" ) - aadd( aProto, "AINS( , ) --> aTarget" ) - aadd( aProto, "ADEL(, ) --> aTarget" ) - aadd( aProto, "AFILL( , , [], [] ) --> aTarget" ) - aadd( aProto, "ASCAN( , , [], [] ) --> nStoppedAt" ) - aadd( aProto, "AEVAL(, , [], []) --> aArray" ) - aadd( aProto, "ACOPY( , , [], [], [] ) --> aTarget" ) - aadd( aProto, "ACLONE() --> aDuplicate" ) - aadd( aProto, "ASORT( , [], [], [] ) --> aArray" ) - aadd( aProto, "BIN2W( ) --> nNumber" ) - aadd( aProto, "BIN2I( ) --> nNumber" ) - aadd( aProto, "BIN2L( ) --> nNumber" ) - aadd( aProto, "BIN2U( ) --> nNumber" ) - aadd( aProto, "I2BIN( ) --> cBuffer" ) - aadd( aProto, "W2BIN( ) --> cBuffer" ) - aadd( aProto, "L2BIN( ) --> cBuffer" ) - aadd( aProto, "U2BIN( ) --> cBuffer" ) - aadd( aProto, "WORD( ) --> " ) - aadd( aProto, "DBEDIT( [], [], [], [], [], [], [], [], [], [], [], [] ) --> lOk" ) - aadd( aProto, "BROWSE( [, , , ] ) --> lOk" ) - aadd( aProto, "TBrowseDB( [], [], [], [] ) --> oBrowse" ) - aadd( aProto, "dbSkipper( ) --> nSkipped" ) - aadd( aProto, "[CREATE] CLASS [ [,] ] [STATIC]" ) - aadd( aProto, "DATA [,] [ AS ] [ INIT ]" ) - aadd( aProto, "CLASSDATA [,] [ AS ] [ INIT ]" ) - aadd( aProto, "METHOD ( [] ) [CONSTRUCTOR]" ) - aadd( aProto, "MESSAGE METHOD ( [] )" ) - aadd( aProto, "ERROR HANDLER ( [] )" ) - aadd( aProto, "ON ERROR ( [] )" ) - aadd( aProto, "ENDCLASS" ) - aadd( aProto, "CDOW() --> cDay" ) - aadd( aProto, "CMONTH() --> cMonth" ) - aadd( aProto, "DATE() --> dCurDate" ) - aadd( aProto, "CTOD() --> dDate" ) - aadd( aProto, "DAY() --> nMonth" ) - aadd( aProto, "DAYS( ) --> nDay" ) - aadd( aProto, "DOW() --> nDay" ) - aadd( aProto, "DTOC() --> cDate" ) - aadd( aProto, "DTOS() --> cDate" ) - aadd( aProto, "ELAPTIME(,) --> cDiference" ) - aadd( aProto, "MONTH() --> nMonth" ) - aadd( aProto, "SECONDS() --> nSeconds" ) - aadd( aProto, "SECS( ) --> nSeconds" ) - aadd( aProto, "TIME() --> cTime" ) - aadd( aProto, "YEAR() --> nYear" ) - aadd( aProto, "__dbDelim( , , [], []," ) - aadd( aProto, "__dbSDF( , , []," ) - aadd( aProto, "__dbCopyStruct( , [] )" ) - aadd( aProto, "COPY STRUCTURE TO [FIELDS ]" ) - aadd( aProto, "__dbCopyXStruct( ) --> lSuccess" ) - aadd( aProto, "COPY STRUCTURE EXTENDED TO " ) - aadd( aProto, "__dbCreate( , [], [], [], [] ) --> lUsed" ) - aadd( aProto, "CREATE [VIA ] [ALIAS ]" ) - aadd( aProto, "CREATE FROM [VIA ] [NEW] [ALIAS ]" ) - aadd( aProto, "__FLEDIT( , [] ) --> aStructFiltered" ) - aadd( aProto, "__dbStructFilter( , [] ) --> aStructFiltered" ) - aadd( aProto, "__Dir( [] ) --> NIL" ) - aadd( aProto, "DIR []" ) - aadd( aProto, "ADIR( [], [], [], []," ) - aadd( aProto, "DISKSPACE( [] ) --> nDiskbytes" ) - aadd( aProto, "HB_DISKSPACE( [] [, ] ) --> nDiskbytes" ) - aadd( aProto, "ERRORSYS() --> NIL" ) - aadd( aProto, "EVAL( [, [,...]]) --> xExpression" ) - aadd( aProto, "FOPEN( , [] ) --> nHandle" ) - aadd( aProto, "FCREATE( , [] ) --> nHandle" ) - aadd( aProto, "FREAD( , @, ) --> nBytes" ) - aadd( aProto, "WRITE( , , [] ) --> nBytesWritten" ) - aadd( aProto, "FERROR() --> " ) - aadd( aProto, "CLOSE( ) --> " ) - aadd( aProto, "FERASE( ) --> nSuccess" ) - aadd( aProto, "FRENAME( , ) --> nSuccess" ) - aadd( aProto, "FSEEK( , , [] ) --> nPosition" ) - aadd( aProto, "FILE( ) --> lExists" ) - aadd( aProto, "FREADSTR(, ) --> cString" ) - aadd( aProto, "ENAME TO " ) - aadd( aProto, "ERASE " ) - aadd( aProto, "DELETE FILE " ) - aadd( aProto, "__TYPEFILE( , [] ) --> NIL" ) - aadd( aProto, "TYPE [TO PRINTER] [TO FILE ]" ) - aadd( aProto, "CURDIR( [] ) --> cPath" ) - aadd( aProto, "COPY FILE TO " ) - aadd( aProto, "HB_FEOF( ) --> lIsEof" ) - aadd( aProto, "DIRREMOVE( ) --> nError" ) - aadd( aProto, "DIRCHANGE( ) --> nError" ) - aadd( aProto, "MAKEDIR( ) --> nError" ) - aadd( aProto, "ISDISK( ) --> lSuccess" ) - aadd( aProto, "#include " ) - aadd( aProto, "void hb_gcFree( void *pMemoryPtr );" ) - aadd( aProto, "void hb_gcCollectAll( void );" ) - aadd( aProto, "void hb_gcItemRef( PHB_ITEM pItem );" ) - aadd( aProto, "HB_GCALL()" ) - aadd( aProto, "HB_HASH( [ , ], [ , ], ... ) -> hsTable" ) - aadd( aProto, "HB_HHASKEY( , ) -> lExists" ) - aadd( aProto, "HB_HPOS( , ) -> nPosition" ) - aadd( aProto, "HB_HGET( , ) -> " ) - aadd( aProto, "HB_HGETDEF( , , [] ) -> " ) - aadd( aProto, "HB_HSET( , , ) -> " ) - aadd( aProto, "HB_HDEL( , ) -> " ) - aadd( aProto, "HB_HKEYAT( , ) -> " ) - aadd( aProto, "HB_HVALUEAT( , , [] ) -> " ) - aadd( aProto, "HB_HPAIRAT( , ) -> " ) - aadd( aProto, "HB_HDELAT( , ) -> " ) - aadd( aProto, "HB_HKEYS( ) -> " ) - aadd( aProto, "HB_HVALUES( ) -> " ) - aadd( aProto, "HB_HFILL( , ) -> " ) - aadd( aProto, "HB_HCLONE( ) -> " ) - aadd( aProto, "HB_HCOPY( , , [], [] ) -> " ) - aadd( aProto, "HB_HMERGE( , , | ) -> " ) - aadd( aProto, "HB_HEVAL( , , [], [] ) -> " ) - aadd( aProto, "HB_HSCAN( , , [], [, [] ) -> nPosition" ) - aadd( aProto, "HB_HSORT( ) -> " ) - aadd( aProto, "HB_HCASEMATCH( , [] ) -> " ) - aadd( aProto, "HB_HBINARY( , [] ) -> " ) - aadd( aProto, "HB_HAUTOADD( , [] ) -> " ) - aadd( aProto, "HB_HALLOCATE( , )" ) - aadd( aProto, "HB_HDEFAULT( , ) -> " ) - aadd( aProto, "HB_HSETAUTOADD( , [] ) -> " ) - aadd( aProto, "HB_HSETCASEMATCH( , [] ) -> " ) - aadd( aProto, "HB_HSETBINARY( , [] ) -> " ) - aadd( aProto, "HB_INETINIT() -> lResult" ) - aadd( aProto, "HB_INETCLEANUP()" ) - aadd( aProto, "HB_INETCREATE( [ ] ) -> SOCKET" ) - aadd( aProto, "HB_INETCLOSE( ) -> nResult" ) - aadd( aProto, "HB_INETFD( [, ] ) -> nResult" ) - aadd( aProto, "HB_INETSTATUS( ) -> nResult" ) - aadd( aProto, "HB_INETSTATUS( ) -> nResult" ) - aadd( aProto, "HB_INETERRORCODE( ) -> nResult" ) - aadd( aProto, "HB_INETERRORDESC( ) -> cResult" ) - aadd( aProto, "HB_INETCLEARERROR( )" ) - aadd( aProto, "HB_INETCOUNT( ) -> nResult" ) - aadd( aProto, "HB_INETADDRESS( ) -> cResult" ) - aadd( aProto, "HB_INETPORT( ) -> cResult" ) - aadd( aProto, "HB_INETTIMEOUT( [, ] ) -> nPreviousTimeout" ) - aadd( aProto, "HB_INETCLEARTIMEOUT( )" ) - aadd( aProto, "HB_INETTIMELIMIT( [, ) -> NIL" ) - aadd( aProto, "HB_INETCLEARTIMELIMIT( )" ) - aadd( aProto, "HB_INETPERIODCALLBACK( [, ] ) -> xPreviousCallback" ) - aadd( aProto, "HB_INETCLEARPERIODCALLBACK( )" ) - aadd( aProto, "HB_INETGETSNDBUFSIZE( ) -> nResult" ) - aadd( aProto, "HB_INETGETRCVBUFSIZE( ) -> nResult" ) - aadd( aProto, "HB_INETSETSNDBUFSIZE( , ) -> nSize" ) - aadd( aProto, "HB_INETSETRCVBUFSIZE( , nSize ) -> nSize" ) - aadd( aProto, "HB_INETRECV( , @, [ ] ) -> nResult" ) - aadd( aProto, "HB_INETRECVALL( , @, [ ] ) -> nResult" ) - aadd( aProto, "HB_INETRECVLINE( [, @, [, [, ]]] ) -> cResult" ) - aadd( aProto, "HB_INETRECVENDBLOCK( [, [, @ [, [, ]]]] ) -> cResult" ) - aadd( aProto, "HB_INETDATAREADY( , [ ] ) -> nResult" ) - aadd( aProto, "HB_INETSEND( , [, ] ) -> nResult" ) - aadd( aProto, "HB_INETSENDALL( , [, ] ) -> nResult" ) - aadd( aProto, "HB_INETGETHOSTS( ) -> aHosts" ) - aadd( aProto, "HB_INETGETALIAS( ) -> aHosts" ) - aadd( aProto, "HB_INETSERVER( [, [, ]] ) -> SOCKET" ) - aadd( aProto, "HB_INETACCEPT( ) -> SOCKET" ) - aadd( aProto, "HB_INETCONNECT( , ) -> SOCKET" ) - aadd( aProto, "HB_INETCONNECTIP( , ) -> SOCKET" ) - aadd( aProto, "HB_INETDGRAM( [] ) -> SOCKET" ) - aadd( aProto, "HB_INETDGRAMBIND( , [ [, ] ] ) -> SOCKET" ) - aadd( aProto, "HB_INETDGRAMSEND( , , , [, ] ) -> nBytesSent" ) - aadd( aProto, "HB_INETDGRAMRECV( , @ [, ] ) -> nBytesRead" ) - aadd( aProto, "HB_INETCRLF() -> cResult" ) - aadd( aProto, "HB_INETISSOCKET( ) -> lResult" ) - aadd( aProto, "hb_parc( int iParam, ... ) --> ( char * )pszResult" ) - aadd( aProto, "hb_parclen( int iParam, ... ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_parcsiz( int iParam, ... ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_pards( int iParam, ... ) --> ( char * )pszResult" ) - aadd( aProto, "hb_pardsbuff( char * szDate, int iParam, ... ) --> ( char * )pszResult" ) - aadd( aProto, "hb_parinfa( int iParamNum, ULONG uiArrayIndex ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_parinfo( int iParam ) --> ( int )iResult" ) - aadd( aProto, "hb_parl( int iParam, ... ) --> ( int )iResult" ) - aadd( aProto, "hb_parnd( int iParam, ... ) --> ( double )dResult" ) - aadd( aProto, "hb_parni( int iParam, ... ) --> ( int )iResult" ) - aadd( aProto, "hb_parnl( int iParam, ... ) --> ( long )lResult" ) - aadd( aProto, "hb_param( int iParam, int iMask ) --> ( PHB_ITEM ) pResult" ) - aadd( aProto, "hb_pcount( void ) --> ( int )iResult" ) - aadd( aProto, "hb_ret( void ) --> void" ) - aadd( aProto, "hb_retc( char * szText )" ) - aadd( aProto, "hb_retclen( char * szText, ULONG ulLen )" ) - aadd( aProto, "hb_retds( char * szDate )" ) - aadd( aProto, "hb_retd( long lYear, long lMonth, long lDay )" ) - aadd( aProto, "hb_retdl( long lJulian )" ) - aadd( aProto, "hb_retl( int iTrueFalse )" ) - aadd( aProto, "hb_retnd( double dNumber )" ) - aadd( aProto, "hb_retni( int iNumber )" ) - aadd( aProto, "hb_retnl( long lNumber )" ) - aadd( aProto, "hb_retnlen( double dNumber, int iWidth, int iDec )" ) - aadd( aProto, "hb_retndlen( double dNumber, int iWidth, int iDec )" ) - aadd( aProto, "hb_retnilen( int iNumber, int iWidth )" ) - aadd( aProto, "hb_retnllen( long lNumber, int iWidth )" ) - aadd( aProto, "hb_reta( ULONG ulLen )" ) - aadd( aProto, "hb_storc( char * szText, int iParam, ... )" ) - aadd( aProto, "hb_storclen( char * szText, ULONG ulLength, int iParam, ... )" ) - aadd( aProto, "hb_stords( char * szDate, int iParam, ... )" ) - aadd( aProto, "hb_storl( int iLogical, int iParam, ... )" ) - aadd( aProto, "hb_storni( int iValue, int iParam, ... )" ) - aadd( aProto, "hb_stornl( long lValue, int iParam, ... )" ) - aadd( aProto, "hb_stornd( double dValue, int iParam, ... )" ) - aadd( aProto, "hb_xinit( void )" ) - aadd( aProto, "hb_xexit( void )" ) - aadd( aProto, "hb_xalloc( ULONG ulSize ) --> ( void * )pResult" ) - aadd( aProto, "hb_xgrab( ULONG ulSize ) --> ( void * )pResult" ) - aadd( aProto, "hb_xfree( void * pMem )" ) - aadd( aProto, "hb_xrealloc( void * pMem, ULONG ulSize ) --> ( void * )pResult" ) - aadd( aProto, "hb_xsize( void * pMem ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_xquery( USHORT uiMode ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_xmemcpy( void * pDestArg, void * pSourceArg, ULONG ulLen ) --> ( void * )pResult" ) - aadd( aProto, "hb_xmemset( void * pDestArg, int iFill, ULONG ulLen ) --> ( void * )pResult" ) - aadd( aProto, "hb_arrayNew( PHB_ITEM pItem, ULONG ulLen ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_arrayLen( PHB_ITEM pArray ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_arrayIsObject( PHB_ITEM pArray ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_arrayAdd( PHB_ITEM pArray, PHB_ITEM pItemValue ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_arrayIns( PHB_ITEM pArray, ULONG ulIndex ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_arrayDel( PHB_ITEM pArray, ULONG ulIndex ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_arraySize( PHB_ITEM pArray, ULONG ulLen ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_arrayLast( PHB_ITEM pArray, PHB_ITEM pResult ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_arrayRelease( PHB_ITEM pArray ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_arraySet( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_arrayGet( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_arrayGetItemPtr( PHB_ITEM pArray, ULONG ulIndex ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_arrayCopyC( PHB_ITEM pArray, ULONG ulIndex, char * szBuffer, ULONG ulLen ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_arrayGetC( PHB_ITEM pArray, ULONG ulIndex ) --> ( char * )pszResult" ) - aadd( aProto, "hb_arrayGetCPtr( PHB_ITEM pArray, ULONG ulIndex ) --> ( char * )pszResult" ) - aadd( aProto, "hb_arrayGetCLen( PHB_ITEM pArray, ULONG ulIndex ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_arrayGetL( PHB_ITEM pArray, ULONG ulIndex ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_arrayGetNI( PHB_ITEM pArray, ULONG ulIndex ) --> ( int )iResult" ) - aadd( aProto, "hb_arrayGetNL( PHB_ITEM pArray, ULONG ulIndex ) --> ( long )lResult" ) - aadd( aProto, "hb_arrayGetND( PHB_ITEM pArray, ULONG ulIndex ) --> ( double )dResult" ) - aadd( aProto, "hb_arrayGetDS( PHB_ITEM pArray, ULONG ulIndex, char * szDate ) --> ( char * )pszResult" ) - aadd( aProto, "hb_arrayGetDL( PHB_ITEM pArray, ULONG ulIndex ) --> ( long )lResult" ) - aadd( aProto, "hb_arrayGetType( PHB_ITEM pArray, ULONG ulIndex ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_arrayFill( PHB_ITEM pArray, PHB_ITEM pValue, ULONG * pulStart, ULONG * pulCount ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_arrayScan( PHB_ITEM pArray, PHB_ITEM pValue, ULONG * pulStart, ULONG * pulCount ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_arrayEval( PHB_ITEM pArray, PHB_ITEM bBlock, ULONG * pulStart, ULONG * pulCount ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_arrayCopy( PHB_ITEM pSrcArray, PHB_ITEM pDstArray, ULONG * pulStart, ULONG * pulCount, ULONG * pulTarget ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_arrayClone( PHB_ITEM pArray ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_arraySort( PHB_ITEM pArray, ULONG * pulStart, ULONG * pulCount, PHB_ITEM pBlock ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_stricmp( const char * s1, const char * s2 ) --> ( int )iResult" ) - aadd( aProto, "hb_strnicmp( const char * s1, const char * s2, ULONG ulLen ) --> ( int )iResult" ) - aadd( aProto, "hb_strupr( char * pszText ) --> ( char * )pszResult" ) - aadd( aProto, "hb_strdup( const char * pszText ) --> ( char * )pszResult" ) - aadd( aProto, "hb_strMatchRegExp( const char * szString, const char * szMask ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_strEmpty( const char * szText, ULONG ulLen ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_strDescend( char * szStringTo, const char * szStringFrom, ULONG ulLen )" ) - aadd( aProto, "hb_strAt( const char * szSub, ULONG ulSubLen, const char * szText, ULONG ulLen ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_strUpper( char * szText, ULONG ulLen ) --> ( char * )pszResult" ) - aadd( aProto, "hb_strLower( char * szText, ULONG ulLen ) --> ( char * )pszResult" ) - aadd( aProto, "hb_strncpyUpper( char * pDest, const char * pSource, ULONG ulLen ) --> ( char * )pszResult" ) - aadd( aProto, "hb_strVal( const char * szText, ULONG ulLen ) --> ( double )dResult" ) - aadd( aProto, "hb_strLTrim( const char * szText, ULONG * ulLen ) --> ( char * )pszResult" ) - aadd( aProto, "hb_strRTrimLen( const char * szText, ULONG ulLen, HB_BOOL bAnySpace ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_numRound( double dResult, int iDec ) --> ( double )dResult" ) - aadd( aProto, "hb_clsReleaseAll( void )" ) - aadd( aProto, "hb_objGetClsName( PHB_ITEM pObject ) --> ( char * )pszResult" ) - aadd( aProto, "hb_objGetMethod( PHB_ITEM pObject, PHB_SYMB pSymMsg ) --> ( PHB_FUNC )hResult" ) - aadd( aProto, "hb_objHasMsg( PHB_ITEM pObject, char * szString ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_dynsymGet( char * szName ) --> ( PHB_DYNS )hResult" ) - aadd( aProto, "hb_dynsymNew( PHB_SYMB pSymbol ) --> ( PHB_DYNS )hResult" ) - aadd( aProto, "hb_dynsymFind( char * szName ) --> ( PHB_DYNS )hResult" ) - aadd( aProto, "hb_dynsymFindName( char * szName ) --> ( PHB_DYNS )hResult" ) - aadd( aProto, "hb_dynsymLog( void )" ) - aadd( aProto, "hb_dynsymRelease( void )" ) - aadd( aProto, "hb_dynsymEval( PHB_DYNS_FUNC pFunction, void * Cargo )" ) - aadd( aProto, "hb_cmdargInit( int argc, char * argv[] )" ) - aadd( aProto, "hb_cmdargARGC( void ) --> ( int )iResult" ) - aadd( aProto, "hb_cmdargARGV( void ) --> ( char ** )ppszResult" ) - aadd( aProto, "hb_cmdargIsInternal( const char * szArg ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_cmdargCheck( const char * pszName ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_cmdargString( const char * pszName ) --> ( char * )pszResult" ) - aadd( aProto, "hb_cmdargNum( const char * pszName ) --> ( int )iResult" ) - aadd( aProto, "hb_cmdargProcessVM( void )" ) - aadd( aProto, "hb_symbolNew( char * szName ) --> ( PHB_SYMB )hResult" ) - aadd( aProto, "hb_codeblockNew( BYTE * pBuffer, USHORT uiLocals, USHORT * pLocalPosTable, PHB_SYMB pSymbols ) --> ( HB_CODEBLOCK_PTR )hResult" ) - aadd( aProto, "hb_codeblockMacroNew( BYTE * pBuffer, USHORT usLen ) --> ( HB_CODEBLOCK_PTR )hResult" ) - aadd( aProto, "hb_codeblockDelete( HB_ITEM_PTR pItem )" ) - aadd( aProto, "hb_codeblockGetVar( PHB_ITEM pItem, LONG iItemPos ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_codeblockGetRef( PHB_ITEM pItem, PHB_ITEM pRefer ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_codeblockEvaluate( HB_ITEM_PTR pItem )" ) - aadd( aProto, "hb_codeblockCopy( PHB_ITEM pDest, PHB_ITEM pSource )" ) - aadd( aProto, "hb_memvarValueNew( HB_ITEM_PTR pSource, HB_BOOL bTrueMemvar ) --> ( HB_HANDLE )hResult" ) - aadd( aProto, "hb_memvarValueBaseAddress( void ) --> ( HB_VALUE_PTR * )phResult" ) - aadd( aProto, "hb_memvarsInit( void )" ) - aadd( aProto, "hb_memvarsRelease( void )" ) - aadd( aProto, "hb_memvarsFree( void )" ) - aadd( aProto, "hb_memvarValueIncRef( HB_HANDLE hValue )" ) - aadd( aProto, "hb_memvarValueDecRef( HB_HANDLE hValue )" ) - aadd( aProto, "hb_memvarSetValue( PHB_SYMB pMemvarSymb, HB_ITEM_PTR pItem )" ) - aadd( aProto, "hb_memvarGet( HB_ITEM_PTR pItem, PHB_SYMB pMemvarSymb ) --> ( HB_ERRCODE )hResult" ) - aadd( aProto, "hb_memvarGetValue( HB_ITEM_PTR pItem, PHB_SYMB pMemvarSymb )" ) - aadd( aProto, "hb_memvarGetRefer( HB_ITEM_PTR pItem, PHB_SYMB pMemvarSymb )" ) - aadd( aProto, "hb_memvarGetPrivatesBase( void ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_memvarSetPrivatesBase( ULONG ulBase )" ) - aadd( aProto, "hb_memvarNewParameter( PHB_SYMB pSymbol, PHB_ITEM pValue )" ) - aadd( aProto, "hb_memvarGetStrValuePtr( char * szVarName, ULONG *pulLen ) --> ( char * )pszResult" ) - aadd( aProto, "hb_memvarCreateFromItem( PHB_ITEM pMemvar, BYTE bScope, PHB_ITEM pValue )" ) - aadd( aProto, "hb_memvarScope( char * szVarName, ULONG ulLength ) --> ( int )iResult" ) - aadd( aProto, "hb_conInit( void )" ) - aadd( aProto, "hb_conRelease( void )" ) - aadd( aProto, "hb_conNewLine( void ) --> ( char * )pszResult" ) - aadd( aProto, "hb_conOutStd( char * pStr, ULONG ulLen )" ) - aadd( aProto, "hb_conOutErr( char * pStr, ULONG ulLen )" ) - aadd( aProto, "hb_conSetCursor( HB_BOOL bSetCursor, USHORT usNewCursor ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_conSetColor( char * szColor ) --> ( char * )pszResult" ) - aadd( aProto, "hb_conXSaveRestRelease( void )" ) - aadd( aProto, "hb_compReservedName( char * szName ) --> ( char * )pszResult" ) - aadd( aProto, "hb_procname( int iLevel, char * szName ) --> ( char * )pszResult" ) - aadd( aProto, "hb_macroGetValue( HB_ITEM_PTR pItem )" ) - aadd( aProto, "hb_macroSetValue( HB_ITEM_PTR pItem )" ) - aadd( aProto, "hb_macroTextValue( HB_ITEM_PTR pItem )" ) - aadd( aProto, "hb_macroPushSymbol( HB_ITEM_PTR pItem )" ) - aadd( aProto, "hb_macroRun( HB_MACRO_PTR pMacro )" ) - aadd( aProto, "hb_macroCompile( char * szString ) --> ( HB_MACRO_PTR )hResult" ) - aadd( aProto, "hb_macroDelete( HB_MACRO_PTR pMacro )" ) - aadd( aProto, "hb_macroTextSubst( char * szString, ULONG *pulStringLen ) --> ( char * )pszResult" ) - aadd( aProto, "hb_macroIsIdent( char * szString ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_macroPopAliasedValue( HB_ITEM_PTR pAlias, HB_ITEM_PTR pVar )" ) - aadd( aProto, "hb_macroPushAliasedValue( HB_ITEM_PTR pAlias, HB_ITEM_PTR pVar )" ) - aadd( aProto, "hb_macroGetType( HB_ITEM_PTR pItem ) --> ( char * )pszResult" ) - aadd( aProto, "hb_gcAlloc( ULONG ulSize, HB_GARBAGE_FUNC_PTR pFunc ) --> ( void * )pResult" ) - aadd( aProto, "hb_gcFree( void *pAlloc )" ) - aadd( aProto, "hb_gcLock( void *pAlloc ) --> ( void * )pResult" ) - aadd( aProto, "hb_gcUnlock( void *pAlloc ) --> ( void * )pResult" ) - aadd( aProto, "hb_gcLockItem( HB_ITEM_PTR pItem )" ) - aadd( aProto, "hb_gcUnlockItem( HB_ITEM_PTR pItem )" ) - aadd( aProto, "hb_gcCollect( void )" ) - aadd( aProto, "hb_gcCollectAll( void )" ) - aadd( aProto, "hb_gcItemRef( HB_ITEM_PTR pItem )" ) - aadd( aProto, "hb_vmIsLocalRef( void )" ) - aadd( aProto, "hb_vmIsStaticRef( void )" ) - aadd( aProto, "hb_memvarsIsMemvarRef( void )" ) - aadd( aProto, "hb_clsIsClassRef( void )" ) - aadd( aProto, "hb_codeblockDeleteGarbage( void * Cargo )" ) - aadd( aProto, "hb_arrayReleaseGarbage( void * Cargo )" ) - aadd( aProto, "hb_idleState( void )" ) - aadd( aProto, "hb_idleReset( void )" ) - aadd( aProto, "hb_idleShutDown( void )" ) - aadd( aProto, "hb_verPlatform( void ) --> ( char * )pszResult" ) - aadd( aProto, "hb_verCompiler( void ) --> ( char * )pszResult" ) - aadd( aProto, "hb_verHarbour( void ) --> ( char * )pszResult" ) - aadd( aProto, "hb_verBuildInfo( void )" ) - aadd( aProto, "HB_IS_OF_TYPE( p, t ) --> type & ~HB_IT_BYREF ) == t )>" ) - aadd( aProto, "HB_IS_BYREF( p ) --> type & HB_IT_BYREF )>" ) - aadd( aProto, "HB_IS_ARRAY( p ) --> " ) - aadd( aProto, "HB_IS_NIL( p ) --> " ) - aadd( aProto, "HB_IS_BLOCK( p ) --> " ) - aadd( aProto, "HB_IS_DATE( p ) --> " ) - aadd( aProto, "HB_IS_DOUBLE( p ) --> " ) - aadd( aProto, "HB_IS_INTEGER( p ) --> " ) - aadd( aProto, "HB_IS_LOGICAL( p ) --> " ) - aadd( aProto, "HB_IS_LONG( p ) --> " ) - aadd( aProto, "HB_IS_NUMERIC( p ) --> type & HB_IT_NUMERIC )>" ) - aadd( aProto, "HB_IS_OBJECT( p ) --> " ) - aadd( aProto, "HB_IS_STRING( p ) --> type & ~( HB_IT_BYREF | HB_IT_MEMOFLAG ) ) == HB_IT_STRING )>" ) - aadd( aProto, "HB_IS_MEMO( p ) --> " ) - aadd( aProto, "HB_IS_SYMBOL( p ) --> " ) - aadd( aProto, "HB_IS_MEMVAR( p ) --> " ) - aadd( aProto, "HB_IS_POINTER( p ) --> " ) - aadd( aProto, "ISNIL( n ) --> " ) - aadd( aProto, "ISCHAR( n ) --> " ) - aadd( aProto, "ISNUM( n ) --> " ) - aadd( aProto, "ISLOG( n ) --> " ) - aadd( aProto, "ISDATE( n ) --> " ) - aadd( aProto, "ISMEMO( n ) --> " ) - aadd( aProto, "ISBYREF( n ) --> " ) - aadd( aProto, "ISARRAY( n ) --> " ) - aadd( aProto, "ISOBJECT( n ) --> asArray.value->uiClass != 0 )>" ) - aadd( aProto, "ISBLOCK( n ) --> " ) - aadd( aProto, "ISPOINTER( n ) --> " ) - aadd( aProto, "HB_ISSPACE( c ) --> " ) - aadd( aProto, "hb_errGetDescription( PHB_ITEM pError ) --> ( char * )pszResult" ) - aadd( aProto, "hb_errGetFileName( PHB_ITEM pError ) --> ( char * )pszResult" ) - aadd( aProto, "hb_errGetFlags( PHB_ITEM pError ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_errGetGenCode( PHB_ITEM pError ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_errGetOperation( PHB_ITEM pError ) --> ( char * )pszResult" ) - aadd( aProto, "hb_errGetOsCode( PHB_ITEM pError ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_errGetSeverity( PHB_ITEM pError ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_errGetSubCode( PHB_ITEM pError ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_errGetSubSystem( PHB_ITEM pError ) --> ( char * )pszResult" ) - aadd( aProto, "hb_errGetTries( PHB_ITEM pError ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_errLaunch( PHB_ITEM pError ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_errNew( void ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errPutArgs( PHB_ITEM pError, USHORT uiArgCount, ... ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errPutDescription( PHB_ITEM pError, char * szDescription ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errPutFileName( PHB_ITEM pError, char * szFileName ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errPutFlags( PHB_ITEM pError, USHORT uiFlags ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errPutGenCode( PHB_ITEM pError, USHORT uiGenCode ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errPutOperation( PHB_ITEM pError, char * szOperation ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errPutOsCode( PHB_ITEM pError, USHORT uiOsCode ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errPutSeverity( PHB_ITEM pError, USHORT uiSeverity ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errPutSubCode( PHB_ITEM pError, USHORT uiSubCode ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errPutSubSystem( PHB_ITEM pError, char * szSubSystem ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errPutTries( PHB_ITEM pError, USHORT uiTries ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errRelease( PHB_ITEM pError )" ) - aadd( aProto, "hb_errInit( void )" ) - aadd( aProto, "hb_errExit( void )" ) - aadd( aProto, "hb_errLaunchSubst( PHB_ITEM pError ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errRT_New( USHORT uiSeverity, char * szSubSystem, ULONG ulGenCode, ULONG ulSubCode, char * szDescription, char * szOperation, USHORT uiOsCode, USHORT uiFlags ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errRT_New_Subst( USHORT uiSeverity, char * szSubSystem, ULONG ulGenCode, ULONG ulSubCode, char * szDescription, char * szOperation, USHORT uiOsCode, USHORT uiFlags ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errRT_BASE( ULONG ulGenCode, ULONG ulSubCode, char * szDescription, char * szOperation ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_errRT_BASE_Ext1( ULONG ulGenCode, ULONG ulSubCode, char * szDescription, char * szOperation, USHORT uiOsCode, USHORT uiFlags ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_errRT_BASE_Subst( ULONG ulGenCode, ULONG ulSubCode, char * szDescription, char * szOperation ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_errRT_BASE_SubstR( ULONG ulGenCode, ULONG ulSubCode, char * szDescription, char * szOperation )" ) - aadd( aProto, "hb_errRT_TERM( ULONG ulGenCode, ULONG ulSubCode, char * szDescription, char * szOperation, USHORT uiOSCode, USHORT uiFlags ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_errRT_DBCMD( ULONG ulGenCode, ULONG ulSubCode, char * szDescription, char * szOperation ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_errRT_TOOLS( ULONG ulGenCode, ULONG ulSubCode, char * szDescription, char * szOperation ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_errInternal( ULONG ulIntCode, char * szText, char * szPar1, char * szPar2 )" ) - aadd( aProto, "hb_errorHandler( HB_ERROR_INFO_PTR pNewHandler ) --> ( HB_ERROR_INFO_PTR )hParam" ) - aadd( aProto, "hb_fsChDir( BYTE * pszDirName ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_fsChDrv( BYTE nDrive ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_fsClose( HB_FHANDLE hFileHandle )" ) - aadd( aProto, "hb_fsCommit( HB_FHANDLE hFileHandle )" ) - aadd( aProto, "hb_fsCreate( BYTE * pszFileName, USHORT uiAttribute ) --> ( HB_FHANDLE )hResult" ) - aadd( aProto, "hb_fsCreateTemp( const BYTE * pszDir, const BYTE * pszPrefix, USHORT uiAttribute ) --> ( HB_FHANDLE )hResult" ) - aadd( aProto, "hb_fsCurDir( USHORT uiDrive ) --> ( BYTE * )pszResult" ) - aadd( aProto, "hb_fsCurDirBuff( USHORT uiDrive, BYTE * pbyBuffer, HB_SIZE ulLen ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_fsCurDrv( void ) --> ( BYTE )cResult" ) - aadd( aProto, "hb_fsDelete( BYTE * pszFileName ) --> ( int )iResult" ) - aadd( aProto, "hb_fsEof( HB_FHANDLE hFileHandle ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_fsError( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_fsFile( BYTE * pszFileName ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_fsFSize( BYTE * pszFileName, HB_BOOL bUseDirEntry ) --> ( HB_FOFFSET )ulResult" ) - aadd( aProto, "hb_fsExtOpen( BYTE * pszFileName, BYTE * pDefExt, USHORT uiFlags, BYTE * pPaths, PHB_ITEM pError ) --> ( HB_FHANDLE )hResult" ) - aadd( aProto, "hb_fsIsDrv( BYTE nDrive ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_fsIsDevice( HB_FHANDLE hFileHandle ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_fsLock( HB_FHANDLE hFileHandle, HB_SIZE ulStart, HB_SIZE ulLength, USHORT uiMode ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_fsMkDir( BYTE * pszDirName ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_fsOpen( BYTE * pszFileName, USHORT uiFlags ) --> ( HB_FHANDLE )hResult" ) - aadd( aProto, "hb_fsRead( HB_FHANDLE hFileHandle, BYTE * pBuff, USHORT ulCount ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_fsReadLarge( HB_FHANDLE hFileHandle, BYTE * pBuff, HB_SIZE ulCount ) --> ( HB_SIZE )ulResult" ) - aadd( aProto, "hb_fsRmDir( BYTE * pszDirName ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_fsRename( BYTE * pszOldName, BYTE * pszNewName ) --> ( int )iResult" ) - aadd( aProto, "hb_fsSeekLarge( HB_FHANDLE hFileHandle, HB_FOFFSET lOffset, USHORT uiMode ) --> ( HB_FOFFSET )ulResult" ) - aadd( aProto, "hb_fsTell( HB_FHANDLE hFileHandle ) --> ( HB_FOFFSET )ulResult" ) - aadd( aProto, "hb_fsTempName( BYTE * pszBuffer, const BYTE * pszDir, const BYTE * pszPrefix )" ) - aadd( aProto, "hb_fsSetDevMode( HB_FHANDLE hFileHandle, int iDevMode ) --> int" ) - aadd( aProto, "hb_fsSetDevRaw( HB_FHANDLE hFileHandle )" ) - aadd( aProto, "hb_fsSetDevText( HB_FHANDLE hFileHandle )" ) - aadd( aProto, "hb_fsSetError( USHORT uiError )" ) - aadd( aProto, "hb_fsWrite( HB_FHANDLE hFileHandle, BYTE * pBuff, USHORT ulCount ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_fsWriteLarge( HB_FHANDLE hFileHandle, BYTE * pBuff, HB_SIZE ulCount ) --> ( HB_SIZE )ulResult" ) - aadd( aProto, "hb_fsFNameSplit( char * pszFileName ) --> ( PHB_FNAME )hResult" ) - aadd( aProto, "hb_fsFNameMerge( char * pszFileName, PHB_FNAME pFileName ) --> ( char * )pszResult" ) - aadd( aProto, "hb_fsFLock( h, s, l ) --> " ) - aadd( aProto, "hb_fsFUnlock( h, s, l ) --> " ) - aadd( aProto, "hb_gtInit( int iFilenoStdin, int iFilenoStdout, int iFilenoStderr )" ) - aadd( aProto, "hb_gtExit( void )" ) - aadd( aProto, "hb_gtAdjustPos( int iHandle, char * pStr, ULONG ulLen )" ) - aadd( aProto, "hb_gtBox( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight, BYTE * pbyFrame ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtBoxD( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtBoxS( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtColorSelect( USHORT uiColorIndex ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtColorToN( char * szColorString ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtDispBegin( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtDispCount( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtDispEnd( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtDrawShadow( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight, BYTE byAttr ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtGetBlink( HB_BOOL * pbBlink ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtGetColorStr( char * pszColorString ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtGetCursor( USHORT * puiCursorShape ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtGetPos( SHORT * piRow, SHORT * piCol ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtIsColor( void ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_gtMaxCol( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtMaxRow( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtPostExt( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtPreExt( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtSuspend( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtResume( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtReadKey( HB_inkey_enum eventmask ) --> ( int )iResult" ) - aadd( aProto, "hb_gtRectSize( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight, USHORT * puiBuffSize ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtRepChar( USHORT uiRow, USHORT uiCol, BYTE byChar, USHORT uiCount ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtRest( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight, void * pScrBuff ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtSave( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight, void * pScrBuff ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtScrDim( USHORT * puiHeight, USHORT * puiWidth ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtScroll( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight, SHORT iRows, SHORT iCols ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtSetBlink( HB_BOOL bBlink ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtSetColorStr( char * pszColorString ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtSetCursor( USHORT uiCursorShape ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtSetMode( USHORT uiRows, USHORT uiCols ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtSetPos( SHORT iRow, SHORT iCol ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtSetPosContext( SHORT iRow, SHORT iCol, SHORT iMode ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtSetSnowFlag( HB_BOOL bNoSnow ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtTone( double dFrequency, double dDuration )" ) - aadd( aProto, "hb_gtWrite( BYTE * pbyStr, ULONG ulLen ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtWriteAt( USHORT uiRow, USHORT uiCol, BYTE * pbyStr, ULONG ulLen ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtWriteCon( BYTE * pbyStr, ULONG ulLen ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtVersion( void ) --> ( char * )pszResult" ) - aadd( aProto, "hb_gtWCreate( HB_GT_RECT * rect, HB_GT_WND ** wnd )" ) - aadd( aProto, "hb_gtWDestroy( HB_GT_WND * wnd )" ) - aadd( aProto, "hb_gtWFlash( void ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_gtWApp( HB_GT_WND ** wnd )" ) - aadd( aProto, "hb_gtWCurrent( HB_GT_WND * wnd )" ) - aadd( aProto, "hb_gtWPos( HB_GT_WND * wnd, HB_GT_RECT * rect )" ) - aadd( aProto, "hb_gtWVis( HB_GT_WND * wnd, USHORT uiStatus ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_gtSLR( HB_GT_SLR * pSLR ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtModalRead( void * ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtBeginWrite( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtEndWrite( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtFlushCursor( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtSetColor( HB_GT_RGB * color ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtGetColor( HB_GT_RGB * color ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gtSetBorder( HB_GT_RGB * color ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gt_Init( int iFilenoStdin, int iFilenoStdout, int iFilenoStderr )" ) - aadd( aProto, "hb_gt_Exit( void )" ) - aadd( aProto, "hb_gt_AdjustPos( BYTE * pStr, ULONG ulLen ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_gt_Box( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight, BYTE * pbyFrame, BYTE byAttr ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gt_BoxD( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight, BYTE * pbyFrame, BYTE byAttr ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gt_BoxS( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight, BYTE * pbyFrame, BYTE byAttr ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gt_Col( void ) --> ( SHORT )sResult" ) - aadd( aProto, "hb_gt_DispBegin( void )" ) - aadd( aProto, "hb_gt_DispCount( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gt_DispEnd( void )" ) - aadd( aProto, "hb_gt_GetBlink( void ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_gt_GetCursorStyle( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gt_GetScreenHeight( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gt_GetScreenWidth( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gt_GetText( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight, BYTE * pbyDst )" ) - aadd( aProto, "hb_gt_HorizLine( USHORT uiRow, USHORT uiLeft, USHORT uiRight, BYTE byChar, BYTE byAttr ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_gt_IsColor( void ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_gt_PreExt( void ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_gt_PostExt( void ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_gt_Suspend( void ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_gt_Resume( void ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_gt_Puts( USHORT uiRow, USHORT uiCol, BYTE byAttr, BYTE * pbyStr, ULONG ulLen )" ) - aadd( aProto, "hb_gt_PutText( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight, BYTE * pbySrc )" ) - aadd( aProto, "hb_gt_ReadKey( HB_inkey_enum eventmask ) --> ( int )iResult" ) - aadd( aProto, "hb_gt_RectSize( USHORT rows, USHORT cols ) --> ( int )iResult" ) - aadd( aProto, "hb_gt_Replicate( USHORT uiTop, USHORT uiLeft, BYTE byAttr, BYTE byChar, ULONG ulLen )" ) - aadd( aProto, "hb_gt_Row( void ) --> ( SHORT )sResult" ) - aadd( aProto, "hb_gt_Scroll( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight, BYTE byAttr, SHORT iRows, SHORT iCols )" ) - aadd( aProto, "hb_gt_SetAttribute( USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight, BYTE byAttr )" ) - aadd( aProto, "hb_gt_SetBlink( HB_BOOL bBlink )" ) - aadd( aProto, "hb_gt_SetCursorStyle( USHORT uiCursorShape )" ) - aadd( aProto, "hb_gt_SetMode( USHORT uiRows, USHORT uiCols ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_gt_SetPos( SHORT iRow, SHORT iCol, SHORT iMethod )" ) - aadd( aProto, "hb_gt_Tone( double dFrequency, double dDuration )" ) - aadd( aProto, "hb_gt_Version( void ) --> ( char * )pszResult" ) - aadd( aProto, "hb_gt_VertLine( USHORT uiCol, USHORT uiTop, USHORT uiBottom, BYTE byChar, BYTE byAttr ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_inkey( HB_BOOL bWait, double dSeconds, HB_inkey_enum event_mask ) --> ( int )iResult" ) - aadd( aProto, "hb_inkeyGet( void ) --> ( int )iResult" ) - aadd( aProto, "hb_inkeyPut( int ch )" ) - aadd( aProto, "hb_inkeyLast( void ) --> ( int )iResult" ) - aadd( aProto, "hb_inkeyNext( void ) --> ( int )iResult" ) - aadd( aProto, "hb_inkeyPoll( void )" ) - aadd( aProto, "hb_inkeyReset( HB_BOOL allocate )" ) - aadd( aProto, "hb_mouseIsPresent( void ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_mouseGetCursor( void ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_mouseSetCursor( HB_BOOL bVisible )" ) - aadd( aProto, "hb_mouseCol( void ) --> ( int )iResult" ) - aadd( aProto, "hb_mouseRow( void ) --> ( int )iResult" ) - aadd( aProto, "hb_mouseSetPos( int iRow, int iCol )" ) - aadd( aProto, "hb_mouseIsButtonPressed( int iButton ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_mouseCountButton( void ) --> ( int )iResult" ) - aadd( aProto, "hb_mouseSetBounds( int iTop, int iLeft, int iBottom, int iRight )" ) - aadd( aProto, "hb_mouseGetBounds( int * piTop, int * piLeft, int * piBottom, int * piRight )" ) - aadd( aProto, "hb_mouse_Init( void )" ) - aadd( aProto, "hb_mouse_Exit( void )" ) - aadd( aProto, "hb_mouse_IsPresent( void ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_mouse_Show( void )" ) - aadd( aProto, "hb_mouse_Hide( void )" ) - aadd( aProto, "hb_mouse_Col( void ) --> ( int )iResult" ) - aadd( aProto, "hb_mouse_Row( void ) --> ( int )iResult" ) - aadd( aProto, "hb_mouse_SetPos( int iRow, int iCol )" ) - aadd( aProto, "hb_mouse_IsButtonPressed( int iButton ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_mouse_CountButton( void ) --> ( int )iResult" ) - aadd( aProto, "hb_mouse_SetBounds( int iTop, int iLeft, int iBottom, int iRight )" ) - aadd( aProto, "hb_mouse_GetBounds( int * piTop, int * piLeft, int * piBottom, int * piRight )" ) - aadd( aProto, "hb_setkeyInit( void )" ) - aadd( aProto, "hb_setkeyExit( void )" ) - aadd( aProto, "hb_evalLaunch( PHB_EVALINFO pEvalInfo ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_evalNew( PHB_EVALINFO pEvalInfo, PHB_ITEM pItem ) --> ( HB_BOOL ) bResult" ) - aadd( aProto, "hb_evalPutParam( PHB_EVALINFO pEvalInfo, PHB_ITEM pItem ) --> ( HB_BOOL ) bResult" ) - aadd( aProto, "hb_evalRelease( PHB_EVALINFO pEvalInfo ) --> ( HB_BOOL ) bResult" ) - aadd( aProto, "hb_itemDo( PHB_ITEM pItem, USHORT uiPCount, PHB_ITEM pItemArg1, ... ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemDoC( char * szFunc, USHORT uiPCount, PHB_ITEM pItemArg1, ... ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemArrayGet( PHB_ITEM pArray, ULONG ulIndex ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemArrayNew( ULONG ulLen ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemArrayPut( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemCopyC( PHB_ITEM pItem, char * szBuffer, ULONG ulLen ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_itemFreeC( char * szText ) --> ( HB_BOOL ) bResult" ) - aadd( aProto, "hb_itemGetC( PHB_ITEM pItem ) --> ( char * )pszResult" ) - aadd( aProto, "hb_itemGetCPtr( PHB_ITEM pItem ) --> ( char * )pszResult" ) - aadd( aProto, "hb_itemGetCLen( PHB_ITEM pItem ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_itemGetDS( PHB_ITEM pItem, char * szDate ) --> ( char * )pszResult" ) - aadd( aProto, "hb_itemGetDL( PHB_ITEM pItem ) --> ( long )lResult" ) - aadd( aProto, "hb_itemGetL( PHB_ITEM pItem ) --> ( HB_BOOL ) bResult" ) - aadd( aProto, "hb_itemGetND( PHB_ITEM pItem ) --> ( double )dResult" ) - aadd( aProto, "hb_itemGetNI( PHB_ITEM pItem ) --> ( int )iResult" ) - aadd( aProto, "hb_itemGetNL( PHB_ITEM pItem ) --> ( long )lResult" ) - aadd( aProto, "hb_itemGetNLen( PHB_ITEM pItem, int * piWidth, int * piDec )" ) - aadd( aProto, "hb_itemGetPtr( PHB_ITEM pItem ) --> ( void * )pResult" ) - aadd( aProto, "hb_itemNew( PHB_ITEM pNull ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemInit( PHB_ITEM pItem )" ) - aadd( aProto, "hb_itemPCount( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_itemParam( USHORT uiParam ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutC( PHB_ITEM pItem, char * szText ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutCPtr( PHB_ITEM pItem, char * szText ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutCLPtr( PHB_ITEM pItem, char * szText, ULONG ulLen ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutCL( PHB_ITEM pItem, char * szText, ULONG ulLen ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemSetCMemo( PHB_ITEM pItem )" ) - aadd( aProto, "hb_itemPutD( PHB_ITEM pItem, long lYear, long lMonth, long lDay ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutDS( PHB_ITEM pItem, char * szDate ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutDL( PHB_ITEM pItem, long lJulian ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutL( PHB_ITEM pItem, HB_BOOL bValue ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutND( PHB_ITEM pItem, double dNumber ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutNI( PHB_ITEM pItem, int iNumber ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutNL( PHB_ITEM pItem, long lNumber ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutNLen( PHB_ITEM pItem, double dNumber, int iWidth, int iDec ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutNDLen( PHB_ITEM pItem, double dNumber, int iWidth, int iDec ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutNILen( PHB_ITEM pItem, int iNumber, int iWidth ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutNLLen( PHB_ITEM pItem, long lNumber, int iWidth ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPutPtr( PHB_ITEM pItem, void * pValue ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemRelease( PHB_ITEM pItem ) --> ( HB_BOOL ) bResult" ) - aadd( aProto, "hb_itemReturn( PHB_ITEM pItem ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemSize( PHB_ITEM pItem ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_itemType( PHB_ITEM pItem ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_itemTypeStr( PHB_ITEM pItem ) --> ( char * )pszResult" ) - aadd( aProto, "hb_itemParamPtr( USHORT uiParam, int iMask ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemReturnPtr( void ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemStrCmp( PHB_ITEM pFirst, PHB_ITEM pSecond, HB_BOOL bForceExact ) --> ( int )iResult" ) - aadd( aProto, "hb_itemCopy( PHB_ITEM pDest, PHB_ITEM pSource )" ) - aadd( aProto, "hb_itemClear( PHB_ITEM pItem )" ) - aadd( aProto, "hb_itemUnRef( PHB_ITEM pItem ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemStr( PHB_ITEM pNumber, PHB_ITEM pWidth, PHB_ITEM pDec ) --> ( char * )pszResult" ) - aadd( aProto, "hb_itemString( PHB_ITEM pItem, ULONG * ulLen, HB_BOOL * bFreeReq ) --> ( char * )pszResult" ) - aadd( aProto, "hb_itemValToStr( PHB_ITEM pItem ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_itemPadConv( PHB_ITEM pItem, char * buffer, ULONG * pulSize ) --> ( char * )pszResult" ) - aadd( aProto, "hb_itemSwap( PHB_ITEM pItem1, PHB_ITEM pItem2 )" ) - aadd( aProto, "hb_langRegister( PHB_LANG lang ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_langDeRegister( char * pszID ) --> ( HB_BOOL )bResult" ) - aadd( aProto, "hb_langFind( char * pszID ) --> ( PHB_LANG )pResult" ) - aadd( aProto, "hb_langSelect( PHB_LANG lang ) --> ( PHB_LANG )pResult" ) - aadd( aProto, "hb_langSelectID( char * pszID ) --> ( char * )pszResult" ) - aadd( aProto, "hb_langDGetItem( int iIndex ) --> ( void * )pResult" ) - aadd( aProto, "hb_langID( void ) --> ( char * )pszResult" ) - aadd( aProto, "hb_langName( void ) --> ( char * )pszResult" ) - aadd( aProto, "hb_langDGetErrorDesc( ULONG ulIndex ) --> ( char * )pszResult" ) - aadd( aProto, "HB_LANG_REQUEST( id ) --> " ) - aadd( aProto, "hb_rddInsertAreaNode( char *szDriver ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_rddGetCurrentWorkAreaNumber( void ) --> ( int )iResult" ) - aadd( aProto, "hb_rddGetCurrentWorkAreaPointer( void ) --> ( void * )pResult" ) - aadd( aProto, "hb_rddSelectWorkAreaAlias( char * szAlias ) --> ( HB_ERRCODE )hResult" ) - aadd( aProto, "hb_rddSelectWorkAreaNumber( int iArea ) --> ( HB_ERRCODE )hResult" ) - aadd( aProto, "hb_rddSelectWorkAreaSymbol( PHB_SYMB pSymAlias ) --> ( HB_ERRCODE )hResult" ) - aadd( aProto, "hb_rddGetFieldValue( HB_ITEM_PTR pItem, PHB_SYMB pFieldSymbol ) --> ( HB_ERRCODE )hResult" ) - aadd( aProto, "hb_rddPutFieldValue( HB_ITEM_PTR pItem, PHB_SYMB pFieldSymbol ) --> ( HB_ERRCODE )hResult" ) - aadd( aProto, "hb_rddFieldGet( HB_ITEM_PTR pItem, PHB_SYMB pFieldSymbol ) --> ( HB_ERRCODE )hResult" ) - aadd( aProto, "hb_rddFieldPut( HB_ITEM_PTR pItem, PHB_SYMB pFieldSymbol ) --> ( HB_ERRCODE )hResult" ) - aadd( aProto, "hb_rddShutDown( void )" ) - aadd( aProto, "hb_rddInherit( PRDDFUNCS pTable, PRDDFUNCS pSubTable, PRDDFUNCS pSuperTable, BYTE * szDrvName ) --> ( HB_ERRCODE )hResult" ) - aadd( aProto, "hb_rddDisinherit( BYTE * drvName ) --> ( HB_ERRCODE )hResult" ) - aadd( aProto, "hb_rddExtendType( USHORT fieldType ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_rddFieldType( USHORT extendType ) --> ( USHORT )usResult" ) - aadd( aProto, "SELF_BOF( w, sp ) --> lprfsHost->bof )( w, sp ) )>" ) - aadd( aProto, "SELF_EOF( w, sp ) --> lprfsHost->eof )( w, sp ) )>" ) - aadd( aProto, "SELF_FOUND( w, sp ) --> lprfsHost->found )( w, sp ) )>" ) - aadd( aProto, "SELF_GOTO( w, l ) --> lprfsHost->go )( w, l ) )>" ) - aadd( aProto, "SELF_GOTOID( w, sp ) --> lprfsHost->goToId )( w, sp ) )>" ) - aadd( aProto, "SELF_GOBOTTOM( w ) --> lprfsHost->goBottom )( w ) )>" ) - aadd( aProto, "SELF_GOTOP( w ) --> lprfsHost->goTop )( w ) )>" ) - aadd( aProto, "SELF_SEEK( w, i1, v, i2 ) --> lprfsHost->seek )( w, i1, v, i2 ) )>" ) - aadd( aProto, "SELF_SKIP( w, l ) --> lprfsHost->skip )( w, l ) )>" ) - aadd( aProto, "SELF_SKIPFILTER( w, l ) --> lprfsHost->skipFilter )( w, l ) )>" ) - aadd( aProto, "SELF_SKIPRAW( w, l ) --> lprfsHost->skipRaw )( w, l ) )>" ) - aadd( aProto, "SELF_ADDFIELD( w, ip ) --> lprfsHost->addField )( w, ip ) )>" ) - aadd( aProto, "SELF_APPEND( w, l ) --> lprfsHost->append )( w, l ) )>" ) - aadd( aProto, "SELF_CREATEFIELDS( w, v ) --> lprfsHost->createFields )( w, v ) )>" ) - aadd( aProto, "SELF_DELETE( w ) --> lprfsHost->deleterec )( w ) )>" ) - aadd( aProto, "SELF_DELETED( w, sp ) --> lprfsHost->deleted )( w, sp ) )>" ) - aadd( aProto, "SELF_FIELDCOUNT( w, sp ) --> lprfsHost->fieldCount )( w, sp ) )>" ) - aadd( aProto, "SELF_FIELDDISPLAY( w, sp ) --> lprfsHost->fieldDisplay )( w, sp ) )>" ) - aadd( aProto, "SELF_FIELDINFO( w, s1, s2, v ) --> lprfsHost->fieldInfo )( w, s1, s2, v ) )>" ) - aadd( aProto, "SELF_FIELDNAME( w, i, bp ) --> lprfsHost->fieldName )( w, i, bp ) )>" ) - aadd( aProto, "SELF_FLUSH( w ) --> lprfsHost->flush )( w ) )>" ) - aadd( aProto, "SELF_GETREC( w, bpp ) --> lprfsHost->getRec )( w, bpp ) )>" ) - aadd( aProto, "SELF_GETVALUE( w, i, v ) --> lprfsHost->getValue )( w, i, v ) )>" ) - aadd( aProto, "SELF_GETVARLEN( w, i, lp ) --> lprfsHost->getVarLen )( w, i, lp ) )>" ) - aadd( aProto, "SELF_GOCOLD( w ) --> lprfsHost->goCold )( w ) )>" ) - aadd( aProto, "SELF_GOHOT( w ) --> lprfsHost->goHot )( w ) )>" ) - aadd( aProto, "SELF_PUTVALUE( w, i, v ) --> lprfsHost->putValue )( w, i, v ) )>" ) - aadd( aProto, "SELF_PUTREC( w, bp ) --> lprfsHost->putRec )( w, bp ) )>" ) - aadd( aProto, "SELF_RECALL( w ) --> lprfsHost->recall )( w ) )>" ) - aadd( aProto, "SELF_RECCOUNT( w, sp ) --> lprfsHost->reccount )( w, sp ) )>" ) - aadd( aProto, "SELF_RECINFO( w, v1, i, v2 ) --> lprfsHost->recInfo )( w, v1, i, v2 ) )>" ) - aadd( aProto, "SELF_RECNO( w, i ) --> lprfsHost->recno )( w, i ) )>" ) - aadd( aProto, "SELF_SETFIELDEXTENT( w, s ) --> lprfsHost->setFieldExtent )( w, s ) )>" ) - aadd( aProto, "SELF_ALIAS( w, bp ) --> lprfsHost->alias )( w, bp ) )>" ) - aadd( aProto, "SELF_CLOSE( w ) --> lprfsHost->close )( w ) )>" ) - aadd( aProto, "SELF_CREATE( w, ip ) --> lprfsHost->create )( w, ip ) )>" ) - aadd( aProto, "SELF_INFO( w, i, g ) --> lprfsHost->info )( w, i, g ) )>" ) - aadd( aProto, "SELF_NEW( w ) --> lprfsHost->newarea )( w ) )>" ) - aadd( aProto, "SELF_OPEN( w, ip ) --> lprfsHost->open )( w, ip ) )>" ) - aadd( aProto, "SELF_RELEASE( w ) --> lprfsHost->release )( w ) )>" ) - aadd( aProto, "SELF_STRUCTSIZE( w, sp ) --> lprfsHost->structSize )( w, sp ) )>" ) - aadd( aProto, "SELF_SYSNAME( w, bp ) --> lprfsHost->sysName )( w, bp ) )>" ) - aadd( aProto, "SELF_DBEVAL( w, ip ) --> lprfsHost->dbEval )( w, ip ) )>" ) - aadd( aProto, "SELF_PACK( w ) --> lprfsHost->pack )( w ) )>" ) - aadd( aProto, "SELF_PACKREC( w, l, sp ) --> lprfsHost->packRec )( w, l, sp ) )>" ) - aadd( aProto, "SELF_SORT( w, ip ) --> lprfsHost->sort )( w, ip ) )>" ) - aadd( aProto, "SELF_TRANS( w, ip ) --> lprfsHost->trans )( w, ip ) )>" ) - aadd( aProto, "SELF_TRANSREC( w, ip ) --> lprfsHost->transRec )( w, ip ) )>" ) - aadd( aProto, "SELF_ZAP( w ) --> lprfsHost->zap )( w ) )>" ) - aadd( aProto, "SELF_CHILDEND( w, ip ) --> lprfsHost->childEnd )( w, ip ) )>" ) - aadd( aProto, "SELF_CHILDSTART( w, ip ) --> lprfsHost->childStart )( w, ip ) )>" ) - aadd( aProto, "SELF_CHILDSYNC( w, ip ) --> lprfsHost->childSync )( w, ip ) )>" ) - aadd( aProto, "SELF_SYNCCHILDREN( w ) --> lprfsHost->syncChildren )( w ) )>" ) - aadd( aProto, "SELF_CLEARREL( w ) --> lprfsHost->clearRel )( w ) )>" ) - aadd( aProto, "SELF_FORCEREL( w ) --> lprfsHost->forceRel )( w ) )>" ) - aadd( aProto, "SELF_RELAREA( w, s, sp ) --> lprfsHost->relArea )( w, s, sp ) )>" ) - aadd( aProto, "SELF_RELEVAL( w, ip ) --> lprfsHost->relEval )( w, ip ) )>" ) - aadd( aProto, "SELF_RELTEXT( w, s, bp ) --> lprfsHost->relText )( w, s, bp ) )>" ) - aadd( aProto, "SELF_SETREL( w, ip ) --> lprfsHost->setRel )( w, ip ) )>" ) - aadd( aProto, "SELF_ORDLSTADD( w, lp ) --> lprfsHost->orderListAdd )( w, lp ) )>" ) - aadd( aProto, "SELF_ORDLSTDELETE( w, lp ) --> lprfsHost->orderListDelete )( w, lp ) )>" ) - aadd( aProto, "SELF_ORDLSTFOCUS( w, lp ) --> lprfsHost->orderListFocus )( w, lp ) )>" ) - aadd( aProto, "SELF_ORDLSTREBUILD( w ) --> lprfsHost->orderListRebuild )( w ) )>" ) - aadd( aProto, "SELF_ORDLSTCLEAR( w ) --> lprfsHost->orderListClear )( w ) )>" ) - aadd( aProto, "SELF_ORDSETCOND( w, ip ) --> lprfsHost->orderCondition )( w, ip ) )>" ) - aadd( aProto, "SELF_ORDCREATE( w, ip ) --> lprfsHost->orderCreate )( w, ip ) )>" ) - aadd( aProto, "SELF_ORDDESTROY( w, p ) --> lprfsHost->orderDestroy )( w, p ) )>" ) - aadd( aProto, "SELF_ORDINFO( w, i, p ) --> lprfsHost->orderInfo )( w, i, p ) )>" ) - aadd( aProto, "SELF_ORDEXPR( w, p ) --> lprfsHost->orderInfo )( w, DBOI_EXPRESSION, p ) )>" ) - aadd( aProto, "SELF_ORDCOND( w, p ) --> lprfsHost->orderInfo )( w, DBOI_CONDITION, p ) )>" ) - aadd( aProto, "SELF_ORDRECNO( w, p ) --> lprfsHost->orderInfo )( w, DBOI_RECNO, p ) )>" ) - aadd( aProto, "SELF_ORDPOS( w, p ) --> lprfsHost->orderInfo )( w, DBOI_POSITION, p ) )>" ) - aadd( aProto, "SELF_ORDNUMBER( w, p ) --> lprfsHost->orderInfo )( w, DBOI_NUMBER, p ) )>" ) - aadd( aProto, "SELF_ORDNAME( w, p ) --> lprfsHost->orderInfo )( w, DBOI_NAME, p ) )>" ) - aadd( aProto, "SELF_ORDBAGNAME( w, p ) --> lprfsHost->orderInfo )( w, DBOI_BAGNAME, p ) )>" ) - aadd( aProto, "SELF_ORDBAGEXT( w, p ) --> lprfsHost->orderInfo )( w, DBOI_BAGEXT, p ) )>" ) - aadd( aProto, "SELF_CLEARFILTER( w ) --> lprfsHost->clearFilter )( w ) )>" ) - aadd( aProto, "SELF_CLEARLOCATE( w ) --> lprfsHost->clearLocate )( w ) )>" ) - aadd( aProto, "SELF_CLEARSCOPE( w ) --> lprfsHost->clearScope )( w ) )>" ) - aadd( aProto, "SELF_COUNTSCOPE( w, ip, lp ) --> lprfsHost->countScope )( w, ip, lp ) )>" ) - aadd( aProto, "SELF_FILTERTEXT( w, bp ) --> lprfsHost->filterText )( w, bp ) )>" ) - aadd( aProto, "SELF_SCOPEINFO( w, i, v ) --> lprfsHost->scopeInfo )( w, i, v ) )>" ) - aadd( aProto, "SELF_SETFILTER( w, ip ) --> lprfsHost->setFilter )( w, ip ) )>" ) - aadd( aProto, "SELF_SETLOCATE( w, ip ) --> lprfsHost->setLocate )( w, ip ) )>" ) - aadd( aProto, "SELF_SETSCOPE( w, ip ) --> lprfsHost->setScope )( w, ip ) )>" ) - aadd( aProto, "SELF_SKIPSCOPE( w, bp, l ) --> lprfsHost->skipScope )( w, bp, l ) )>" ) - aadd( aProto, "SELF_COMPILE( w, bp ) --> lprfsHost->compile )( w, bp ) )>" ) - aadd( aProto, "SELF_ERROR( w, ip ) --> lprfsHost->error )( w, ip ) )>" ) - aadd( aProto, "SELF_EVALBLOCK( w, v ) --> lprfsHost->evalBlock )( w, v ) )>" ) - aadd( aProto, "SELF_GETLOCKS( w, g ) --> lprfsHost->info )( w, DBI_GETLOCKARRAY, g ) )>" ) - aadd( aProto, "SELF_RAWLOCK( w, i, l ) --> lprfsHost->rawlock )( w, i, l ) )>" ) - aadd( aProto, "SELF_LOCK( w, sp ) --> lprfsHost->lock )( w, sp ) )>" ) - aadd( aProto, "SELF_UNLOCK( w, l ) --> lprfsHost->unlock )( w, l ) )>" ) - aadd( aProto, "SELF_CLOSEMEMFILE( w ) --> lprfsHost->closeMemFile )( w ) )>" ) - aadd( aProto, "SELF_CREATEMEMFILE( w, bp ) --> lprfsHost->createMemFile )( w, bp ) )>" ) - aadd( aProto, "SELF_GETVALUEFILE( w, i, bp ) --> lprfsHost->getValueFile )( w, i, bp ) )>" ) - aadd( aProto, "SELF_OPENMEMFILE( w, bp ) --> lprfsHost->openMemFile )( w, bp ) )>" ) - aadd( aProto, "SELF_PUTVALUEFILE( w, i, bp ) --> lprfsHost->putValueFile )( w, i, bp ) )>" ) - aadd( aProto, "SELF_READDBHEADER( w ) --> lprfsHost->readDBHeader )( w ) )>" ) - aadd( aProto, "SELF_WRITEDBHEADER( w ) --> lprfsHost->writeDBHeader )( w ) )>" ) - aadd( aProto, "SELF_RECSIZE( w, lp ) --> lprfsHost->info )( w, DBI_GETRECSIZE, lp ) )>" ) - aadd( aProto, "SELF_HEADERSIZE( w, fp ) --> lprfsHost->info )( w, DBI_GETHEADERSIZE, fp ) )>" ) - aadd( aProto, "SELF_LUPDATE( w, fp ) --> lprfsHost->info )( w, DBI_LASTUPDATE, fp ) )>" ) - aadd( aProto, "SELF_SETDELIM( w, fp ) --> lprfsHost->info )( w, DBI_SETDELIMITER, fp ) )>" ) - aadd( aProto, "SELF_GETDELIM( w, fp ) --> lprfsHost->info )( w, DBI_GETDELIMITER, fp ) )>" ) - aadd( aProto, "SELF_TABLEEXT( w, fp ) --> lprfsHost->info )( w, DBI_TABLEEXT, fp ) )>" ) - aadd( aProto, "SUPER_BOF( w, sp ) --> bof )( w, sp ) )>" ) - aadd( aProto, "SUPER_EOF( w, sp ) --> eof )( w, sp ) )>" ) - aadd( aProto, "SUPER_FOUND( w, sp ) --> found )( w, sp ) )>" ) - aadd( aProto, "SUPER_GOTO( w, l ) --> go )( w, l ) )>" ) - aadd( aProto, "SUPER_GOTOID( w, sp ) --> goToId )( w, sp ) )>" ) - aadd( aProto, "SUPER_GOBOTTOM( w ) --> goBottom )( w ) )>" ) - aadd( aProto, "SUPER_GOTOP( w ) --> goTop )( w ) )>" ) - aadd( aProto, "SUPER_SEEK( w, i1, v, i2 ) --> seek )( w, i1, v, i2 ) )>" ) - aadd( aProto, "SUPER_SKIP( w, l ) --> skip )( w, l ) )>" ) - aadd( aProto, "SUPER_SKIPFILTER( w, l ) --> skipFilter )( w, l ) )>" ) - aadd( aProto, "SUPER_SKIPRAW( w, l ) --> skipRaw )( w, l ) )>" ) - aadd( aProto, "SUPER_ADDFIELD( w, ip ) --> addField )( w, ip ) )>" ) - aadd( aProto, "SUPER_APPEND( w, l ) --> append )( w, l ) )>" ) - aadd( aProto, "SUPER_CREATEFIELDS( w, v ) --> createFields )( w, v ) )>" ) - aadd( aProto, "SUPER_DELETE( w ) --> deleterec )( w ) )>" ) - aadd( aProto, "SUPER_DELETED( w, sp ) --> deleted )( w, sp ) )>" ) - aadd( aProto, "SUPER_FIELDCOUNT( w, sp ) --> fieldCount )( w, sp ) )>" ) - aadd( aProto, "SUPER_FIELDDISPLAY( w, sp ) --> fieldDisplay )( w, sp ) )>" ) - aadd( aProto, "SUPER_FIELDINFO( w, s1, s2, v ) --> fieldInfo )( w, s1, s2, v ) )>" ) - aadd( aProto, "SUPER_FIELDNAME( w, i, bp ) --> fieldName )( w, i, bp ) )>" ) - aadd( aProto, "SUPER_FLUSH( w ) --> flush )( w ) )>" ) - aadd( aProto, "SUPER_GETREC( w, bpp ) --> getRec )( w, bpp ) )>" ) - aadd( aProto, "SUPER_GETVALUE( w, i, v ) --> getValue )( w, i, v ) )>" ) - aadd( aProto, "SUPER_GETVARLEN( w, i, lp ) --> getVarLen )( w, i, lp ) )>" ) - aadd( aProto, "SUPER_GOCOLD( w ) --> goCold )( w ) )>" ) - aadd( aProto, "SUPER_GOHOT( w ) --> goHot )( w ) )>" ) - aadd( aProto, "SUPER_PUTVALUE( w, i, v ) --> putValue )( w, i, v ) )>" ) - aadd( aProto, "SUPER_PUTREC( w, bp ) --> putRec )( w, bp ) )>" ) - aadd( aProto, "SUPER_RECALL( w ) --> recall )( w ) )>" ) - aadd( aProto, "SUPER_RECCOUNT( w, sp ) --> reccount )( w, sp ) )>" ) - aadd( aProto, "SUPER_RECINFO( w, v1, i, v2 ) --> recInfo )( w, v1, i, v2 ) )>" ) - aadd( aProto, "SUPER_RECNO( w, sp ) --> recno )( w, sp ) )>" ) - aadd( aProto, "SUPER_SETFIELDEXTENT( w, s ) --> setFieldExtent )( w, s ) )>" ) - aadd( aProto, "SUPER_ALIAS( w, bp ) --> alias )( w, bp ) )>" ) - aadd( aProto, "SUPER_CLOSE( w ) --> close )( w ) )>" ) - aadd( aProto, "SUPER_CREATE( w, ip ) --> create )( w, ip ) )>" ) - aadd( aProto, "SUPER_INFO( w, i, g ) --> info )( w, i, g ) )>" ) - aadd( aProto, "SUPER_NEW( w ) --> newarea )( w ) )>" ) - aadd( aProto, "SUPER_OPEN( w, ip ) --> open )( w, ip ) )>" ) - aadd( aProto, "SUPER_RELEASE( w ) --> release )( w ) )>" ) - aadd( aProto, "SUPER_STRUCTSIZE( w, sp ) --> structSize )( w, sp ) )>" ) - aadd( aProto, "SUPER_SYSNAME( w, bp ) --> sysName )( w, bp ) )>" ) - aadd( aProto, "SUPER_DBEVAL( w, ip ) --> dbEval )( w, ip ) )>" ) - aadd( aProto, "SUPER_PACK( w ) --> pack )( w ) )>" ) - aadd( aProto, "SUPER_PACKREC( w, l, sp ) --> packRec )( w, l, sp ) )>" ) - aadd( aProto, "SUPER_SORT( w, ip ) --> sort )( w, ip ) )>" ) - aadd( aProto, "SUPER_TRANS( w, ip ) --> trans )( w, ip ) )>" ) - aadd( aProto, "SUPER_TRANSREC( w, ip ) --> transRec )( w, ip ) )>" ) - aadd( aProto, "SUPER_ZAP( w ) --> zap )( w ) )>" ) - aadd( aProto, "SUPER_CHILDEND( w, ip ) --> childEnd )( w, ip ) )>" ) - aadd( aProto, "SUPER_CHILDSTART( w, ip ) --> childStart )( w, ip ) )>" ) - aadd( aProto, "SUPER_CHILDSYNC( w, ip ) --> childSync )( w, ip ) )>" ) - aadd( aProto, "SUPER_SYNCCHILDREN( w ) --> syncChildren )( w ) )>" ) - aadd( aProto, "SUPER_CLEARREL( w ) --> clearRel )( w ) )>" ) - aadd( aProto, "SUPER_FORCEREL( w ) --> forceRel )( w ) )>" ) - aadd( aProto, "SUPER_RELAREA( w, s, sp ) --> relArea )( w, s, sp ) )>" ) - aadd( aProto, "SUPER_RELEVAL( w, ip ) --> relEval )( w, ip ) )>" ) - aadd( aProto, "SUPER_RELTEXT( w, s, bp ) --> relText )( w, s, bp ) )>" ) - aadd( aProto, "SUPER_SETREL( w, ip ) --> setRel )( w, ip ) )>" ) - aadd( aProto, "SUPER_ORDLSTADD( w, lp ) --> orderListAdd )( w, lp ) )>" ) - aadd( aProto, "SUPER_ORDLSTDELETE( w, lp ) --> orderListDelete )( w, lp ) )>" ) - aadd( aProto, "SUPER_ORDLSTFOCUS( w, lp ) --> orderListFocus )( w, lp ) )>" ) - aadd( aProto, "SUPER_ORDLSTREBUILD( w ) --> orderListRebuild )( w ) )>" ) - aadd( aProto, "SUPER_ORDLSTCLEAR( w ) --> orderListClear )( w ) )>" ) - aadd( aProto, "SUPER_ORDSETCOND( w, ip ) --> orderCondition )( w, ip ) )>" ) - aadd( aProto, "SUPER_ORDCREATE( w, ip ) --> orderCreate )( w, ip ) )>" ) - aadd( aProto, "SUPER_ORDDELETE( w, ip ) --> orderDelete )( w, ip ) )>" ) - aadd( aProto, "SUPER_ORDINFO( w, i, p ) --> orderInfo )( w, i, p ) )>" ) - aadd( aProto, "SUPER_ORDEXPR( w, p ) --> orderInfo )( w, DBOI_EXPRESSION, p ) )>" ) - aadd( aProto, "SUPER_ORDCOND( w, p ) --> orderInfo )( w, DBOI_CONDITION, p ) )>" ) - aadd( aProto, "SUPER_ORDRECNO( w, p ) --> orderInfo )( w, DBOI_RECNO, p ) )>" ) - aadd( aProto, "SUPER_ORDPOS( w, p ) --> orderInfo )( w, DBOI_POSITION, p ) )>" ) - aadd( aProto, "SUPER_ORDNUMBER( w, p ) --> orderInfo )( w, DBOI_NUMBER, p ) )>" ) - aadd( aProto, "SUPER_ORDNAME( w, p ) --> orderInfo )( w, DBOI_NAME, p ) )>" ) - aadd( aProto, "SUPER_ORDBAGNAME( w, p ) --> orderInfo )( w, DBOI_BAGNAME, p ) )>" ) - aadd( aProto, "SUPER_ORDBAGEXT( w, p ) --> orderInfo )( w, DBOI_BAGEXT, p ) )>" ) - aadd( aProto, "SUPER_CLEARFILTER( w ) --> clearFilter )( w ) )>" ) - aadd( aProto, "SUPER_CLEARLOCATE( w ) --> clearLocate )( w ) )>" ) - aadd( aProto, "SUPER_CLEARSCOPE( w ) --> clearScope )( w ) )>" ) - aadd( aProto, "SUPER_COUNTSCOPE( w, ip, lp ) --> countScope )( w, ip, lp ) )>" ) - aadd( aProto, "SUPER_FILTERTEXT( w, bp ) --> filterText )( w, bp ) )>" ) - aadd( aProto, "SUPER_SCOPEINFO( w, i, v ) --> scopeInfo )( w, i, v ) )>" ) - aadd( aProto, "SUPER_SETFILTER( w, ip ) --> setFilter )( w, ip ) )>" ) - aadd( aProto, "SUPER_SETLOCATE( w, ip ) --> setLocate )( w, ip ) )>" ) - aadd( aProto, "SUPER_SETSCOPE( w, ip ) --> setScope )( w, ip ) )>" ) - aadd( aProto, "SUPER_SKIPSCOPE( w, bp, l ) --> skipScope )( w, bp, l ) )>" ) - aadd( aProto, "SUPER_COMPILE( w, bp ) --> compile )( w, bp ) )>" ) - aadd( aProto, "SUPER_ERROR( w, ip ) --> error )( w, ip ) )>" ) - aadd( aProto, "SUPER_EVALBLOCK( w, v ) --> evalBlock )( w, v ) )>" ) - aadd( aProto, "SUPER_GETLOCKS( w, g ) --> info )( w, DBI_GETLOCKARRAY, g ) )>" ) - aadd( aProto, "SUPER_RAWLOCK( w, i, l ) --> rawlock )( w, i, l ) )>" ) - aadd( aProto, "SUPER_LOCK( w, sp ) --> lock )( w, sp ) )>" ) - aadd( aProto, "SUPER_UNLOCK( w ) --> unlock )( w ) )>" ) - aadd( aProto, "SUPER_CLOSEMEMFILE( w ) --> closeMemFile )( w ) )>" ) - aadd( aProto, "SUPER_CREATEMEMFILE( w, bp ) --> createMemFile )( w, bp ) )>" ) - aadd( aProto, "SUPER_GETVALUEFILE( w, i, bp ) --> getValueFile )( w, i, bp ) )>" ) - aadd( aProto, "SUPER_OPENMEMFILE( w, bp ) --> openMemFile )( w, bp ) )>" ) - aadd( aProto, "SUPER_PUTVALUEFILE( w, i, bp ) --> putValueFile )( w, i, bp ) )>" ) - aadd( aProto, "SUPER_READDBHEADER( w ) --> readDBHeader )( w ) )>" ) - aadd( aProto, "SUPER_WRITEDBHEADER( w ) --> writeDBHeader )( w ) )>" ) - aadd( aProto, "SUPER_RECSIZE( w, lp ) --> info )( w, DBI_GETRECSIZE, lp ) )>" ) - aadd( aProto, "SUPER_HEADERSIZE( w, fp ) --> info )( w, DBI_GETHEADERSIZE, fp ) )>" ) - aadd( aProto, "SUPER_LUPDATE( w, fp ) --> info )( w, DBI_LASTUPDATE, fp ) )>" ) - aadd( aProto, "SUPER_SETDELIM( w, fp ) --> info )( w, DBI_SETDELIMITER, fp ) )>" ) - aadd( aProto, "SUPER_GETDELIM( w, fp ) --> info )( w, DBI_GETDELIMITER, fp ) )>" ) - aadd( aProto, "SUPER_TABLEEXT( w, fp ) --> info )( w, DBI_TABLEEXT, fp ) )>" ) - aadd( aProto, "_evalLaunch --> " ) - aadd( aProto, "_evalNew --> " ) - aadd( aProto, "_evalPutParam --> " ) - aadd( aProto, "_evalRelease --> " ) - aadd( aProto, "_itemArrayGet --> " ) - aadd( aProto, "_itemArrayNew --> " ) - aadd( aProto, "_itemArrayPut --> " ) - aadd( aProto, "_itemNew --> " ) - aadd( aProto, "_itemParam --> " ) - aadd( aProto, "_itemRelease --> " ) - aadd( aProto, "_itemReturn --> " ) - aadd( aProto, "_itemSize --> " ) - aadd( aProto, "_itemType --> " ) - aadd( aProto, "_reta --> " ) - aadd( aProto, "_pcount --> " ) - aadd( aProto, "_tchdir --> " ) - aadd( aProto, "_tchdrv --> " ) - aadd( aProto, "_tclose --> " ) - aadd( aProto, "_tcommit --> " ) - aadd( aProto, "_tcreat --> " ) - aadd( aProto, "_tcurdir --> " ) - aadd( aProto, "_tcurdrv --> " ) - aadd( aProto, "_tdevraw --> " ) - aadd( aProto, "_terror --> " ) - aadd( aProto, "_tisdevice --> " ) - aadd( aProto, "_tisdrv --> " ) - aadd( aProto, "_tlock --> " ) - aadd( aProto, "_tlseek --> " ) - aadd( aProto, "_tmkdir --> " ) - aadd( aProto, "_topen --> " ) - aadd( aProto, "_tread --> " ) - aadd( aProto, "_trename --> " ) - aadd( aProto, "_trmdir --> " ) - aadd( aProto, "_tunlink --> " ) - aadd( aProto, "_twrite --> " ) - aadd( aProto, "_bset --> " ) - aadd( aProto, "_bmove --> " ) - aadd( aProto, "_bcopy --> " ) - aadd( aProto, "_bcmp --> " ) - aadd( aProto, "_gtBox --> " ) - aadd( aProto, "_gtColorSelect --> " ) - aadd( aProto, "_gtDispBegin --> " ) - aadd( aProto, "_gtDispCount --> " ) - aadd( aProto, "_gtDispEnd --> " ) - aadd( aProto, "_gtGetColorStr --> " ) - aadd( aProto, "_gtGetCursor --> " ) - aadd( aProto, "_gtGetPos --> " ) - aadd( aProto, "_gtIsColor --> " ) - aadd( aProto, "_gtMaxCol --> " ) - aadd( aProto, "_gtMaxRow --> " ) - aadd( aProto, "_gtPostExt --> " ) - aadd( aProto, "_gtPreExt --> " ) - aadd( aProto, "_gtRectSize --> " ) - aadd( aProto, "_gtRepChar --> " ) - aadd( aProto, "_gtRest --> " ) - aadd( aProto, "_gtSave --> " ) - aadd( aProto, "_gtScrDim --> " ) - aadd( aProto, "_gtScroll --> " ) - aadd( aProto, "_gtSetBlink --> " ) - aadd( aProto, "_gtSetColorStr --> " ) - aadd( aProto, "_gtSetCursor --> " ) - aadd( aProto, "_gtSetMode --> " ) - aadd( aProto, "_gtSetPos --> " ) - aadd( aProto, "_gtSetSnowFlag --> " ) - aadd( aProto, "_gtWrite --> " ) - aadd( aProto, "_gtWriteAt --> " ) - aadd( aProto, "_gtWriteCon --> " ) - aadd( aProto, "_gtInit --> " ) - aadd( aProto, "_gtExit --> " ) - aadd( aProto, "_gtWCreate --> " ) - aadd( aProto, "_gtWDestroy --> " ) - aadd( aProto, "_gtWFlash --> " ) - aadd( aProto, "_gtWApp --> " ) - aadd( aProto, "_gtWCurrent --> " ) - aadd( aProto, "_gtWPos --> " ) - aadd( aProto, "_gtWVis --> " ) - aadd( aProto, "_gtModalRead --> " ) - aadd( aProto, "_gtBeginWrite --> " ) - aadd( aProto, "_gtEndWrite --> " ) - aadd( aProto, "_gtFlushCursor --> " ) - aadd( aProto, "_gtSetColor --> " ) - aadd( aProto, "_gtGetColor --> " ) - aadd( aProto, "_gtSetBorder --> " ) - aadd( aProto, "_xalloc --> " ) - aadd( aProto, "_xgrab --> " ) - aadd( aProto, "_xfree --> " ) - aadd( aProto, "_exmgrab --> " ) - aadd( aProto, "_fsChDir --> " ) - aadd( aProto, "_fsChDrv --> " ) - aadd( aProto, "_fsClose --> " ) - aadd( aProto, "_fsCommit --> " ) - aadd( aProto, "_fsCreate --> " ) - aadd( aProto, "_fsCurDir --> " ) - aadd( aProto, "_fsCurDrv --> " ) - aadd( aProto, "_fsDelete --> " ) - aadd( aProto, "_fsError --> " ) - aadd( aProto, "_fsExtOpen --> " ) - aadd( aProto, "_fsIsDrv --> " ) - aadd( aProto, "_fsLock --> " ) - aadd( aProto, "_fsMkDir --> " ) - aadd( aProto, "_fsOpen --> " ) - aadd( aProto, "_fsRead --> " ) - aadd( aProto, "_fsRmDir --> " ) - aadd( aProto, "_fsRename --> " ) - aadd( aProto, "_fsSeek --> " ) - aadd( aProto, "_fsWrite --> " ) - aadd( aProto, "ALENGTH( n ) --> " ) - aadd( aProto, "_parc --> " ) - aadd( aProto, "_parclen --> " ) - aadd( aProto, "_parcsiz --> " ) - aadd( aProto, "_pards --> " ) - aadd( aProto, "_parinfa --> " ) - aadd( aProto, "_parinfo --> " ) - aadd( aProto, "_parl --> " ) - aadd( aProto, "_parnd --> " ) - aadd( aProto, "_parni --> " ) - aadd( aProto, "_parnl --> " ) - aadd( aProto, "_ret --> " ) - aadd( aProto, "_retc --> " ) - aadd( aProto, "_retclen --> " ) - aadd( aProto, "_retds --> " ) - aadd( aProto, "_retl --> " ) - aadd( aProto, "_retnd --> " ) - aadd( aProto, "_retni --> " ) - aadd( aProto, "_retnl --> " ) - aadd( aProto, "_storc --> " ) - aadd( aProto, "_storclen --> " ) - aadd( aProto, "_stords --> " ) - aadd( aProto, "_storl --> " ) - aadd( aProto, "_stornd --> " ) - aadd( aProto, "_storni --> " ) - aadd( aProto, "_stornl --> " ) - aadd( aProto, "_errGetDescription --> " ) - aadd( aProto, "_errGetFileName --> " ) - aadd( aProto, "_errGetFlags --> " ) - aadd( aProto, "_errGetGenCode --> " ) - aadd( aProto, "_errGetOperation --> " ) - aadd( aProto, "_errGetOsCode --> " ) - aadd( aProto, "_errGetSeverity --> " ) - aadd( aProto, "_errGetSubCode --> " ) - aadd( aProto, "_errGetSubSystem --> " ) - aadd( aProto, "_errGetTries --> " ) - aadd( aProto, "_errLaunch --> " ) - aadd( aProto, "_errNew --> " ) - aadd( aProto, "_errPutDescription --> " ) - aadd( aProto, "_errPutFileName --> " ) - aadd( aProto, "_errPutFlags --> " ) - aadd( aProto, "_errPutGenCode --> " ) - aadd( aProto, "_errPutOperation --> " ) - aadd( aProto, "_errPutOsCode --> " ) - aadd( aProto, "_errPutSeverity --> " ) - aadd( aProto, "_errPutSubCode --> " ) - aadd( aProto, "_errPutSubSystem --> " ) - aadd( aProto, "_errPutTries --> " ) - aadd( aProto, "_errRelease --> " ) - aadd( aProto, "hb_dateSeconds( void ) --> ( double )dResult" ) - aadd( aProto, "hb_dateToday( long * plYear, long * plMonth, long * plDay )" ) - aadd( aProto, "hb_dateTimeStr( char * pszTime )" ) - aadd( aProto, "hb_dateCMonth( int iMonth ) --> ( char * )pszResult" ) - aadd( aProto, "hb_dateCDOW( int iDay ) --> ( char * )pszResult" ) - aadd( aProto, "hb_dateDOW( long lYear, long lMonth, long lDay ) --> ( long )lResult" ) - aadd( aProto, "hb_dateFormat( const char * szDate, char * szFormattedDate, const char * szDateFormat ) --> ( char * )pszResult" ) - aadd( aProto, "hb_dateEncode( long lYear, long lMonth, long lDay ) --> ( long )lResult" ) - aadd( aProto, "hb_dateDecode( long julian, long * plYear, long * plMonth, long * plDay )" ) - aadd( aProto, "hb_dateStrPut( char * szDate, long lYear, long lMonth, long lDay )" ) - aadd( aProto, "hb_dateStrGet( const char * szDate, long * plYear, long * plMonth, long * plDay )" ) - aadd( aProto, "hb_dateDecStr( char * szDate, long lJulian ) --> ( char * )pszResult" ) - aadd( aProto, "hb_dateEncStr( char * szDate ) --> ( long )lResult" ) - aadd( aProto, "hb_macroError( int iError, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_macroYYParse( HB_MACRO_PTR pMacro ) --> ( int )iResult" ) - aadd( aProto, "hb_compGenPCode1( BYTE byte, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPCode2( BYTE byte1, BYTE byte2, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPCode3( BYTE byte1, BYTE byte2, BYTE byte3, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPCode4( BYTE byte1, BYTE byte2, BYTE byte3, BYTE byte4, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPCodeN( BYTE * pBuffer, ULONG ulSize, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compLocalVarGetPos( char * szVarName, HB_BISON_PTR pMacro ) --> ( int )iResult" ) - aadd( aProto, "hb_compGenJump( LONG lOffset, HB_BISON_PTR pMacro ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_compGenJumpFalse( LONG lOffset, HB_BISON_PTR pMacro ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_compGenJumpThere( ULONG ulFrom, ULONG ulTo, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenJumpHere( ULONG ulOffset, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenJumpTrue( LONG lOffset, HB_BISON_PTR pMacro ) --> ( ULONG )ulResult" ) - aadd( aProto, "hb_compMemvarGenPCode( BYTE bPCode, char * szVarName, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPushSymbol( char * szSymbolName, int isFunction, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPushLong( long lNumber, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenMessage( char * szMsgName, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenMessageData( char * szMsg, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPopVar( char * szVarName, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPopAliasedVar( char * szVarName, HB_BOOL bPushAliasValue, char * szAlias, long lWorkarea, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPushVar( char * szVarName, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPushVarRef( char * szVarName, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPushAliasedVar( char * szVarName, HB_BOOL bPushAliasValue, char * szAlias, long lWorkarea, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPushLogical( int iTrueFalse, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPushDouble( double dNumber, BYTE bWidth, BYTE bDec, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPushFunCall( char * szFunName, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compGenPushString( char * szText, ULONG ulStrLen, HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compCodeBlockStart( HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_compCodeBlockEnd( HB_BISON_PTR pMacro )" ) - aadd( aProto, "hb_setInitialize( void )" ) - aadd( aProto, "hb_setRelease( void )" ) - aadd( aProto, "hb_setListenerAdd( PHB_SET_LISTENER_CALLBACK callback ) --> int" ) - aadd( aProto, "when ) --> int" ) - aadd( aProto, "hb_setListenerRemove( int handle ) --> int" ) - aadd( aProto, "hb_vmInit( HB_BOOL bStartMainProc )" ) - aadd( aProto, "hb_vmQuit( void ) --> int" ) - aadd( aProto, "hb_vmExecute( const BYTE * pCode, PHB_SYMB pSymbols )" ) - aadd( aProto, "hb_vmProcessSymbols( PHB_SYMB pSymbols, USHORT uiSymbols )" ) - aadd( aProto, "hb_vmSymbolInit_RT( void )" ) - aadd( aProto, "hb_vmRequestQuit( void )" ) - aadd( aProto, "hb_vmRequestEndProc( void )" ) - aadd( aProto, "hb_vmRequestCancel( void )" ) - aadd( aProto, "hb_vmRequestBreak( PHB_ITEM pItem )" ) - aadd( aProto, "hb_vmRequestQuery( void ) --> ( USHORT )usResult" ) - aadd( aProto, "hb_vmMessage( PHB_SYMB pSymMsg )" ) - aadd( aProto, "hb_vmDo( USHORT uiParams )" ) - aadd( aProto, "hb_vmFunction( USHORT uiParams )" ) - aadd( aProto, "hb_vmSend( USHORT uiParams )" ) - aadd( aProto, "hb_vmEvalBlock( PHB_ITEM pBlockItem ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_vmEvalBlockV( PHB_ITEM pBlockItem, USHORT uiArgCount, ... ) --> ( PHB_ITEM )pResult" ) - aadd( aProto, "hb_vmPush( PHB_ITEM pItem )" ) - aadd( aProto, "hb_vmPushNil( void )" ) - aadd( aProto, "hb_vmPushNumber( double dNumber, int iDec )" ) - aadd( aProto, "hb_vmPushInteger( int iNumber )" ) - aadd( aProto, "hb_vmPushLong( long lNumber )" ) - aadd( aProto, "hb_vmPushDouble( double lNumber, int iDec )" ) - aadd( aProto, "hb_vmPushLogical( HB_BOOL bValue )" ) - aadd( aProto, "hb_vmPushString( char * szText, ULONG length )" ) - aadd( aProto, "hb_vmPushDate( long lDate )" ) - aadd( aProto, "hb_vmPushSymbol( PHB_SYMB pSym )" ) - aadd( aProto, "hb_vmPushPointer( void * )" ) - aadd( aProto, "hb_stackDispCall( void )" ) - aadd( aProto, "hb_stackPop( void )" ) - aadd( aProto, "PROCNAME( ) --> " ) - aadd( aProto, "PROCLINE( ) --> " ) - aadd( aProto, "PROCFILE( ) --> " ) - aadd( aProto, "HB_PVALUE( ) --> " ) - aadd( aProto, "PCOUNT() --> " ) - aadd( aProto, "__QUIT()" ) - aadd( aProto, "CLIPINIT() --> NIL" ) - aadd( aProto, "__SetHelpK()" ) - aadd( aProto, "BREAK( )" ) - aadd( aProto, "DO( [, ] ) --> " ) - aadd( aProto, "HB_IDLEADD( ) --> nHandle" ) - aadd( aProto, "HB_IDLEDEL( ) --> " ) - aadd( aProto, "HB_IDLESTATE()" ) - aadd( aProto, "void hb_idleState( void );" ) - aadd( aProto, "INKEY( [] [,] ) --> nKey" ) - aadd( aProto, "KEYBOARD " ) - aadd( aProto, "HB_KEYPUT( )" ) - aadd( aProto, "NEXTKEY( [] ) --> nKey" ) - aadd( aProto, "LASTKEY( [] ) --> nKey" ) - aadd( aProto, "KEYBOARD " ) - aadd( aProto, "READKEY() --> nKeyCode" ) - aadd( aProto, "MRow() --> nMouseRow" ) - aadd( aProto, "MCol() --> nMouseColumn" ) - aadd( aProto, "HB_LANGERRMSG( ) --> cErrorMessage" ) - aadd( aProto, "HB_LANGMESSAGE( ) --> cMessage" ) - aadd( aProto, "HB_LANGNAME() --> cLangName" ) - aadd( aProto, "HB_LANGSELECT( [] ) --> cOldLang" ) - aadd( aProto, "HB_SETCODEPAGE( [] ) --> cOldLang" ) - aadd( aProto, "HB_TRANSLATE( , [], [] ) --> cDstText" ) - aadd( aProto, "HB_SETMACRO( , [] ) --> " ) - aadd( aProto, "ABS() --> " ) - aadd( aProto, "EXP( ) --> " ) - aadd( aProto, "INT( ) --> " ) - aadd( aProto, "LOG( ) --> " ) - aadd( aProto, "MAX(,) --> " ) - aadd( aProto, "MIN(,) --> " ) - aadd( aProto, "MOD( ,) --> " ) - aadd( aProto, "SQRT( ) --> " ) - aadd( aProto, "ROUND( , ) --> " ) - aadd( aProto, "--> int iMathErrorType" ) - aadd( aProto, "hb_mathResetError (void)" ) - aadd( aProto, "hb_mathIsMathErr (void) --> int iIsMathHandler" ) - aadd( aProto, "--> HB_MATH_HANDLERPROC previous_handerproc" ) - aadd( aProto, "hb_mathGetHandler (void) --> HB_MATH_HANDLERPROC handlerproc" ) - aadd( aProto, "hb_mathSetErrMode (int imode) --> int ioldmode" ) - aadd( aProto, "hb_mathGetErrMode (void) --> imode" ) - aadd( aProto, "HB_MATHERMODE ([]) --> " ) - aadd( aProto, "HB_MATHERBLOCK ([]) --> " ) - aadd( aProto, "MEMOTRAN( , , ) --> " ) - aadd( aProto, "HARDCR( ) --> " ) - aadd( aProto, "MEMOREAD( ) --> cString" ) - aadd( aProto, "MEMOWRIT( , , [] ) --> lSuccess" ) - aadd( aProto, "FIELD [, [in ]" ) - aadd( aProto, "LOCAL [:= ]" ) - aadd( aProto, "MEMVAR " ) - aadd( aProto, "ACHOICE(, , , , , [ | ], [ | ], [], []) --> nPosition" ) - aadd( aProto, "__AtPrompt( , , , [] ) --> .F." ) - aadd( aProto, "@ , PROMPT [MESSAGE ]" ) - aadd( aProto, "__MenuTo( , ) --> nChoice" ) - aadd( aProto, "MENU TO " ) - aadd( aProto, "OS() --> " ) - aadd( aProto, "VERSION() --> " ) - aadd( aProto, "GETENV( ) --> " ) - aadd( aProto, "GETE( ) --> " ) - aadd( aProto, "HB_GETENV(, [], [] ) --> " ) - aadd( aProto, "__RUN( )" ) - aadd( aProto, "TONE( , ) --> NIL" ) - aadd( aProto, "RUN " ) - aadd( aProto, "ISAFFIRM( ) --> " ) - aadd( aProto, "ISNEGATIVE( ) --> " ) - aadd( aProto, "Language and Nation MSG( ) --> " ) - aadd( aProto, "__objHasData( , ) --> lExist" ) - aadd( aProto, "__objHasMethod( , ) --> lExist" ) - aadd( aProto, "__objGetMsgList( , [], [nClassType] ) --> aNames" ) - aadd( aProto, "__objGetMethodList( ) --> aMethodNames" ) - aadd( aProto, "__objGetValueList( , [] ) --> aData" ) - aadd( aProto, "__ObjSetValueList( , ) --> oObject" ) - aadd( aProto, "__objAddMethod( , , ) --> oObject" ) - aadd( aProto, "__objAddInline( , , ) --> oObject" ) - aadd( aProto, "__objAddData( , ) --> oObject" ) - aadd( aProto, "__objModMethod( , , ) --> oObject" ) - aadd( aProto, "__objModInline( , , ) --> oObject" ) - aadd( aProto, "__objDelMethod( , ) --> oObject" ) - aadd( aProto, "__objDelInline( , ) --> oObject" ) - aadd( aProto, "__objDelMethod( , ) --> oObject" ) - aadd( aProto, "__objDerivedFrom( , ) --> lIsParent" ) - aadd( aProto, "DBEVAL( ," ) - aadd( aProto, "Dbf() --> " ) - aadd( aProto, "DbAppend( [] ) --> NIL" ) - aadd( aProto, "DbClearFilTer() --> NIL" ) - aadd( aProto, "DbCloseAll() --> NIL" ) - aadd( aProto, "DbCloseArea()" ) - aadd( aProto, "BCOMMIT()" ) - aadd( aProto, "DBCOMMIT()" ) - aadd( aProto, "DBCREATE( , , [], []," ) - aadd( aProto, "DBDELETE()" ) - aadd( aProto, "DBFILTER() --> cFilter" ) - aadd( aProto, "DBGOBOTTOM()" ) - aadd( aProto, "DBGOTO()" ) - aadd( aProto, "DBGOTOP()" ) - aadd( aProto, "DBRECALL()" ) - aadd( aProto, "DBRLOCK([]) --> lSuccess" ) - aadd( aProto, "DBRLOCKLIST() --> aRecordLocks" ) - aadd( aProto, "DBRUNLOCK([])" ) - aadd( aProto, "DBSEEK(, [],[]) --> lFound" ) - aadd( aProto, "DBSELECTAREA() -" ) - aadd( aProto, "DBSETDRIVER( [] ) --> cCurrentDriver" ) - aadd( aProto, "DBSKIP([])" ) - aadd( aProto, "DBSETFILTER(, [])" ) - aadd( aProto, "DBSTRUCT() --> aStruct" ) - aadd( aProto, "DBUNLOCK()" ) - aadd( aProto, "DBUNLOCKALL()" ) - aadd( aProto, "DBUSEAREA( [], [], , []," ) - aadd( aProto, "AFields([,][,][,]) --> " ) - aadd( aProto, "Alias([]) --> " ) - aadd( aProto, "BOF() --> " ) - aadd( aProto, "ZAP" ) - aadd( aProto, "DELETED() --> lDeleted" ) - aadd( aProto, "EOF() --> " ) - aadd( aProto, "FCOUNT() --> nFields" ) - aadd( aProto, "FIELDGET() --> ValueField" ) - aadd( aProto, "FIELDNAME/FIELD() --> cFieldName" ) - aadd( aProto, "FIELDPOS() --> nFieldPos" ) - aadd( aProto, "FIELDPUT(, ) --> ValueAssigned" ) - aadd( aProto, "FLOCK() --> lSuccess" ) - aadd( aProto, "FOUND() --> lSuccess" ) - aadd( aProto, "HEADER() --> nBytes" ) - aadd( aProto, "LASTREC() | RECCOUNT()* --> nRecords" ) - aadd( aProto, "LUPDATE() --> dModification" ) - aadd( aProto, "NETERR([]) --> lError" ) - aadd( aProto, "RECCOUNT()* | LASTREC() --> nRecords" ) - aadd( aProto, "RECNO() --> Identity" ) - aadd( aProto, "RECSIZE() --> nBytes" ) - aadd( aProto, "RLOCK() --> lSuccess" ) - aadd( aProto, "SELECT([]) --> nWorkArea" ) - aadd( aProto, "USED() --> lDbfOpen" ) - aadd( aProto, "PACK" ) - aadd( aProto, "ORDBAGEXT() --> cBagExt" ) - aadd( aProto, "ORDBAGNAME( | ) --> cOrderBagName" ) - aadd( aProto, "ORDCONSET([]," ) - aadd( aProto, "ORDCREATE(,[], ," ) - aadd( aProto, "ORDDESTROY( [, ])" ) - aadd( aProto, "ORDFOR([, ]) --> cForExp" ) - aadd( aProto, "ORDKEY( | [, ]) --> cExpKey" ) - aadd( aProto, "INDEXEXT() --> " ) - aadd( aProto, "INDEXKEY() --> " ) - aadd( aProto, "INDEXORD() --> " ) - aadd( aProto, "@ , [SAY [PICTURE ] COLOR ]" ) - aadd( aProto, "@ , SAY [ PICTURE ] [COLOR ]" ) - aadd( aProto, "__SETCENTURY([ | ] ) --> lPreviousValue" ) - aadd( aProto, "Set( [, [, ] ] ) --> xPreviousSetting" ) - aadd( aProto, "__SetFunction( , [] ) --> NIL" ) - aadd( aProto, "SET FUNCTION TO []" ) - aadd( aProto, "SETKEY( [, [, ] ] )" ) - aadd( aProto, "HB_SETKEYGET( [, ] )" ) - aadd( aProto, "B_SETKEYSAVE( [ ] )" ) - aadd( aProto, "HB_SetKeyCheck( [, ][, ][, ] )" ) - aadd( aProto, "SET KEY to p] [when ] )" ) - aadd( aProto, "SETTYPEAHEAD( ) --> " ) - aadd( aProto, "__XHELP() --> " ) - aadd( aProto, "SET DEFAULT TO []" ) - aadd( aProto, "SET WRAP on | OFF | (" ) - aadd( aProto, "SET MESSAGE TO [ [CENTER]]" ) - aadd( aProto, "SET PATH TO []" ) - aadd( aProto, "SET INTENSITY ON | off | ()" ) - aadd( aProto, "SET ALTERNATE to [ADDITIVE]" ) - aadd( aProto, "SET CENTURY on | OFF | ()" ) - aadd( aProto, "SET DATE FORMAT [TO] " ) - aadd( aProto, "SET EPOCH TO " ) - aadd( aProto, "SET FIXED on | OFF | ()" ) - aadd( aProto, "SET PRINTER on | OFF" ) - aadd( aProto, "SET CONSOLE ON | off | ()" ) - aadd( aProto, "SET DECIMALS TO []" ) - aadd( aProto, "SET DEVICE TO [printer | SCREEN ]" ) - aadd( aProto, "SET BELL on | OFF | ()" ) - aadd( aProto, "SETMODE( , ) --> lSuccess" ) - aadd( aProto, "ISALPHA( ) --> lAlpha" ) - aadd( aProto, "ISDIGIT( ) --> lDigit" ) - aadd( aProto, "ISUPPER( ) --> lUpper" ) - aadd( aProto, "ISLOWER( ) --> lLower" ) - aadd( aProto, "LTRIM( ) --> cReturn" ) - aadd( aProto, "AT( , , [], [] ) --> nPos" ) - aadd( aProto, "RAT( , ) --> nPos" ) - aadd( aProto, "LEFT( , ) --> cReturn" ) - aadd( aProto, "RIGHT( , ) --> cReturn" ) - aadd( aProto, "SUBSTR( , , [] ) --> cReturn" ) - aadd( aProto, "STR( , [], [] ) --> cNumber" ) - aadd( aProto, "STRZERO( , [], [] ) --> cNumber" ) - aadd( aProto, "HB_VALTOSTR( ) --> cString" ) - aadd( aProto, "LEN( | ) --> " ) - aadd( aProto, "EMPTY( ) --> lIsEmpty" ) - aadd( aProto, "DESCEND( ) --> xExpInverted" ) - aadd( aProto, "HB_ANSITOOEM( ) --> cDosString" ) - aadd( aProto, "HB_OEMTOANSI( ) --> cDosString" ) - aadd( aProto, "LOWER( ) --> cLowerString" ) - aadd( aProto, "UPPER( ) --> cUpperString" ) - aadd( aProto, "CHR( ) --> cReturn" ) - aadd( aProto, "ASC( ) --> nAscNumber" ) - aadd( aProto, "PADC( , , ) --> cString" ) - aadd( aProto, "PADL( , , ) --> cString" ) - aadd( aProto, "PADR( , , ) --> cString" ) - aadd( aProto, "ALLTRIM( ) --> cExpression" ) - aadd( aProto, "RTRIM( ) --> cString" ) - aadd( aProto, "TRIM( ) --> cString" ) - aadd( aProto, "REPLICATE( , ) --> cReplicateString" ) - aadd( aProto, "SPACE( ) --> cString" ) - aadd( aProto, "VAL( ) --> nNumber" ) - aadd( aProto, "STRTRAN( , , [], []," ) - aadd( aProto, "TRANSFORM( , ) --> cFormated" ) - aadd( aProto, "oClass := HBClass():New('TMyClass')" ) - aadd( aProto, "__XSaveScreen()" ) - aadd( aProto, "SAVE SCREEN" ) - aadd( aProto, "__XRestScreen()" ) - aadd( aProto, "RESTORE SCREEN" ) - aadd( aProto, "ALERT( , [], [], [] ) --> nChoice or NIL" ) - aadd( aProto, "__NONOALERT()" ) - aadd( aProto, "HB_OSNewLine() --> cString" ) - aadd( aProto, "hb_ColorIndex( , ) --> " ) - aadd( aProto, "DEVOUTPICT( , , [] )" ) - aadd( aProto, "__INPUT( ) --> " ) - aadd( aProto, "__TextSave( )" ) - aadd( aProto, "__TextRestore()" ) - aadd( aProto, "__WAIT( ) --> " ) - aadd( aProto, "OUTSTD( )" ) - aadd( aProto, "OUTERR( )" ) - aadd( aProto, "EJECT" ) - aadd( aProto, "COL() --> nPosition" ) - aadd( aProto, "ROW() --> nPosition" ) - aadd( aProto, "MAXCOL() --> nPosition" ) - aadd( aProto, "MAXROW() --> nPosition" ) - aadd( aProto, "READVAR( [] ) --> cOldVarName" ) - aadd( aProto, "LABEL FORM [TO PRINTER] [TO FILE ] []" ) - aadd( aProto, "REPORT FORM [TO PRINTER] [TO FILE ] []" ) - aadd( aProto, "__MVPUBLIC( )" ) - aadd( aProto, "__MVPRIVATE( )" ) - aadd( aProto, "__MVXRELEASE( )" ) - aadd( aProto, "__MVRELEASE( , )" ) - aadd( aProto, "__MVSCOPE( )" ) - aadd( aProto, "__MVCLEAR()" ) - aadd( aProto, "__MVDBGINFO( [, [, @] ] )" ) - aadd( aProto, "__MVEXIST( ) --> " ) - aadd( aProto, "__MVGET( ) --> " ) - aadd( aProto, "__MVGET( [, ] ) --> " ) - aadd( aProto, "MEMVARBLOCK( ) --> " ) - aadd( aProto, "FIELDBLOCK( ) --> bFieldBlock" ) - aadd( aProto, "FIELDWBLOCK( , ) --> bFieldBlock" ) - aadd( aProto, "TYPE( ) --> " ) - aadd( aProto, "VALTYPE( ) --> " ) - aadd( aProto, "HB_ISBYREF( @ ) --> " ) - aadd( aProto, "Harbour Prototype" ) - - RETURN aProto diff --git a/harbour/contrib/hbide/idemisc.prg b/harbour/contrib/hbide/idemisc.prg index 5cdf1672a8..5e300135b9 100644 --- a/harbour/contrib/hbide/idemisc.prg +++ b/harbour/contrib/hbide/idemisc.prg @@ -2053,6 +2053,12 @@ FUNCTION hbide_getUI( cUI, qParent ) CASE "mainwindow" oUI := iif( nModeUI == UI_MODE_FUNC, hbqtui_Mainwindow( qParent ), NIL ) EXIT + CASE "skeletons" + oUI := iif( nModeUI == UI_MODE_FUNC, hbqtui_Skeletons( qParent ), NIL ) + EXIT + CASE "editor" + oUI := iif( nModeUI == UI_MODE_FUNC, hbqtui_Editor( qParent ), NIL ) + EXIT ENDSWITCH IF empty( oUI ) diff --git a/harbour/contrib/hbide/ideplugins.prg b/harbour/contrib/hbide/ideplugins.prg index c444cdc320..f11f9fe8b7 100644 --- a/harbour/contrib/hbide/ideplugins.prg +++ b/harbour/contrib/hbide/ideplugins.prg @@ -113,40 +113,43 @@ FUNCTION hbide_execPlugin( cPlugin, oIde, ... ) /*----------------------------------------------------------------------*/ STATIC FUNCTION hbide_loadAPlugin( cPlugin, oIde, cVer ) - LOCAL pHrb, bBlock, lLoaded, cFileName, cFile + LOCAL pHrb, bBlock, lLoaded, cFileName, cFile, cPath - cFileName := hb_dirBase() + hb_osPathSeparator() + "plugins" + hb_osPathSeparator() + cPlugin + ".hrb" - IF hb_fileExists( cFileName ) - pHrb := hb_hrbLoad( HB_HRB_BIND_OVERLOAD, cFileName ) - ELSE - cFileName := hb_dirBase() + hb_osPathSeparator() + "plugins" + hb_osPathSeparator() + cPlugin + ".prg" + IF !empty( cPath := oIde:oINI:getResourcesPath() ) + + cFileName := cPath + "hbide_plugin_" + cPlugin + ".hrb" IF hb_fileExists( cFileName ) - cFile := hb_memoread( cFileName ) - cFile := hb_compileFromBuf( cFile, "-n2", "-w3", "-es2", "-q0" ) - IF ! Empty( cFile ) - pHrb := hb_hrbLoad( HB_HRB_BIND_OVERLOAD, cFile ) - ENDIF + pHrb := hb_hrbLoad( HB_HRB_BIND_OVERLOAD, cFileName ) ELSE - cFileName := hb_dirBase() + hb_osPathSeparator() + "plugins" + hb_osPathSeparator() + cPlugin + ".hbs" + cFileName := cPath + "hbide_plugin_" + cPlugin + ".prg" IF hb_fileExists( cFileName ) cFile := hb_memoread( cFileName ) cFile := hb_compileFromBuf( cFile, "-n2", "-w3", "-es2", "-q0" ) IF ! Empty( cFile ) pHrb := hb_hrbLoad( HB_HRB_BIND_OVERLOAD, cFile ) ENDIF + ELSE + cFileName := cPath + "hbide_plugin_" + cPlugin + ".hbs" + IF hb_fileExists( cFileName ) + cFile := hb_memoread( cFileName ) + cFile := hb_compileFromBuf( cFile, "-n2", "-w3", "-es2", "-q0" ) + IF ! Empty( cFile ) + pHrb := hb_hrbLoad( HB_HRB_BIND_OVERLOAD, cFile ) + ENDIF + ENDIF ENDIF ENDIF - ENDIF - IF ( lLoaded := ! empty( pHrb ) ) - IF ! Empty( hb_hrbGetFunSym( pHrb, cPlugin + "_init" ) ) - bBlock := &( "{|...| " + cPlugin + "_init(...) }" ) + IF ( lLoaded := ! empty( pHrb ) ) + IF ! Empty( hb_hrbGetFunSym( pHrb, cPlugin + "_init" ) ) + bBlock := &( "{|...| " + cPlugin + "_init(...) }" ) - IF eval( bBlock, oIde, cVer ) - IF ! Empty( hb_hrbGetFunSym( pHrb, cPlugin + "_exec" ) ) - aadd( s_aPlugins, { cPlugin, &( "{|...| " + cPlugin + "_exec(...) }" ), pHrb } ) - lLoaded := .t. + IF eval( bBlock, oIde, cVer ) + IF ! Empty( hb_hrbGetFunSym( pHrb, cPlugin + "_exec" ) ) + aadd( s_aPlugins, { cPlugin, &( "{|...| " + cPlugin + "_exec(...) }" ), pHrb } ) + lLoaded := .t. + ENDIF ENDIF ENDIF ENDIF @@ -189,20 +192,76 @@ FUNCTION hbide_runAScript( cBuffer, cCompFlags, xParam ) FUNCTION hbide_execAutoScripts() LOCAL cPath, a_, dir_, cFileName, cBuffer - cPath := hb_dirBase() + hb_osPathSeparator() + "plugins" + hb_osPathSeparator() - - a_:= {} - dir_:= directory( cPath + "auto_*.prg" ) - aeval( dir_, {|e_| aadd( a_, e_[ 1 ] ) } ) - dir_:= directory( cPath + "auto_*.hbs" ) - aeval( dir_, {|e_| aadd( a_, e_[ 1 ] ) } ) - - FOR EACH cFileName IN a_ - IF !empty( cBuffer := hb_memoRead( cPath + cFileName ) ) - hbide_runAScript( cBuffer, /* No Compiler Flag */, hbide_setIde() ) - ENDIF - NEXT + IF !empty( cPath := hbide_setIde():oINI:getResourcesPath() ) + a_:= {} + dir_:= directory( cPath + "hbide_auto_*.prg" ) + aeval( dir_, {|e_| aadd( a_, e_[ 1 ] ) } ) + dir_:= directory( cPath + "hbide_auto_*.hbs" ) + aeval( dir_, {|e_| aadd( a_, e_[ 1 ] ) } ) + FOR EACH cFileName IN a_ + IF !empty( cBuffer := hb_memoRead( cPath + cFileName ) ) + hbide_runAScript( cBuffer, /* No Compiler Flag */, hbide_setIde() ) + ENDIF + NEXT + ENDIF RETURN NIL /*------------------------------------------------------------------------*/ + +FUNCTION hbide_getUserPrototypes() + LOCAL aProto := {} + LOCAL cPath, aDir, cMask, a_, b_ + + IF ! empty( cPath := hbide_setIde():oINI:getResourcesPath() ) + cMask := cPath + "hbide_protos_*" + IF ! empty( aDir := directory( cMask ) ) + FOR EACH a_ IN aDir + b_:= hbide_loadProtoTypes( cPath + a_[ 1 ] ) + aeval( b_, {|e| aadd( aProto, e ) } ) + NEXT + ENDIF + ENDIF + + RETURN aProto + +/*------------------------------------------------------------------------*/ + +FUNCTION hbide_loadPrototypes( cPath ) + LOCAL a_, s, nLen, i + LOCAL aProto := {}, b_:={} + + IF hb_fileExists( cPath ) + a_:= hbide_readSource( cPath ) + + FOR EACH s IN a_ + s := alltrim( s ) + IF empty( s ) + LOOP + ENDIF + aadd( b_, s ) + NEXT + ENDIF + + nLen := len( b_ ) + FOR EACH s IN b_ + i := s:__enumIndex() + IF right( s, 1 ) == ";" + s := substr( s, 1, len( s ) - 1 ) + IF i < nLen + b_[ i + 1 ] := s + " " + b_[ i + 1 ] + s := "" + ENDIF + ENDIF + NEXT + + FOR EACH s IN b_ + IF empty( s ) + LOOP + ENDIF + aadd( aProto, s ) + NEXT + + RETURN aProto + +/*------------------------------------------------------------------------*/ diff --git a/harbour/contrib/hbide/ideprojmanager.prg b/harbour/contrib/hbide/ideprojmanager.prg index 86b6f06a75..21627f23ef 100644 --- a/harbour/contrib/hbide/ideprojmanager.prg +++ b/harbour/contrib/hbide/ideprojmanager.prg @@ -136,8 +136,7 @@ CLASS IdeProject DATA sources INIT {} DATA dotHbp INIT "" DATA compilers INIT "" - DATA cPathMk2 INIT hb_getenv( "HBIDE_DIR_HBMK2" ) - DATA cPathEnv INIT hb_DirBase() + DATA cPathHbMk2 DATA hSources INIT {=>} DATA hPaths INIT {=>} DATA lPathAbs INIT .F. // Lets try relative paths first . xhp and hbp will be relative anyway @@ -182,12 +181,7 @@ METHOD IdeProject:new( oIDE, aProps ) ::dotHbp := "" ::compilers := "" - IF !empty( oIDE:oINI:cPathMk2 ) - ::cPathMk2 := oIDE:oINI:cPathMk2 - ENDIF - IF !empty( oIDE:oINI:cPathEnv ) - ::cPathEnv := oIDE:oINI:cPathEnv - ENDIF + ::cPathHbMk2 := oIde:oINI:getHbmk2File() FOR EACH cSource IN ::sources cSource := hbide_syncProjPath( ::projPath, cSource ) @@ -839,8 +833,8 @@ METHOD IdeProjManager:synchronizeAlienProject( cProjFileName ) ENDIF cExeHbMk2 := "hbmk2" - IF ! Empty( ::oIDE:oINI:cPathMk2 ) - cExeHbMk2 := hbide_DirAddPathSep( ::oIDE:oINI:cPathMk2 ) + cExeHbMk2 + IF ! Empty( ::oIDE:oINI:cPathHbMk2 ) + cExeHbMk2 := hbide_DirAddPathSep( ::oIDE:oINI:cPathHbMk2 ) + cExeHbMk2 ENDIF SWITCH lower( cExt ) @@ -1439,12 +1433,7 @@ METHOD IdeProjManager:buildProject( cProject, lLaunch, lRebuild, lPPO, lViaQt ) ::cBatch := ::oEV:prepareBatch( ::cWrkEnvironment ) aeval( ::oEV:getHbmk2Commands( ::cWrkEnvironment ), {|e| aadd( aHbp, e ) } ) - cExeHbMk2 := "hbmk2" - - IF ! Empty( ::oProject:cPathMk2 ) - cExeHbMk2 := hbide_DirAddPathSep( ::oProject:cPathMk2 ) + cExeHbMk2 - ENDIF - + cExeHbMk2 := ::oINI:getHbmk2File() cCmdParams := hbide_array2cmdParams( aHbp ) ::oProcess := HbpProcess():new() @@ -1633,3 +1622,4 @@ METHOD IdeProjManager:outputText( cText ) RETURN Self /*----------------------------------------------------------------------*/ + diff --git a/harbour/contrib/hbide/idesaveload.prg b/harbour/contrib/hbide/idesaveload.prg index 6705d9d048..51651f84fc 100644 --- a/harbour/contrib/hbide/idesaveload.prg +++ b/harbour/contrib/hbide/idesaveload.prg @@ -70,22 +70,6 @@ #include "hbqt.ch" /*----------------------------------------------------------------------*/ -#if 0 -#define INI_HBIDE 1 -#define INI_PROJECTS 2 -#define INI_FILES 3 -#define INI_FIND 4 -#define INI_REPLACE 5 -#define INI_RECENTFILES 6 -#define INI_RECENTPROJECTS 7 -#define INI_FOLDERS 8 -#define INI_VIEWS 9 -#define INI_TAGGEDPROJECTS 10 -#define INI_GENERAL 11 -#define INI_TOOLS 12 -#define INI_USERTOOLBARS 13 -#define INI_KEYWORDS 14 -#endif #define INI_SECTIONS_COUNT 14 #define INI_HBIDE_VRBLS 30 @@ -112,9 +96,15 @@ CLASS IdeINI INHERIT IdeObject DATA cIdeTheme INIT "" DATA cIdeAnimated INIT "" // - DATA cPathMk2 INIT "" + DATA cPathHrbRoot INIT "" + DATA cPathHbmk2 INIT "" + DATA cPathResources INIT "" + DATA cPathTemp INIT "" DATA cPathEnv INIT "" - // /* Not used yet but planned for future */ + DATA cPathShortcuts INIT "" + DATA cPathSnippets INIT "" + DATA cPathThemes INIT "" + DATA cCurrentProject INIT "" DATA cCurrentTheme INIT "" DATA cCurrentCodec INIT "" @@ -123,8 +113,6 @@ CLASS IdeINI INHERIT IdeObject DATA cCurrentFolderFind INIT "" DATA cCurrentReplace INIT "" DATA cCurrentView INIT "" - DATA cCurrentHarbour INIT "" - DATA cCurrentShortcuts INIT "" // DATA cTextFileExtensions INIT ".c,.cpp,.prg,.h,.ch,.txt,.log,.ini,.env,.ppo,.qtp,.hbs," + ; ".cc,.hbc,.hbp,.hbm,.xml,.bat,.sh,.rc,.ui,.uic,.bak,.fmg,.qth" @@ -172,6 +160,17 @@ CLASS IdeINI INHERIT IdeObject METHOD load( cHbideIni ) METHOD save( cHbideIni ) + METHOD getIniPath() + METHOD getResourcesPath() + METHOD getTempPath() + METHOD getHarbourPath() + METHOD getIniFile() + METHOD getEnvFile() + METHOD getHbmk2File() + METHOD getSnippetsFile() + METHOD getShortcutsFile() + METHOD getThemesFile() + ENDCLASS /*----------------------------------------------------------------------*/ @@ -189,6 +188,71 @@ METHOD IdeINI:create( oIde ) /*----------------------------------------------------------------------*/ +METHOD IdeINI:getINIPath() + LOCAL cPath + hb_fNameSplit( ::oIde:cProjIni, @cPath ) + RETURN cPath + +/*------------------------------------------------------------------------*/ + +METHOD IdeINI:getResourcesPath() + LOCAL cPath := iif( empty( ::cPathResources ), ::getINIPath(), ::cPathResources ) + RETURN iif( empty( cPath ), cPath, hbide_pathToOSPath( hbide_pathAppendLastSlash( cPath ) ) ) + +/*------------------------------------------------------------------------*/ + +METHOD IdeINI:getHarbourPath() + RETURN iif( empty( ::cPathHrbRoot ), ::cPathHrbRoot, hbide_pathToOSPath( hbide_pathAppendLastSlash( ::cPathHrbRoot ) ) ) + +/*------------------------------------------------------------------------*/ + +METHOD IdeINI:getTempPath() + RETURN hbide_pathToOSPath( ::cPathTemp ) + +/*------------------------------------------------------------------------*/ + +METHOD IdeINI:getINIFile() + RETURN hbide_pathToOSPath( hbide_pathFile( ::getINIPath(), "hbide.ini" ) ) + +/*------------------------------------------------------------------------*/ + +METHOD IdeINI:getHbmk2File() + LOCAL cFile + + IF empty( ::cPathHbmk2 ) + IF empty( cFile := hb_getenv( "HBIDE_DIR_HBMK2" ) ) + cFile := "hbmk2" + ELSE + cFile := hbide_pathFile( cFile, "hbmk2" ) + ENDIF + ELSE + cFile := ::cPathHbmk2 + ENDIF + + RETURN hbide_pathToOSPath( cFile ) + +/*------------------------------------------------------------------------*/ + +METHOD IdeINI:getEnvFile() + RETURN hbide_pathToOSPath( iif( empty( ::cPathEnv ), hbide_pathFile( ::getINIPath(), "hbide.skl" ), ::cPathEnv ) ) + +/*------------------------------------------------------------------------*/ + +METHOD IdeINI:getSnippetsFile() + RETURN hbide_pathToOSPath( iif( empty( ::cPathSnippets ), hbide_pathFile( ::getINIPath(), "hbide.skl" ), ::cPathSnippets ) ) + +/*------------------------------------------------------------------------*/ + +METHOD IdeINI:getShortcutsFile() + RETURN hbide_pathToOSPath( iif( empty( ::cPathShortcuts ), hbide_pathFile( ::getINIPath(), "hbide.scu" ), ::cPathShortcuts ) ) + +/*------------------------------------------------------------------------*/ + +METHOD IdeINI:getThemesFile() + RETURN hbide_pathToOSPath( iif( empty( ::cPathThemes ), hbide_pathFile( ::getINIPath(), "hbide.hbt" ), ::cPathThemes ) ) + +/*------------------------------------------------------------------------*/ + METHOD IdeINI:save( cHbideIni ) LOCAL j, nTab, pTab, n, txt_, oEdit, nTabs, nn, a_, s @@ -218,9 +282,15 @@ METHOD IdeINI:save( cHbideIni ) // aadd( txt_, "IdeTheme" + "=" + ::cIdeTheme ) aadd( txt_, "IdeAnimated" + "=" + ::cIdeAnimated ) - - aadd( txt_, "PathMk2" + "=" + ::cPathMk2 ) + // + aadd( txt_, "PathHrbRoot" + "=" + ::cPathHrbRoot ) + aadd( txt_, "PathMk2" + "=" + ::cPathHbMk2 ) + aadd( txt_, "PathResources" + "=" + ::cPathResources ) + aadd( txt_, "PathTemp" + "=" + ::cPathTemp ) aadd( txt_, "PathEnv" + "=" + ::cPathEnv ) + aadd( txt_, "PathShortcuts" + "=" + ::cPathShortcuts ) + aadd( txt_, "PathSnippets" + "=" + ::cPathSnippets ) + aadd( txt_, "PathThemes" + "=" + ::cPathThemes ) // aadd( txt_, "CurrentProject" + "=" + ::oIde:cWrkProject ) aadd( txt_, "CurrentTheme" + "=" + ::oIde:cWrkTheme ) @@ -230,8 +300,6 @@ METHOD IdeINI:save( cHbideIni ) aadd( txt_, "CurrentFolderFind" + "=" + ::oIde:cWrkFolderFind ) aadd( txt_, "CurrentReplace" + "=" + ::oIde:cWrkReplace ) aadd( txt_, "CurrentView" + "=" + ::oIde:cWrkView ) - aadd( txt_, "CurrentHarbour" + "=" + ::oIde:cWrkHarbour ) - aadd( txt_, "CurrentShortcuts" + "=" + ::oIde:cPathShortcuts ) aadd( txt_, "TextFileExtensions" + "=" + ::oINI:cTextFileExtensions ) // aadd( txt_, "FontName" + "=" + ::cFontName ) @@ -488,9 +556,15 @@ METHOD IdeINI:load( cHbideIni ) // CASE "IdeTheme" ; ::cIdeTheme := cVal ; EXIT CASE "IdeAnimated" ; ::cIdeAnimated := cVal ; EXIT - // /* Subject to be identified under this object only */ - CASE "PathMk2" ; ::cPathMk2 := cVal ; EXIT + // + CASE "PathHrbRoot" ; ::cPathHrbRoot := cVal ; EXIT + CASE "PathMk2" ; ::cPathHbMk2 := cVal ; EXIT + CASE "PathResources" ; ::cPathResources := cVal ; EXIT + CASE "PathTemp" ; ::cPathTemp := cVal ; EXIT CASE "PathEnv" ; ::cPathEnv := cVal ; EXIT + CASE "PathShortcuts" ; ::cPathShortcuts := cVal ; EXIT + CASE "PathSnippets" ; ::cPathSnippets := cVal ; EXIT + CASE "PathThemes" ; ::cPathThemes := cVal ; EXIT // CASE "CurrentProject" ; ::oIde:cWrkProject := cVal ; EXIT CASE "CurrentTheme" ; ::oIde:cWrkTheme := cVal ; EXIT @@ -500,8 +574,6 @@ METHOD IdeINI:load( cHbideIni ) CASE "CurrentFolderFind" ; ::oIde:cWrkFolderFind := cVal ; EXIT CASE "CurrentReplace" ; ::oIde:cWrkReplace := cVal ; EXIT CASE "CurrentView" ; ::oIde:cWrkView := cVal ; EXIT - CASE "CurrentHarbour" ; ::oIde:cWrkHarbour := cVal ; EXIT - CASE "CurrentShortcuts" ; ::oIde:cPathShortcuts := cVal ; EXIT CASE "TextFileExtensions" ; ::oINI:cTextFileExtensions := cVal ; EXIT // CASE "FontName" ; ::cFontName := cVal ; EXIT @@ -688,19 +760,11 @@ FUNCTION hbide_getIniPath( cHbideIni ) /*----------------------------------------------------------------------*/ FUNCTION hbide_loadSkltns( oIde, cPathSkltns ) - LOCAL cPath, s, n, cSkltn, cCode + LOCAL s, n, cSkltn, cCode IF empty( cPathSkltns ) - hb_fNameSplit( oIde:cProjIni, @cPath ) - cPath += "hbide.skl" - - IF hb_fileExists( cPath ) - cPathSkltns := cPath - ELSE - cPathSkltns := hb_dirBase() + "hbide.skl" - ENDIF + cPathSkltns := oIde:oINI:getSnippetsFile() ENDIF - oIde:cPathSkltns := cPathSkltns IF hb_fileExists( cPathSkltns ) s := hb_memoread( cPathSkltns ) @@ -753,30 +817,16 @@ FUNCTION hbide_saveSkltns( oIde ) aadd( txt_, "" ) NEXT - RETURN hbide_createTarget( oIde:cPathSkltns, txt_ ) + RETURN hbide_createTarget( oIde:oINI:getSnippetsFile(), txt_ ) /*----------------------------------------------------------------------*/ FUNCTION hbide_loadShortcuts( oIde, cFileShortcuts ) - LOCAL cPath, a_:= {} + LOCAL a_:= {} IF empty( cFileShortcuts ) - cFileShortcuts := oIde:cPathShortcuts - IF empty( cFileShortcuts ) - cFileShortcuts := oIde:cProjIni - ENDIF - - hb_fNameSplit( cFileShortcuts, @cPath ) - cPath += "hbide.scu" - - IF hb_fileExists( cPath ) - cFileShortcuts := cPath - ELSE - cFileShortcuts := hb_dirBase() + "hbide.scu" - ENDIF + cFileShortcuts := oIde:oINI:getShortcutsFile() ENDIF - oIde:cPathShortcuts := cFileShortcuts - IF hb_fileExists( cFileShortcuts ) a_:= hb_deSerialize( hb_memoread( cFileShortcuts ) ) ENDIF @@ -786,24 +836,10 @@ FUNCTION hbide_loadShortcuts( oIde, cFileShortcuts ) /*----------------------------------------------------------------------*/ FUNCTION hbide_saveShortcuts( oIde, a_, cFileShortcuts ) - LOCAL cPath IF empty( cFileShortcuts ) - cFileShortcuts := oIde:cPathShortcuts - IF empty( cFileShortcuts ) - cFileShortcuts := oIde:cProjIni - ENDIF - - hb_fNameSplit( cFileShortcuts, @cPath ) - cPath += "hbide.scu" - - IF hb_fileExists( cPath ) - cFileShortcuts := cPath - ELSE - cFileShortcuts := hb_dirBase() + "hbide.scu" - ENDIF + cFileShortcuts := oIde:oINI:getShortcutsFile() ENDIF - hb_memowrit( cFileShortcuts, hb_serialize( a_ ) ) RETURN hb_fileExists( cFileShortcuts ) @@ -814,7 +850,7 @@ FUNCTION hbide_loadHarbourProtos( oIde ) HB_SYMBOL_UNUSED( oIde ) - RETURN hbide_harbourProtos() + RETURN NIL //hbide_harbourProtos() /*------------------------------------------------------------------------*/ @@ -869,6 +905,7 @@ CLASS IdeSetup INHERIT IdeObject DATA aKeyItems INIT {} DATA nCurThemeSlot INIT 0 + DATA aHilighters INIT {} METHOD new( oIde ) METHOD create( oIde ) @@ -892,6 +929,7 @@ CLASS IdeSetup INHERIT IdeObject METHOD pushThemeColors( nTheme ) METHOD pushThemesData() METHOD getThemeData( nTheme ) + METHOD viewIt( cFileName, lSaveAs, lSave, lReadOnly, lApplyHiliter ) ENDCLASS @@ -937,13 +975,21 @@ METHOD IdeSetup:setIcons() ::oUI:q_buttonKeyUp : setIcon( hbide_image( "dc_up" ) ) ::oUI:q_buttonKeyDown : setIcon( hbide_image( "dc_down" ) ) - ::oUI:q_buttonPathIni : setIcon( hbide_image( "open" ) ) + /* Paths */ + ::oUI:q_buttonPathHrbRoot : setIcon( hbide_image( "open" ) ) ::oUI:q_buttonPathHbmk2 : setIcon( hbide_image( "open" ) ) - ::oUI:q_buttonPathSnippets : setIcon( hbide_image( "open" ) ) ::oUI:q_buttonPathEnv : setIcon( hbide_image( "open" ) ) + ::oUI:q_buttonPathResources : setIcon( hbide_image( "open" ) ) + ::oUI:q_buttonPathTemp : setIcon( hbide_image( "open" ) ) ::oUI:q_buttonPathShortcuts : setIcon( hbide_image( "open" ) ) + ::oUI:q_buttonPathSnippets : setIcon( hbide_image( "open" ) ) ::oUI:q_buttonPathThemes : setIcon( hbide_image( "open" ) ) + ::oUI:q_buttonViewIni : setIcon( hbide_image( "file-open" ) ) + ::oUI:q_buttonViewEnv : setIcon( hbide_image( "file-open" ) ) + ::oUI:q_buttonViewSnippets : setIcon( hbide_image( "file-open" ) ) + ::oUI:q_buttonViewThemes : setIcon( hbide_image( "file-open" ) ) + ::oUI:q_buttonSelFont : setIcon( hbide_image( "font" ) ) ::oUI:q_buttonThmAdd : setIcon( hbide_image( "dc_plus" ) ) @@ -957,45 +1003,59 @@ METHOD IdeSetup:setIcons() METHOD IdeSetup:disConnectSlots() - ::disconnect( ::oUI:q_buttonAddTextExt, "clicked()" ) - ::disconnect( ::oUI:q_buttonDelTextExt, "clicked()" ) + ::disconnect( ::oUI:q_buttonAddTextExt , "clicked()" ) + ::disconnect( ::oUI:q_buttonDelTextExt , "clicked()" ) - ::disconnect( ::oUI:q_buttonKeyAdd , "clicked()" ) - ::disconnect( ::oUI:q_buttonKeyDel , "clicked()" ) - ::disconnect( ::oUI:q_buttonKeyUp , "clicked()" ) - ::disconnect( ::oUI:q_buttonKeyDown , "clicked()" ) + ::disconnect( ::oUI:q_buttonKeyAdd , "clicked()" ) + ::disconnect( ::oUI:q_buttonKeyDel , "clicked()" ) + ::disconnect( ::oUI:q_buttonKeyUp , "clicked()" ) + ::disconnect( ::oUI:q_buttonKeyDown , "clicked()" ) - ::disconnect( ::oUI:q_tableVar , "itemActivated(QTblWItem)" ) + ::disconnect( ::oUI:q_tableVar , "itemActivated(QTblWItem)" ) - ::disconnect( ::oUI:q_buttonSelFont , "clicked()" ) - ::disConnect( ::oUI:q_buttonClose , "clicked()" ) - ::disConnect( ::oUI:q_buttonOK , "clicked()" ) - ::disConnect( ::oUI:q_buttonCancel , "clicked()" ) - ::disConnect( ::oUI:q_treeWidget , "itemSelectionChanged()" ) - ::disconnect( ::oUI:q_comboStyle , "currentIndexChanged(int)" ) + ::disconnect( ::oUI:q_buttonSelFont , "clicked()" ) + ::disConnect( ::oUI:q_buttonClose , "clicked()" ) + ::disConnect( ::oUI:q_buttonOK , "clicked()" ) + ::disConnect( ::oUI:q_buttonCancel , "clicked()" ) + ::disConnect( ::oUI:q_treeWidget , "itemSelectionChanged()" ) + ::disconnect( ::oUI:q_comboStyle , "currentIndexChanged(int)" ) - ::disconnect( ::oUI:q_checkAnimated , "stateChanged(int)" ) + ::disconnect( ::oUI:q_checkAnimated , "stateChanged(int)" ) - ::disconnect( ::oUI:q_checkHilightLine, "stateChanged(int)" ) - ::disconnect( ::oUI:q_checkHorzRuler , "stateChanged(int)" ) - ::disconnect( ::oUI:q_checkLineNumbers, "stateChanged(int)" ) + ::disconnect( ::oUI:q_checkHilightLine , "stateChanged(int)" ) + ::disconnect( ::oUI:q_checkHorzRuler , "stateChanged(int)" ) + ::disconnect( ::oUI:q_checkLineNumbers , "stateChanged(int)" ) - ::disconnect( ::oUI:q_sliderRed , "valueChanged(int)" ) - ::disconnect( ::oUI:q_sliderGreen , "valueChanged(int)" ) - ::disconnect( ::oUI:q_sliderBlue , "valueChanged(int)" ) + ::disconnect( ::oUI:q_sliderRed , "valueChanged(int)" ) + ::disconnect( ::oUI:q_sliderGreen , "valueChanged(int)" ) + ::disconnect( ::oUI:q_sliderBlue , "valueChanged(int)" ) - ::disconnect( ::oUI:q_radioSec1 , "clicked()" ) - ::disconnect( ::oUI:q_radioSec2 , "clicked()" ) - ::disconnect( ::oUI:q_radioSec3 , "clicked()" ) - ::disconnect( ::oUI:q_radioSec4 , "clicked()" ) - ::disconnect( ::oUI:q_radioSec5 , "clicked()" ) + ::disconnect( ::oUI:q_radioSec1 , "clicked()" ) + ::disconnect( ::oUI:q_radioSec2 , "clicked()" ) + ::disconnect( ::oUI:q_radioSec3 , "clicked()" ) + ::disconnect( ::oUI:q_radioSec4 , "clicked()" ) + ::disconnect( ::oUI:q_radioSec5 , "clicked()" ) - ::disconnect( ::oUI:q_buttonThmAdd , "clicked()" ) - ::disconnect( ::oUI:q_buttonThmDel , "clicked()" ) - ::disconnect( ::oUI:q_buttonThmApp , "clicked()" ) - ::disconnect( ::oUI:q_buttonThmSav , "clicked()" ) + ::disconnect( ::oUI:q_buttonThmAdd , "clicked()" ) + ::disconnect( ::oUI:q_buttonThmDel , "clicked()" ) + ::disconnect( ::oUI:q_buttonThmApp , "clicked()" ) + ::disconnect( ::oUI:q_buttonThmSav , "clicked()" ) - ::disconnect( ::oUI:q_listThemes , "currentRowChanged(int)" ) + ::disconnect( ::oUI:q_listThemes , "currentRowChanged(int)" ) + + ::disconnect( ::oUI:q_buttonPathHrbRoot , "clicked()" ) + ::disconnect( ::oUI:q_buttonPathHbmk2 , "clicked()" ) + ::disconnect( ::oUI:q_buttonPathEnv , "clicked()" ) + ::disconnect( ::oUI:q_buttonPathResources , "clicked()" ) + ::disconnect( ::oUI:q_buttonPathTemp , "clicked()" ) + ::disconnect( ::oUI:q_buttonPathShortcuts , "clicked()" ) + ::disconnect( ::oUI:q_buttonPathSnippets , "clicked()" ) + ::disconnect( ::oUI:q_buttonPathThemes , "clicked()" ) + + ::disconnect( ::oUI:q_buttonViewIni , "clicked()" ) + ::disconnect( ::oUI:q_buttonViewEnv , "clicked()" ) + ::disconnect( ::oUI:q_buttonViewSnippets , "clicked()" ) + ::disconnect( ::oUI:q_buttonViewThemes , "clicked()" ) RETURN Self @@ -1003,45 +1063,59 @@ METHOD IdeSetup:disConnectSlots() METHOD IdeSetup:connectSlots() - ::connect( ::oUI:q_buttonAddTextExt, "clicked()" , {| | ::execEvent( "buttonAddTextext_clicked" ) } ) - ::connect( ::oUI:q_buttonDelTextExt, "clicked()" , {| | ::execEvent( "buttonDelTextext_clicked" ) } ) + ::connect( ::oUI:q_buttonAddTextExt , "clicked()" , {| | ::execEvent( "buttonAddTextext_clicked" ) } ) + ::connect( ::oUI:q_buttonDelTextExt , "clicked()" , {| | ::execEvent( "buttonDelTextext_clicked" ) } ) - ::connect( ::oUI:q_buttonKeyAdd , "clicked()" , {| | ::execEvent( "buttonKeyAdd_clicked" ) } ) - ::connect( ::oUI:q_buttonKeyDel , "clicked()" , {| | ::execEvent( "buttonKeyDel_clicked" ) } ) - ::connect( ::oUI:q_buttonKeyUp , "clicked()" , {| | ::execEvent( "buttonKeyUp_clicked" ) } ) - ::connect( ::oUI:q_buttonKeyDown , "clicked()" , {| | ::execEvent( "buttonKeyDown_clicked" ) } ) + ::connect( ::oUI:q_buttonKeyAdd , "clicked()" , {| | ::execEvent( "buttonKeyAdd_clicked" ) } ) + ::connect( ::oUI:q_buttonKeyDel , "clicked()" , {| | ::execEvent( "buttonKeyDel_clicked" ) } ) + ::connect( ::oUI:q_buttonKeyUp , "clicked()" , {| | ::execEvent( "buttonKeyUp_clicked" ) } ) + ::connect( ::oUI:q_buttonKeyDown , "clicked()" , {| | ::execEvent( "buttonKeyDown_clicked" ) } ) - ::connect( ::oUI:q_tableVar , "itemActivated(QTblWItem)", {|p| ::execEvent( "tableVar_keyPress", p ) } ) + ::connect( ::oUI:q_tableVar , "itemActivated(QTblWItem)", {|p| ::execEvent( "tableVar_keyPress", p ) } ) - ::connect( ::oUI:q_buttonSelFont , "clicked()" , {| | ::execEvent( "buttonSelFont_clicked" ) } ) - ::connect( ::oUI:q_buttonClose , "clicked()" , {| | ::execEvent( "buttonClose_clicked" ) } ) - ::connect( ::oUI:q_buttonOk , "clicked()" , {| | ::execEvent( "buttonOk_clicked" ) } ) - ::connect( ::oUI:q_buttonCancel , "clicked()" , {| | ::execEvent( "buttonCancel_clicked" ) } ) - ::connect( ::oUI:q_treeWidget , "itemSelectionChanged()" , {| | ::execEvent( "treeWidget_itemSelectionChanged" ) } ) - ::connect( ::oUI:q_comboStyle , "currentIndexChanged(int)", {|i| ::execEvent( "comboStyle_currentIndexChanged", i ) } ) + ::connect( ::oUI:q_buttonSelFont , "clicked()" , {| | ::execEvent( "buttonSelFont_clicked" ) } ) + ::connect( ::oUI:q_buttonClose , "clicked()" , {| | ::execEvent( "buttonClose_clicked" ) } ) + ::connect( ::oUI:q_buttonOk , "clicked()" , {| | ::execEvent( "buttonOk_clicked" ) } ) + ::connect( ::oUI:q_buttonCancel , "clicked()" , {| | ::execEvent( "buttonCancel_clicked" ) } ) + ::connect( ::oUI:q_treeWidget , "itemSelectionChanged()" , {| | ::execEvent( "treeWidget_itemSelectionChanged" ) } ) + ::connect( ::oUI:q_comboStyle , "currentIndexChanged(int)", {|i| ::execEvent( "comboStyle_currentIndexChanged", i ) } ) - ::connect( ::oUI:q_checkAnimated , "stateChanged(int)" , {|i| ::execEvent( "checkAnimated_stateChanged", i ) } ) + ::connect( ::oUI:q_checkAnimated , "stateChanged(int)" , {|i| ::execEvent( "checkAnimated_stateChanged", i ) } ) - ::connect( ::oUI:q_checkHilightLine, "stateChanged(int)" , {|i| ::execEvent( "checkHilightLine_stateChanged", i ) } ) - ::connect( ::oUI:q_checkHorzRuler , "stateChanged(int)" , {|i| ::execEvent( "checkHorzRuler_stateChanged" , i ) } ) - ::connect( ::oUI:q_checkLineNumbers, "stateChanged(int)" , {|i| ::execEvent( "checkLineNumbers_stateChanged", i ) } ) + ::connect( ::oUI:q_checkHilightLine , "stateChanged(int)" , {|i| ::execEvent( "checkHilightLine_stateChanged", i ) } ) + ::connect( ::oUI:q_checkHorzRuler , "stateChanged(int)" , {|i| ::execEvent( "checkHorzRuler_stateChanged" , i ) } ) + ::connect( ::oUI:q_checkLineNumbers , "stateChanged(int)" , {|i| ::execEvent( "checkLineNumbers_stateChanged", i ) } ) - ::connect( ::oUI:q_sliderRed , "valueChanged(int)" , {|i| ::execEvent( "sliderValue_changed", i, "R" ) } ) - ::connect( ::oUI:q_sliderGreen , "valueChanged(int)" , {|i| ::execEvent( "sliderValue_changed", i, "G" ) } ) - ::connect( ::oUI:q_sliderBlue , "valueChanged(int)" , {|i| ::execEvent( "sliderValue_changed", i, "B" ) } ) + ::connect( ::oUI:q_sliderRed , "valueChanged(int)" , {|i| ::execEvent( "sliderValue_changed", i, "R" ) } ) + ::connect( ::oUI:q_sliderGreen , "valueChanged(int)" , {|i| ::execEvent( "sliderValue_changed", i, "G" ) } ) + ::connect( ::oUI:q_sliderBlue , "valueChanged(int)" , {|i| ::execEvent( "sliderValue_changed", i, "B" ) } ) - ::connect( ::oUI:q_radioSec1 , "clicked()" , {| | ::execEvent( "radioSection_clicked", 1 ) } ) - ::connect( ::oUI:q_radioSec2 , "clicked()" , {| | ::execEvent( "radioSection_clicked", 2 ) } ) - ::connect( ::oUI:q_radioSec3 , "clicked()" , {| | ::execEvent( "radioSection_clicked", 3 ) } ) - ::connect( ::oUI:q_radioSec4 , "clicked()" , {| | ::execEvent( "radioSection_clicked", 4 ) } ) - ::connect( ::oUI:q_radioSec5 , "clicked()" , {| | ::execEvent( "radioSection_clicked", 5 ) } ) + ::connect( ::oUI:q_radioSec1 , "clicked()" , {| | ::execEvent( "radioSection_clicked", 1 ) } ) + ::connect( ::oUI:q_radioSec2 , "clicked()" , {| | ::execEvent( "radioSection_clicked", 2 ) } ) + ::connect( ::oUI:q_radioSec3 , "clicked()" , {| | ::execEvent( "radioSection_clicked", 3 ) } ) + ::connect( ::oUI:q_radioSec4 , "clicked()" , {| | ::execEvent( "radioSection_clicked", 4 ) } ) + ::connect( ::oUI:q_radioSec5 , "clicked()" , {| | ::execEvent( "radioSection_clicked", 5 ) } ) - ::connect( ::oUI:q_buttonThmAdd , "clicked()" , {| | ::execEvent( "buttonThmAdd_clicked" ) } ) - ::connect( ::oUI:q_buttonThmDel , "clicked()" , {| | ::execEvent( "buttonThmDel_clicked" ) } ) - ::connect( ::oUI:q_buttonThmApp , "clicked()" , {| | ::execEvent( "buttonThmApp_clicked" ) } ) - ::connect( ::oUI:q_buttonThmSav , "clicked()" , {| | ::execEvent( "buttonThmSav_clicked" ) } ) + ::connect( ::oUI:q_buttonThmAdd , "clicked()" , {| | ::execEvent( "buttonThmAdd_clicked" ) } ) + ::connect( ::oUI:q_buttonThmDel , "clicked()" , {| | ::execEvent( "buttonThmDel_clicked" ) } ) + ::connect( ::oUI:q_buttonThmApp , "clicked()" , {| | ::execEvent( "buttonThmApp_clicked" ) } ) + ::connect( ::oUI:q_buttonThmSav , "clicked()" , {| | ::execEvent( "buttonThmSav_clicked" ) } ) - ::connect( ::oUI:q_listThemes , "currentRowChanged(int)" , {|i| ::execEvent( "listThemes_currentRowChanged", i ) } ) + ::connect( ::oUI:q_listThemes , "currentRowChanged(int)" , {|i| ::execEvent( "listThemes_currentRowChanged", i ) } ) + + ::connect( ::oUI:q_buttonPathHrbRoot , "clicked()" , {| | ::execEvent( "buttonHrbRoot_clicked" ) } ) + ::connect( ::oUI:q_buttonPathHbmk2 , "clicked()" , {| | ::execEvent( "buttonHbmk2_clicked" ) } ) + ::connect( ::oUI:q_buttonPathEnv , "clicked()" , {| | ::execEvent( "buttonEnv_clicked" ) } ) + ::connect( ::oUI:q_buttonPathResources , "clicked()" , {| | ::execEvent( "buttonResources_clicked" ) } ) + ::connect( ::oUI:q_buttonPathTemp , "clicked()" , {| | ::execEvent( "buttonTemp_clicked" ) } ) + ::connect( ::oUI:q_buttonPathShortcuts , "clicked()" , {| | ::execEvent( "buttonShortcuts_clicked" ) } ) + ::connect( ::oUI:q_buttonPathSnippets , "clicked()" , {| | ::execEvent( "buttonSnippets_clicked" ) } ) + ::connect( ::oUI:q_buttonPathThemes , "clicked()" , {| | ::execEvent( "buttonThemes_clicked" ) } ) + + ::connect( ::oUI:q_buttonViewIni , "clicked()" , {| | ::execEvent( "buttonViewIni_clicked" ) } ) + ::connect( ::oUI:q_buttonViewEnv , "clicked()" , {| | ::execEvent( "buttonViewEnv_clicked" ) } ) + ::connect( ::oUI:q_buttonViewSnippets , "clicked()" , {| | ::execEvent( "buttonViewSnippets_clicked" ) } ) + ::connect( ::oUI:q_buttonViewThemes , "clicked()" , {| | ::execEvent( "buttonViewThemes_clicked" ) } ) RETURN Self @@ -1050,11 +1124,11 @@ METHOD IdeSetup:connectSlots() METHOD IdeSetup:retrieve() LOCAL a_, i, s, qItm - ::oINI:cLineEndingMode := iif( ::oUI:q_radioLineEndCRLF : isChecked(), "CRLF", ; - iif( ::oUI:q_radioLineEndCR : isChecked(), "CR" , ; - iif( ::oUI:q_radioLineEndLF : isChecked(), "LF" , ; - iif( ::oUI:q_radioLineEndOS : isChecked(), "OS" , ; - iif( ::oUI:q_radioLineEndAuto : isChecked(), "AUTO", "CRLF" ) ) ) ) ) + ::oINI:cLineEndingMode := iif( ::oUI:q_radioLineEndCRLF : isChecked(), "CRLF", ; + iif( ::oUI:q_radioLineEndCR : isChecked(), "CR" , ; + iif( ::oUI:q_radioLineEndLF : isChecked(), "LF" , ; + iif( ::oUI:q_radioLineEndOS : isChecked(), "OS" , ; + iif( ::oUI:q_radioLineEndAuto : isChecked(), "AUTO", "CRLF" ) ) ) ) ) ::oINI:lTrimTrailingBlanks := ::oUI:q_checkTrimTrailingBlanks : isChecked() ::oINI:lSaveSourceWhenComp := ::oUI:q_checkSaveSourceWhenComp : isChecked() @@ -1080,11 +1154,21 @@ METHOD IdeSetup:retrieve() s := substr( s, 1, len( s ) - 1 ) ::oINI:cTextFileExtensions := s - ::oINI:nTmpBkpPrd := val( ::oUI:q_editTmpBkpPrd : text() ) - ::oINI:cBkpPath := ::oUI:q_editBkpPath : text() - ::oINI:cBkpSuffix := ::oUI:q_editBkpSuffix : text() - ::oINI:lCompletionWithArgs := ::oUI:q_checkListlWithArgs : isChecked() - ::oINI:lCompleteArgumented := ::oUI:q_checkCmplInclArgs : isChecked() + ::oINI:nTmpBkpPrd := val( ::oUI:q_editTmpBkpPrd : text() ) + ::oINI:cBkpPath := ::oUI:q_editBkpPath : text() + ::oINI:cBkpSuffix := ::oUI:q_editBkpSuffix : text() + ::oINI:lCompletionWithArgs := ::oUI:q_checkListlWithArgs : isChecked() + ::oINI:lCompleteArgumented := ::oUI:q_checkCmplInclArgs : isChecked() + + /* Paths */ + ::oINI:cPathHrbRoot := ::oUI:q_editPathHrbRoot : text() + ::oINI:cPathHbMk2 := ::oUI:q_editPathHbMk2 : text() + ::oINI:cPathResources := ::oUI:q_editPathResources : text() + ::oINI:cPathTemp := ::oUI:q_editPathTemp : text() + ::oINI:cPathEnv := ::oUI:q_editPathEnv : text() + ::oINI:cPathShortcuts := ::oUI:q_editPathShortcuts : text() + ::oINI:cPathSnippets := ::oUI:q_editPathSnippets : text() + ::oINI:cPathThemes := ::oUI:q_editPathThemes : text() RETURN Self @@ -1121,6 +1205,19 @@ METHOD IdeSetup:populate() ::oUI:q_editTabSpaces : setText( hb_ntos( ::oIde:nTabSpaces ) ) ::oUI:q_editIndentSpaces : setText( hb_ntos( ::oINI:nIndentSpaces ) ) + /* Paths */ + ::oUI:q_editPathIni : setText( ::oIde:cProjIni ) + // + ::oUI:q_editPathHrbRoot : setText( ::oINI:cPathHrbRoot ) + ::oUI:q_editPathHbMk2 : setText( ::oINI:cPathHbMk2 ) + ::oUI:q_editPathResources : setText( ::oINI:cPathResources ) + ::oUI:q_editPathTemp : setText( ::oINI:cPathTemp ) + ::oUI:q_editPathEnv : setText( ::oINI:cPathEnv ) + ::oUI:q_editPathShortcuts : setText( ::oINI:cPathShortcuts ) + ::oUI:q_editPathSnippets : setText( ::oINI:cPathSnippets ) + ::oUI:q_editPathThemes : setText( ::oINI:cPathThemes ) + + /* Variables */ ::oUI:q_tableVar:clearContents() ::aKeyItems := {} FOR EACH a_ IN ::oINI:aKeywords @@ -1173,6 +1270,8 @@ METHOD IdeSetup:show() ::oUI := hbide_getUI( "setup", ::oDlg:oWidget ) + ::oUI:setWindowFlags( Qt_Sheet ) + ::oUI:setMaximumWidth( ::oUI:width() ) ::oUI:setMinimumWidth( ::oUI:width() ) ::oUI:setMaximumHeight( ::oUI:height() ) @@ -1197,7 +1296,8 @@ METHOD IdeSetup:show() ::populate() ::oIde:setPosByIniEx( ::oUI:oWidget, ::oINI:cSetupDialogGeometry ) - ::oUI:exec() + //::oUI:exec() + ::oUI:show() RETURN Self @@ -1205,7 +1305,7 @@ METHOD IdeSetup:show() METHOD IdeSetup:execEvent( cEvent, p, p1 ) LOCAL qItem, nIndex, qFontDlg, qFont, nOK, nRow, b_, q0, q1, nCol, w0, w1 - LOCAL aRGB, nSlot, qFrame, aGrad, n, cCSS, cTheme + LOCAL aRGB, nSlot, qFrame, aGrad, n, cCSS, cTheme, cPath, cBuffer HB_SYMBOL_UNUSED( p1 ) @@ -1352,6 +1452,7 @@ METHOD IdeSetup:execEvent( cEvent, p, p1 ) IF ( nRow := ::oUI:q_tableVar:currentRow() ) >= 0 HB_TRACE( HB_TR_ALWAYS, "RECEIVING ENTER KEY" ) ::oUI:q_tableVar:editItem( p ) + hbide_justACall( nRow ) #if 0 IF ::oUI:q_tableVar:currentColumn() == 0 ::oUI:q_tableVar:setCurrentCell( ::oUI:q_tableVar:currentRow(), 1 ) @@ -1370,22 +1471,12 @@ METHOD IdeSetup:execEvent( cEvent, p, p1 ) EXIT CASE "sliderValue_changed" - #if 0 - nSlot := iif( ::oUI:q_radioSec1:isChecked(), 1, ; - iif( ::oUI:q_radioSec2:isChecked(), 2, ; - iif( ::oUI:q_radioSec3:isChecked(), 3, ; - iif( ::oUI:q_radioSec4:isChecked(), 4, ; - iif( ::oUI:q_radioSec5:isChecked(), 5, 0 ) ) ) ) ) - #endif nSlot := ::nCurThemeSlot IF nSlot > 0 qFrame := { ::oUI:q_frameSec1, ::oUI:q_frameSec2, ::oUI:q_frameSec3, ::oUI:q_frameSec4, ::oUI:q_frameSec5 }[ nSlot ] - - aRGB := { ::oUI:q_sliderRed:value(), ::oUI:q_sliderGreen:value(), ::oUI:q_sliderBlue:value() } - + aRGB := { ::oUI:q_sliderRed:value(), ::oUI:q_sliderGreen:value(), ::oUI:q_sliderBlue:value() } ::populateThemeColors( nSlot, aRGB ) - qFrame:setStyleSheet( "background-color: " + hbide_rgbString( aRGB ) + ";" ) ENDIF @@ -1432,12 +1523,131 @@ METHOD IdeSetup:execEvent( cEvent, p, p1 ) ENDIF EXIT + CASE "buttonIni_clicked" + EXIT + CASE "buttonHrbRoot_clicked" + IF ! empty( cPath := hbide_fetchADir( ::oDlg, "Harbour's Root Path", ::oINI:cPathHrbRoot ) ) + ::oINI:cPathHrbRoot := cPath + ::oUI:q_editPathHrbRoot:setText( hbide_pathStripLastSlash( cPath ) ) + ENDIF + EXIT + CASE "buttonHbmk2_clicked" + IF !empty( cPath := hbide_fetchAFile( ::oDlg, "Location of hbmk2", ; + { { "Harbour Project Builder - hbmk2", "*" } }, ::oINI:cPathHbMk2 ) ) + ::oINI:cPathhbMk2 := cPath + ::oUI:q_editPathHbMk2:setText( cPath ) + ENDIF + EXIT + CASE "buttonEnv_clicked" + IF !empty( cPath := hbide_fetchAFile( ::oDlg, "Environment Definitions File ( .env )", ; + { { "Environment Files", "*.env" } }, ::oINI:getEnvFile() ) ) + ::oINI:cPathEnv := cPath + ::oUI:q_editPathEnv:setText( cPath ) + ENDIF + EXIT + CASE "buttonResources_clicked" + IF ! empty( cPath := hbide_fetchADir( ::oDlg, "Location of Resources ( Plugins, Dialogs, Images, Scripts )", ::oINI:getResourcesPath() ) ) + ::oINI:cPathResources := cPath + ::oUI:q_editPathResources:setText( cPath ) + ENDIF + EXIT + CASE "buttonTemp_clicked" + IF ! empty( cPath := hbide_fetchADir( ::oDlg, "Location for Temporary and Transitory Files", ::oINI:getTempPath() ) ) + ::oINI:cPathTemp := cPath + ::oUI:q_editPathTemp:setText( cPath ) + ENDIF + EXIT + CASE "buttonShortcuts_clicked" + IF !empty( cPath := hbide_fetchAFile( ::oDlg, "Keyboard Mapping Definitions File ( .scu )", ; + { { "Keyboard Mappings", "*.scu" } }, ::oINI:getShortcutsFile() ) ) + ::oINI:cPathShortcuts := cPath + ::oUI:q_editPathShortcuts:setText( cPath ) + ENDIF + EXIT + CASE "buttonSnippets_clicked" + IF !empty( cPath := hbide_fetchAFile( ::oDlg, "Code Snippets File ( .skl )", ; + { { "Code Snippets", "*.skl" } }, ::oINI:getSnippetsFile() ) ) + ::oINI:cPathSnippets := cPath + ::oUI:q_editPathSnippets:setText( cPath ) + ENDIF + EXIT + CASE "buttonThemes_clicked" + IF !empty( cPath := hbide_fetchAFile( ::oDlg, "Syntax Highlighting Theme File ( .hbt )", ; + { { "Syntax Theme", "*.hbt" } }, ::oINI:getThemesFile() ) ) + ::oINI:cPathThemes := cPath + ::oUI:q_editPathThemes:setText( cPath ) + ENDIF + EXIT + CASE "buttonViewIni_clicked" + ::viewIt( ::oINI:getIniFile(), .t., .f., .f., .f. ) /* FileName, shouldSaveAs, shouldSave, shouldReadOnly, applyHiliter */ + EXIT + CASE "buttonViewEnv_clicked" + ::viewIt( ::oINI:getEnvFile(), .t., .t., .f., .f. ) + EXIT + CASE "buttonViewSnippets_clicked" + ::viewIt( ::oINI:getSnippetsFile(), .t., .t., .f., .t. ) + EXIT + CASE "buttonViewThemes_clicked" + ::viewIt( ::oINI:getThemesFile(), .t., .t., .f., .f. ) + EXIT + + CASE "buttonEditorSaveAs_clicked" + IF ! empty( cBuffer := p:q_plainText:toPlainText() ) + IF ! empty( cPath := hbide_saveAFile( ::oDlg, "Save: " + p1, NIL, p1 ) ) + hb_memowrit( cPath, cBuffer ) + ENDIF + ENDIF + EXIT + CASE "buttonEditorSave_clicked" + IF ! empty( cBuffer := p:q_plainText:toPlainText() ) + hb_memowrit( p1, cBuffer ) + ENDIF + EXIT + CASE "buttonEditorClose_clicked" + CASE "buttonEditorX_clicked" + ::disconnect( p:oWidget , QEvent_Close ) + ::disconnect( p:q_buttonSaveAs, "clicked()" ) + ::disconnect( p:q_buttonSave , "clicked()" ) + ::disconnect( p:q_buttonClose , "clicked()" ) + + p:close() + p := NIL /* Must Destroy It */ + EXIT ENDSWITCH - RETURN nRow //Self + RETURN Self /*----------------------------------------------------------------------*/ +METHOD IdeSetup:viewIt( cFileName, lSaveAs, lSave, lReadOnly, lApplyHiliter ) + LOCAL oUI + + oUI := hbide_getUI( "editor", ::oUI:oWidget ) + oUI:setWindowFlags( Qt_Sheet ) + + oUI:q_plainText:setReadOnly( lReadOnly ) + oUI:q_buttonSaveAs:setEnabled( lSaveAs ) + oUI:q_buttonSave:setEnabled( lSave ) + + oUI:q_plainText:setLineWrapMode( QPlainTextEdit_NoWrap ) + + oUI:q_plainText:setPlainText( hb_memoRead( cFileName ) ) + oUI:q_plainText:setFont( ::oIde:oFont:oWidget ) + IF lApplyHiliter + aadd( ::aHilighters, ::oTH:setSyntaxHilighting( oUI:q_plainText, "Bare Minimum" ) ) + ENDIF + + ::connect( oUI:oWidget , QEvent_Close, {|| ::execEvent( "buttonEditorX_clicked" , oUI ) } ) + ::connect( oUI:q_buttonSaveAs, "clicked()" , {|| ::execEvent( "buttonEditorSaveAs_clicked", oUI, cFileName ) } ) + ::connect( oUI:q_buttonSave , "clicked()" , {|| ::execEvent( "buttonEditorSave_clicked" , oUI, cFileName ) } ) + ::connect( oUI:q_buttonClose , "clicked()" , {|| ::execEvent( "buttonEditorClose_clicked" , oUI ) } ) + + oUI:show() + + RETURN Self + +/*------------------------------------------------------------------------*/ + METHOD IdeSetup:pushThemesData() LOCAL s, a_, qItem diff --git a/harbour/contrib/hbide/ideskeletons.prg b/harbour/contrib/hbide/ideskeletons.prg index 7e41ff74d6..0f38210f63 100644 --- a/harbour/contrib/hbide/ideskeletons.prg +++ b/harbour/contrib/hbide/ideskeletons.prg @@ -71,18 +71,6 @@ /*----------------------------------------------------------------------*/ -#define buttonNew_clicked 101 -#define buttonRename_clicked 102 -#define buttonDelete_clicked 103 -#define buttonClear_clicked 104 -#define buttonGetSel_clicked 105 -#define buttonUpdate_clicked 106 -#define listNames_itemSelectionChanged 107 -#define oTree_itemSelected 108 -#define oTree_contextMenu 109 - -/*----------------------------------------------------------------------*/ - CLASS IdeSkeletons INHERIT IdeObject DATA oRoot @@ -95,7 +83,7 @@ CLASS IdeSkeletons INHERIT IdeObject METHOD create( oIde ) METHOD destroy() METHOD show() - METHOD execEvent( nMode, p ) + METHOD execEvent( cEvent, p ) METHOD postSkeleton( cSkeleton ) METHOD selectByMenuAndPostText( qEdit ) METHOD getText( cSkeleton ) @@ -156,40 +144,38 @@ METHOD IdeSkeletons:destroy() METHOD IdeSkeletons:show() IF empty( ::oUI ) -// ::oUI := HbQtUI():new( hbide_uic( "skeletons" ) ):build() - ::oUI := hbqtui_Skeletons() + ::oUI := hbide_getUI( "skeletons" ) ::oSkeltnDock:oWidget:setWidget( ::oUI:oWidget ) - ::connect( ::oUI:q_buttonNew , "clicked()" , {|| ::execEvent( buttonNew_clicked ) } ) - ::connect( ::oUI:q_buttonRename, "clicked()" , {|| ::execEvent( buttonRename_clicked ) } ) - ::connect( ::oUI:q_buttonDelete, "clicked()" , {|| ::execEvent( buttonDelete_clicked ) } ) - ::connect( ::oUI:q_buttonClear , "clicked()" , {|| ::execEvent( buttonClear_clicked ) } ) - ::connect( ::oUI:q_buttonGetSel, "clicked()" , {|| ::execEvent( buttonGetSel_clicked ) } ) - ::connect( ::oUI:q_buttonUpdate, "clicked()" , {|| ::execEvent( buttonUpdate_clicked ) } ) - ::connect( ::oUI:q_listNames , "itemSelectionChanged()", {|| ::execEvent( listNames_itemSelectionChanged ) } ) + ::connect( ::oUI:q_buttonNew , "clicked()" , {|| ::execEvent( "buttonNew_clicked" ) } ) + ::connect( ::oUI:q_buttonRename, "clicked()" , {|| ::execEvent( "buttonRename_clicked" ) } ) + ::connect( ::oUI:q_buttonDelete, "clicked()" , {|| ::execEvent( "buttonDelete_clicked" ) } ) + ::connect( ::oUI:q_buttonClear , "clicked()" , {|| ::execEvent( "buttonClear_clicked" ) } ) + ::connect( ::oUI:q_buttonGetSel, "clicked()" , {|| ::execEvent( "buttonGetSel_clicked" ) } ) + ::connect( ::oUI:q_buttonUpdate, "clicked()" , {|| ::execEvent( "buttonUpdate_clicked" ) } ) + ::connect( ::oUI:q_listNames , "itemSelectionChanged()", {|| ::execEvent( "listNames_itemSelectionChanged" ) } ) //::oUI:q_editCode:setFontFamily( "Courier New" ) //::oUI:q_editCode:setFontPointSize( 10 ) ::oUI:q_editCode:setFont( ::oFont:oWidget ) ENDIF - ::refreshList() RETURN Self /*----------------------------------------------------------------------*/ -METHOD IdeSkeletons:execEvent( nMode, p ) +METHOD IdeSkeletons:execEvent( cEvent, p ) LOCAL cName, qItem, cCode, n, cOpt LOCAL aPops := {} HB_SYMBOL_UNUSED( p ) - SWITCH nMode + SWITCH cEvent - CASE buttonNew_clicked + CASE "buttonNew_clicked" IF !empty( cName := hbide_fetchAString( ::oUI:q_listNames, "", "Name", "New Skeleton" ) ) ::oUI:q_listNames:addItem( cName ) aadd( ::oIde:aSkltns, { cName, "" } ) @@ -197,33 +183,33 @@ METHOD IdeSkeletons:execEvent( nMode, p ) ENDIF EXIT - CASE buttonRename_clicked + CASE "buttonRename_clicked" qItem := QListWidgetItem():configure( ::oUI:q_listNames:currentItem() ) qItem:setText( ::rename( qItem:text() ) ) EXIT - CASE buttonDelete_clicked + CASE "buttonDelete_clicked" qItem := QListWidgetItem():from( ::oUI:q_listNames:currentItem() ) ::delete( qItem:text() ) EXIT - CASE buttonClear_clicked + CASE "buttonClear_clicked" ::oUI:q_editCode:clear() EXIT - CASE buttonGetSel_clicked + CASE "buttonGetSel_clicked" IF !empty( cCode := ::oEM:getSelectedText() ) // TODO: Format cCode ::oUI:q_editCode:setPlainText( cCode ) ENDIF EXIT - CASE buttonUpdate_clicked + CASE "buttonUpdate_clicked" qItem := QListWidgetItem():configure( ::oUI:q_listNames:currentItem() ) ::save( qItem:text(), ::oUI:q_editCode:toPlainText() ) EXIT - CASE listNames_itemSelectionChanged + CASE "listNames_itemSelectionChanged" qItem := QListWidgetItem():configure( ::oUI:q_listNames:currentItem() ) cName := qItem:text() IF ( n := ascan( ::aSkltns, {|e_| e_[ 1 ] == cName } ) ) > 0 @@ -231,7 +217,7 @@ METHOD IdeSkeletons:execEvent( nMode, p ) ENDIF EXIT - CASE oTree_contextMenu + CASE "oTree_contextMenu" IF p[ 3 ]:caption == "Skeletons" // Root node - nothing to do. ELSE @@ -249,7 +235,7 @@ METHOD IdeSkeletons:execEvent( nMode, p ) ENDIF EXIT - CASE oTree_itemSelected + CASE "oTree_itemSelected" ::oIde:manageFocusInEditor() ::postSkeleton( p:caption ) EXIT @@ -504,8 +490,8 @@ METHOD IdeSkeletons:showTree() ::oTree:oWidget:setIconSize( QSize():new( 12,12 ) ) ::oTree:oWidget:setIndentation( 12 ) - ::oTree:itemSelected := {|oItem | ::execEvent( oTree_itemSelected, oItem ) } - ::oTree:hbContextMenu := {|mp1, mp2, oXbp| ::execEvent( oTree_contextMenu , { mp1, mp2, oXbp } ) } + ::oTree:itemSelected := {|oItem | ::execEvent( "oTree_itemSelected", oItem ) } + ::oTree:hbContextMenu := {|mp1, mp2, oXbp| ::execEvent( "oTree_contextMenu" , { mp1, mp2, oXbp } ) } ::oRoot := ::oTree:rootItem:addItem( "Skeletons" ) diff --git a/harbour/contrib/hbide/idesources.prg b/harbour/contrib/hbide/idesources.prg index 9054631d59..f5901ca6cb 100644 --- a/harbour/contrib/hbide/idesources.prg +++ b/harbour/contrib/hbide/idesources.prg @@ -221,7 +221,7 @@ METHOD IdeSourcesManager:saveSource( nTab, lCancel, lAs ) lNew := Empty( cSource ) .OR. lAs IF lNew cNewFile := ::selectSource( 'save', ; - iif( !Empty( cSource ), cSource, hb_dirBase() + "projects\" ),; + iif( !Empty( cSource ), cSource, hb_dirBase() + "projects" + hb_osPathSeparator() ),; "Save " + oEdit:oTab:caption + " as..." ) IF empty( cNewFile ) // will check later what decision to take @@ -239,7 +239,6 @@ METHOD IdeSourcesManager:saveSource( nTab, lCancel, lAs ) * If the burn process fails, we should change the name of the previous file. * 01/01/2010 - 21:24:41 - vailtom */ - //cBuffer := oEdit:qEdit:toPlainText() cBuffer := oEdit:prepareBufferToSave( oEdit:qEdit:toPlainText() ) // IF !hb_memowrit( cFileToSave, cBuffer ) diff --git a/harbour/contrib/hbide/idethemes.prg b/harbour/contrib/hbide/idethemes.prg index 5992fdfede..309c6a7bd0 100644 --- a/harbour/contrib/hbide/idethemes.prg +++ b/harbour/contrib/hbide/idethemes.prg @@ -80,30 +80,12 @@ #define THM_NUM_ATTRBS 6 -#define applyMenu_triggered_applyToCurrentTab 1 -#define applyMenu_triggered_setAsDefault 2 -#define applyMenu_triggered_applyToAllTabs 3 -#define listThemes_currentRowChanged 4 -#define listItems_currentRowChanged 5 - -/*----------------------------------------------------------------------*/ - -FUNCTION hbide_loadThemes( oIde ) - - IF empty( oIde:cIniThemes ) - oIde:cIniThemes := hb_dirBase() + "hbide.hbt" - ENDIF - - oIde:oTH := IdeThemes():new( oIde, oIde:cIniThemes ):create() - - RETURN nil - /*----------------------------------------------------------------------*/ CLASS IdeThemes INHERIT IdeObject VAR lDefault INIT .t. - VAR cIniFile INIT "" + VAR cThemesFile INIT "" VAR aIni INIT {} VAR aThemes INIT {} @@ -123,14 +105,14 @@ CLASS IdeThemes INHERIT IdeObject VAR oSL VAR cSelTheme - METHOD new( oIde, cIniFile ) - METHOD create( oIde, cIniFile ) + METHOD new( oIde, cThemesFile ) + METHOD create( oIde, cThemesFile ) METHOD destroy() METHOD setWrkTheme( cTheme ) METHOD contains( cTheme ) METHOD load( cFile ) METHOD save( lAsk ) - METHOD execEvent( nMode, p ) + METHOD execEvent( cEvent, p ) METHOD getThemeAttribute( cAttr, cTheme ) METHOD buildSyntaxFormat( aAttr ) METHOD setForeBackGround( qEdit, cTheme ) @@ -158,30 +140,30 @@ CLASS IdeThemes INHERIT IdeObject /*----------------------------------------------------------------------*/ -METHOD IdeThemes:new( oIde, cIniFile ) +METHOD IdeThemes:new( oIde, cThemesFile ) ::oIde := oIde - ::cIniFile := cIniFile + ::cThemesFile := cThemesFile RETURN Self /*----------------------------------------------------------------------*/ -METHOD IdeThemes:create( oIde, cIniFile ) +METHOD IdeThemes:create( oIde, cThemesFile ) LOCAL s, b_ DEFAULT oIde TO ::oIde - DEFAULT cIniFile TO ::cIniFile + DEFAULT cThemesFile TO ::cThemesFile ::oIde := oIde - ::cIniFile := cIniFile + ::cThemesFile := cThemesFile /* next always load default themes */ ::aIni := hbide_loadDefaultThemes() ::parseINI() /* first load user defined themes */ - ::load( ::cIniFile ) + ::load( ::cThemesFile ) /* These are the supported patterns - rest will be ignore until implemented */ @@ -250,15 +232,14 @@ METHOD IdeThemes:destroy() /*----------------------------------------------------------------------*/ -METHOD IdeThemes:execEvent( nMode, p ) +METHOD IdeThemes:execEvent( cEvent, p ) LOCAL oEditor, a_ HB_SYMBOL_UNUSED( p ) - DO CASE - CASE nMode == listItems_currentRowChanged + SWITCH cEvent + CASE "listItems_currentRowChanged" ::nCurItem := p+1 - IF ::nCurItem == 13 ::updateCurrentLineColor() ELSEIF ::nCurItem == 16 @@ -266,25 +247,25 @@ METHOD IdeThemes:execEvent( nMode, p ) ELSE ::setAttributes( p ) ENDIF - - CASE nMode == listThemes_currentRowChanged + EXIT + CASE "listThemes_currentRowChanged" ::nCurTheme := p+1 ::setTheme( p ) - - CASE nMode == applyMenu_triggered_applyToAllTabs + EXIT + CASE "applyMenu_triggered_applyToAllTabs" FOR EACH a_ IN ::aTabs a_[ TAB_OEDITOR ]:applyTheme( ::aThemes[ ::nCurTheme, 1 ] ) NEXT - - CASE nMode == applyMenu_triggered_applyToCurrentTab + EXIT + CASE "applyMenu_triggered_applyToCurrentTab" IF !empty( oEditor := ::oEM:getEditorCurrent() ) oEditor:applyTheme( ::aThemes[ ::nCurTheme, 1 ] ) ENDIF - - CASE nMode == applyMenu_triggered_setAsDefault + EXIT + CASE "applyMenu_triggered_setAsDefault" ::setWrkTheme( ::aThemes[ ::nCurTheme, 1 ] ) - - ENDCASE + EXIT + ENDSWITCH RETURN Self @@ -323,31 +304,20 @@ METHOD IdeThemes:load( cFile ) /*----------------------------------------------------------------------*/ METHOD IdeThemes:save( lAsk ) - LOCAL cFile, cINI + LOCAL cFile DEFAULT lAsk TO .f. - IF ::lDefault lAsk := .t. ENDIF - IF lAsk - cFile := hbide_saveAFile( ::oIde:oDlg, ; - "Select a File to Save Themes (.hbt)", ; - { { "Harbour IDE Themes", "*.hbt" } }, ; - ::cIniFile, ; - "hbt" ) + cFile := hbide_saveAFile( ::oDlg, "Select a file to Save Theme ( .hbt )", ; + { { "Syntax Themes", "*.hbt" } }, ::oINI:getThemesFile(), "hbt" ) ELSE - cFile := ::cIniFile + cFile := ::oINI:getThemesFile() ENDIF - IF !empty( cFile ) - cINI := ::buildINI() - hb_memowrit( cFile, cINI ) - IF hb_FileExists( cFile ) - ::oIde:cIniThemes := cFile - ::cIniFile := cFile - ENDIF + hb_memowrit( cFile, ::buildINI() ) ENDIF RETURN Self @@ -550,16 +520,16 @@ METHOD IdeThemes:show() ::oThemesDock:oWidget:setWidget( ::oUI ) - ::oUI:signal( "listThemes" , "currentRowChanged(int)" , {|i| ::execEvent( listThemes_currentRowChanged, i ) } ) - ::oUI:signal( "listItems" , "currentRowChanged(int)" , {|i| ::execEvent( listItems_currentRowChanged, i ) } ) + ::oUI:signal( "listThemes" , "currentRowChanged(int)" , {|i| ::execEvent( "listThemes_currentRowChanged", i ) } ) + ::oUI:signal( "listItems" , "currentRowChanged(int)" , {|i| ::execEvent( "listItems_currentRowChanged", i ) } ) ::oUI:signal( "buttonColor" , "clicked()" , {| | ::updateColor() } ) ::oUI:signal( "buttonSave" , "clicked()" , {| | ::save( .f. ) } ) ::oUI:signal( "buttonSaveAs" , "clicked()" , {| | ::save( .t. ) } ) ::oUI:signal( "buttonCopy" , "clicked()" , {| | ::copy( .t. ) } ) - ::oUI:signal( "buttonApply" , "clicked()" , {| | ::execEvent( applyMenu_triggered_applyToCurrentTab ) } ) - ::oUI:signal( "buttonApplyAll", "clicked()" , {| | ::execEvent( applyMenu_triggered_applyToAllTabs ) } ) - ::oUI:signal( "buttonDefault" , "clicked()" , {| | ::execEvent( applyMenu_triggered_setAsDefault ) } ) + ::oUI:signal( "buttonApply" , "clicked()" , {| | ::execEvent( "applyMenu_triggered_applyToCurrentTab" ) } ) + ::oUI:signal( "buttonApplyAll", "clicked()" , {| | ::execEvent( "applyMenu_triggered_applyToAllTabs" ) } ) + ::oUI:signal( "buttonDefault" , "clicked()" , {| | ::execEvent( "applyMenu_triggered_setAsDefault" ) } ) ::oUI:signal( "checkItalic" , "stateChanged(int)" , {|i| ::updateAttribute( THM_ATR_ITALIC, i ) } ) ::oUI:signal( "checkBold" , "stateChanged(int)" , {|i| ::updateAttribute( THM_ATR_BOLD , i ) } ) @@ -987,10 +957,10 @@ STATIC FUNCTION GetSource() aadd( txt_, ' METHOD new() ' ) aadd( txt_, ' ENDCLASS ' ) aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) - aadd( txt_, 'METHOD IdeThemes:new( oIde, cIniFile ) ' ) + aadd( txt_, 'METHOD IdeThemes:new( oIde, cThemesFile ) ' ) aadd( txt_, ' ' ) aadd( txt_, ' ::oIde := oIde ' ) - aadd( txt_, ' ::cIniFile := cIniFile ' ) + aadd( txt_, ' ::cThemesFile := cThemesFile ' ) aadd( txt_, ' ' ) aadd( txt_, ' RETURN Self ' ) aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) diff --git a/harbour/contrib/hbide/plugins/savebackup.hbs b/harbour/contrib/hbide/plugins/hbide_plugin_savebackup.hbs similarity index 100% rename from harbour/contrib/hbide/plugins/savebackup.hbs rename to harbour/contrib/hbide/plugins/hbide_plugin_savebackup.hbs diff --git a/harbour/contrib/hbide/plugins/example_gui.hbs b/harbour/contrib/hbide/plugins/hbide_script_qtgui.hbs similarity index 100% rename from harbour/contrib/hbide/plugins/example_gui.hbs rename to harbour/contrib/hbide/plugins/hbide_script_qtgui.hbs diff --git a/harbour/contrib/hbide/resources/file-open.png b/harbour/contrib/hbide/resources/file-open.png new file mode 100644 index 0000000000000000000000000000000000000000..ca761454baf88af1f1775d229dfe81e9a99d741c GIT binary patch literal 797 zcmV+&1LFLNP)ugb&pHYliwkmx4pLg;Xjmq8E&Mj(Y`mNloD zmJ~@YJRwE42AiJ3V4+s4QFWjahC^*1+-`UKZ-6JGPvsu37s+H2`FtK_Wo1aG z(~wG~U>Jq~3Q#I*psZG)rMbBjFgEsF{>^4XBoZN&1zZOe6_tp^Vh{)fP$(48>U0p2 zy!(oUe60WrzO>?08nOsXhVco(mS=JYLVf!{=L;tCZ15 z0Fx8)z|IbLb)4mh=DNB%Y-hG{ZRHA%H?-q?TOZJ)d$a&MNg*Dd^;oHs9UUAX913z0iial> ziI5{^swD^a%yAm3>NJk22C){rgBa~3fH)Q{E%SI8V@F8% bE}8TXv^9uj&Gvzb00000NkvXXu0mjfU;=1g literal 0 HcmV?d00001 diff --git a/harbour/contrib/hbide/setup.ui b/harbour/contrib/hbide/setup.ui index 6f6d4d1220..1c9a3d2ba2 100644 --- a/harbour/contrib/hbide/setup.ui +++ b/harbour/contrib/hbide/setup.ui @@ -865,20 +865,20 @@ 14 - 72 - 89 + 86 + 259 16 - hbmk2 executable + hbmk2 executable ( D: _harbour_root_bin_hbmk2 ) 14 - 88 + 102 259 20 @@ -888,20 +888,20 @@ 14 - 122 - 139 + 278 + 259 16 - Snippets ( hbide.skl ) + Snippets ( D: _ini_path_hbide.skl ) 14 - 140 + 296 259 20 @@ -911,20 +911,20 @@ 14 - 176 - 197 + 200 + 261 16 - Environments ( hbide.env ) + Environments ( D: _ini_path_hbide.env ) 14 - 194 + 218 261 20 @@ -934,7 +934,7 @@ 14 - 18 + 12 99 16 @@ -947,7 +947,7 @@ 14 - 34 + 28 259 20 @@ -957,20 +957,20 @@ 14 - 232 - 143 + 238 + 257 16 - Shortcuts ( hbide.scu ) + Shortcuts ( D: _ini_path_hbide.scu ) 14 - 250 + 256 261 20 @@ -980,45 +980,32 @@ 14 - 290 - 183 + 318 + 259 16 - Syntax Themes ( hbide.thm ) + Syntax Themes ( D: _ini_path_hbide.hbt ) 14 - 308 + 336 261 20 - - - - 284 - 34 - 25 - 20 - - - - ... - - 284 - 88 + 102 25 - 20 + 21 @@ -1029,7 +1016,7 @@ 284 - 140 + 296 25 20 @@ -1042,7 +1029,7 @@ 284 - 194 + 218 25 20 @@ -1055,7 +1042,7 @@ 284 - 250 + 256 25 20 @@ -1068,7 +1055,7 @@ 284 - 308 + 336 25 20 @@ -1077,11 +1064,11 @@ ... - + 314 - 34 + 28 25 20 @@ -1094,7 +1081,7 @@ 314 - 140 + 296 25 21 @@ -1107,7 +1094,7 @@ 314 - 194 + 218 25 20 @@ -1120,7 +1107,7 @@ 314 - 308 + 336 25 20 @@ -1129,6 +1116,114 @@ ... + + + + 284 + 64 + 25 + 21 + + + + ... + + + + + + 14 + 64 + 259 + 20 + + + + + + + 14 + 48 + 259 + 16 + + + + Harbour Root + + + + + + 14 + 142 + 259 + 20 + + + + + + + 284 + 142 + 25 + 21 + + + + ... + + + + + + 14 + 126 + 259 + 16 + + + + Resources ( Plugins, Images, Dialogs, Scripts, etc. ) + + + + + + 14 + 180 + 259 + 20 + + + + + + + 284 + 180 + 25 + 21 + + + + ... + + + + + + 14 + 164 + 259 + 16 + + + + Temporary and Transitory Files Path + +