* implemented reload menu item

* increased file history to 9 files
This commit is contained in:
florian 2004-11-20 14:21:19 +00:00
parent 826564f0ff
commit f95a1b6770
5 changed files with 33 additions and 11 deletions

View File

@ -633,7 +633,7 @@ begin
end; end;
{ only display line info every 100 lines, ofcourse all other messages { only display line info every 100 lines, ofcourse all other messages
will be displayed directly } will be displayed directly }
if (getrealtime-lasttime>=0.1) or (status.compiledlines=1) then if (getrealtime-lasttime>=CompilerStatusUpdateDelay) or (status.compiledlines=1) then
begin begin
lasttime:=getrealtime; lasttime:=getrealtime;
{ update info messages } { update info messages }
@ -1256,7 +1256,11 @@ end;
end. end.
{ {
$Log$ $Log$
Revision 1.31 2004-11-20 10:18:41 florian Revision 1.32 2004-11-20 14:21:19 florian
* implemented reload menu item
* increased file history to 9 files
Revision 1.31 2004/11/20 10:18:41 florian
* reduced status updates by making them time dependend * reduced status updates by making them time dependend
Revision 1.30 2004/11/14 21:45:28 florian Revision 1.30 2004/11/14 21:45:28 florian

View File

@ -24,12 +24,12 @@ uses Views,App,
const const
VersionStr = '0.9.3'; VersionStr = '0.9.3';
MaxRecentFileCount = 5; MaxRecentFileCount = 9;
MaxToolCount = 16; MaxToolCount = 16;
ReservedWordMaxLen = 16; ReservedWordMaxLen = 16;
CompilerStatusUpdateDelay = 0.8; { in secs } CompilerStatusUpdateDelay = 0.1; { in secs }
{$undef USE_SPECIAL_BASENAME} {$undef USE_SPECIAL_BASENAME}
{$ifdef m68k} {$ifdef m68k}
@ -186,6 +186,7 @@ const
cmPasteWin = 241; cmPasteWin = 241;
cmRegisters = 242; cmRegisters = 242;
cmFPURegisters = 243; cmFPURegisters = 243;
cmDoReload = 244;
cmNotImplemented = 1000; cmNotImplemented = 1000;
cmNewFromTemplate = 1001; cmNewFromTemplate = 1001;
@ -247,7 +248,6 @@ const
cmEditorOptions = 2202; cmEditorOptions = 2202;
cmBrowserOptions = 2203; cmBrowserOptions = 2203;
cmDoReload = 2204;
cmTrackReference = 2300; cmTrackReference = 2300;
cmGotoReference = 2301; cmGotoReference = 2301;
@ -471,7 +471,11 @@ implementation
END. END.
{ {
$Log$ $Log$
Revision 1.15 2004-11-08 20:28:26 peter Revision 1.16 2004-11-20 14:21:19 florian
* implemented reload menu item
* increased file history to 9 files
Revision 1.15 2004/11/08 20:28:26 peter
* Breakpoints are now deleted when removed from source, disabling is * Breakpoints are now deleted when removed from source, disabling is
still possible from the breakpoint list still possible from the breakpoint list
* COMPILER_1_0, FVISION, GABOR defines removed, only support new * COMPILER_1_0, FVISION, GABOR defines removed, only support new

View File

@ -307,6 +307,7 @@ begin
NewItem(menu_file_new,'',kbNoKey,cmNew,hcNew, NewItem(menu_file_new,'',kbNoKey,cmNew,hcNew,
NewItem(menu_file_template,'',kbNoKey,cmNewFromTemplate,hcNewFromTemplate, NewItem(menu_file_template,'',kbNoKey,cmNewFromTemplate,hcNewFromTemplate,
NewItem(menu_file_open,menu_key_file_open,kbF3,cmOpen,hcOpen, NewItem(menu_file_open,menu_key_file_open,kbF3,cmOpen,hcOpen,
NewItem(menu_file_reload,'',kbNoKey,cmDoReload,hcDoReload,
NewItem(menu_file_save,menu_key_file_save,kbF2,cmSave,hcSave, NewItem(menu_file_save,menu_key_file_save,kbF2,cmSave,hcSave,
NewItem(menu_file_saveas,'',kbNoKey,cmSaveAs,hcSaveAs, NewItem(menu_file_saveas,'',kbNoKey,cmSaveAs,hcSaveAs,
NewItem(menu_file_saveall,'',kbNoKey,cmSaveAll,hcSaveAll, NewItem(menu_file_saveall,'',kbNoKey,cmSaveAll,hcSaveAll,
@ -314,7 +315,7 @@ begin
NewItem(menu_file_changedir,'',kbNoKey,cmChangeDir,hcChangeDir, NewItem(menu_file_changedir,'',kbNoKey,cmChangeDir,hcChangeDir,
NewItem(menu_file_dosshell,'',kbNoKey,cmDOSShell,hcDOSShell, NewItem(menu_file_dosshell,'',kbNoKey,cmDOSShell,hcDOSShell,
NewItem(menu_file_exit,menu_key_file_exit,kbNoKey,cmQuit,hcQuit, NewItem(menu_file_exit,menu_key_file_exit,kbNoKey,cmQuit,hcQuit,
nil))))))))))), nil)))))))))))),
NewSubMenu(menu_edit,hcEditMenu, NewMenu( NewSubMenu(menu_edit,hcEditMenu, NewMenu(
NewItem(menu_edit_undo,menu_key_edit_undo, kbAltBack, cmUndo, hcUndo, NewItem(menu_edit_undo,menu_key_edit_undo, kbAltBack, cmUndo, hcUndo,
NewItem(menu_edit_redo,'', kbNoKey, cmRedo, hcRedo, NewItem(menu_edit_redo,'', kbNoKey, cmRedo, hcRedo,
@ -1240,7 +1241,11 @@ end;
END. END.
{ {
$Log$ $Log$
Revision 1.32 2004-11-14 21:45:28 florian Revision 1.33 2004-11-20 14:21:19 florian
* implemented reload menu item
* increased file history to 9 files
Revision 1.32 2004/11/14 21:45:28 florian
* fixed non working mouse after tools call * fixed non working mouse after tools call
* better handling of source/target info * better handling of source/target info
* more info in about dialog * more info in about dialog

View File

@ -53,6 +53,7 @@ const
menu_file_save = '~S~ave'; menu_file_save = '~S~ave';
menu_file_saveas = 'Save ~a~s...'; menu_file_saveas = 'Save ~a~s...';
menu_file_saveall = 'Save a~l~l'; menu_file_saveall = 'Save a~l~l';
menu_file_reload = '~R~eload';
menu_file_changedir = '~C~hange dir...'; menu_file_changedir = '~C~hange dir...';
menu_file_dosshell = 'Comman~d~ shell'; menu_file_dosshell = 'Comman~d~ shell';
menu_file_exit = 'E~x~it'; menu_file_exit = 'E~x~it';
@ -1057,7 +1058,11 @@ const
{ {
$Log$ $Log$
Revision 1.22 2004-11-20 10:10:32 florian Revision 1.23 2004-11-20 14:21:19 florian
* implemented reload menu item
* increased file history to 9 files
Revision 1.22 2004/11/20 10:10:32 florian
* renamed Delphi 2 extensions on to Object pascal support * renamed Delphi 2 extensions on to Object pascal support
Revision 1.21 2004/11/14 21:45:28 florian Revision 1.21 2004/11/14 21:45:28 florian

View File

@ -474,7 +474,7 @@ procedure NoDebugger;
const const
SourceCmds : TCommandSet = SourceCmds : TCommandSet =
([cmSave,cmSaveAs,cmCompile,cmHide]); ([cmSave,cmSaveAs,cmCompile,cmHide,cmDoReload]);
EditorCmds : TCommandSet = EditorCmds : TCommandSet =
([cmFind,cmReplace,cmSearchAgain,cmJumpLine,cmHelpTopicSearch]); ([cmFind,cmReplace,cmSearchAgain,cmJumpLine,cmHelpTopicSearch]);
CompileCmds : TCommandSet = CompileCmds : TCommandSet =
@ -4439,7 +4439,11 @@ end;
END. END.
{ {
$Log$ $Log$
Revision 1.50 2004-11-14 21:45:29 florian Revision 1.51 2004-11-20 14:21:19 florian
* implemented reload menu item
* increased file history to 9 files
Revision 1.50 2004/11/14 21:45:29 florian
* fixed non working mouse after tools call * fixed non working mouse after tools call
* better handling of source/target info * better handling of source/target info
* more info in about dialog * more info in about dialog