paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-21 01:09:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

* small fixes due to tcentre

Browse Source 
git-svn-id: trunk@3879 -
This commit is contained in:
marco 2006-06-16 20:04:22 +00:00
parent aa18f7523d
commit 0bb37b3e1a
3 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ide/fpdebug.pas
View File

@ -40,7 +40,7 @@ type
{ if true the current debugger raw will stay in middle of
editor window when debugging PM }
CenterDebuggerRow : boolean;
CenterDebuggerRow : TCentre;
Disableallinvalidbreakpoints : boolean;
OrigPwd, { pwd at startup }
LastFileName : string;
@ -2070,7 +2070,7 @@ begin
if W<>nil then
begin
W^.Select;
W^.Editor^.TrackCursor(true);
W^.Editor^.TrackCursor(do_centre);
W^.Editor^.SetLineFlagExclusive(lfHighlightRow,P^.Breakpoint^.Line);
end;
if Assigned(Owner) then

2
ide/fpini.pas
View File

@ -499,7 +499,7 @@ begin
{ Desktop }
DesktopFileFlags:=INIFile^.GetIntEntry(secPreferences,ieDesktopFlags,DesktopFileFlags);
{ Debugger }
IniCenterDebuggerRow:=INIFile^.GetIntEntry(secPreferences,ieCenterDebuggerRow,1)<>0;
IniCenterDebuggerRow:=tcentre(INIFile^.GetIntEntry(secPreferences,ieCenterDebuggerRow,1));
{ Preferences }
AutoSaveOptions:=INIFile^.GetIntEntry(secPreferences,ieAutoSave,AutoSaveOptions);
MiscOptions:=INIFile^.GetIntEntry(secPreferences,ieMiscOptions,MiscOptions);

2
ide/fpvars.pas
View File

@ -108,7 +108,7 @@ const ClipboardWindow : PClipboardWindow = nil;
AutoSaveOptions : longint = asEnvironment+asDesktop;
MiscOptions : longint = moChangeDirOnOpen+moCloseOnGotoSource;
EditorModified : boolean = false;
IniCenterDebuggerRow : boolean = true;
IniCenterDebuggerRow : tcentre = do_centre;
SleepTimeOut : longint = trunc(10*18.2);
{$ifdef USE_EXTERNAL_COMPILER}
UseExternalCompiler : boolean = true;