Changeset 44 for trunk/NewView


Ignore:
Timestamp:
Jan 2, 2007, 8:30:33 PM (19 years ago)
Author:
RBRi
Message:

% command line
% debug output

Location:
trunk/NewView
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/NewView/MainForm.pas

    r38 r44  
    830830  ACLFileIOUtility,
    831831  ACLUtility,
    832   ACLProfile,
    833832  ACLDialogs,
    834833  ACLString,
    835834  RunProgramUnit,
    836835  StringUtilsUnit,
     836  DebugUnit,
    837837
    838838  // Components
    … …  
    11601160  if SettingFont or StartingUp then
    11611161    exit;
    1162   ProfileEvent( 'SetTopicFont' );
     1162  LogEvent(LogSettings, 'SetTopicFont');
    11631163
    11641164  SettingFont := true;
    … …  
    11711171    Settings.NormalFont := NewFont;
    11721172
    1173   ProfileEvent( 'Saving settings' );
     1173  LogEvent(LogSettings, 'Saving settings');
    11741174
    11751175  SaveSettings;
    1176   ProfileEvent( 'Applying settings' );
     1176  LogEvent(LogSettings, 'Applying settings');
    11771177  ApplySettings;
    11781178
    11791179  SettingFont := false;
    1180   ProfileEvent( 'SetTopicFont done' );
     1180  LogEvent(LogSettings, 'SetTopicFont done');
    11811181End;
    11821182
    … …  
    22632263var
    22642264  i: integer;
    2265   tmpCmdLine: String;
    2266   tmpSplittedCmdLine : TStringList;
    22672265  tmpRc : Integer;
    22682266  tmpWindowPosition : TWindowPosition;
    … …  
    22702268  with InformationForm.InformationMemo do
    22712269  begin
    2272     tmpCmdLine := nativeOS2GetCmdLineParameter;
    2273     tmpSplittedCmdLine := TStringList.Create;
    22742270
    22752271    Lines.Clear;
    2276     Lines.Add(ParameterCountLabel +IntToStr(tmpSplittedCmdLine.count));
    2277     tmpRc := splitCmdLineParameter(tmpCmdLine, tmpSplittedCmdLine);
    2278     for i := 0 to tmpSplittedCmdLine.Count -1 do
    2279       Lines.Add( ' '
    2280                  + IntToStr( i )
    2281                  + ' ['
    2282                  + tmpSplittedCmdLine[i]
    2283                  + ']' );
    2284 
    2285     tmpSplittedCmdLine.Destroy;
    22862272    Lines.Add('');
    22872273    Lines.Add('parsed infos:');
    22882274    Lines.Add('getShowUsageFlag: ' + boolToStr(CmdLineParameters.getShowUsageFlag));
    2289     Lines.Add('getSearchTextFlag: ' + boolToStr(CmdLineParameters.getSearchTextFlag));
     2275    Lines.Add('getSearchFlag: ' + boolToStr(CmdLineParameters.getSearchFlag));
    22902276    Lines.Add('getSearchText: ' + CmdLineParameters.getSearchText);
    2291     Lines.Add('getGlobalSearchTextFlag: ' + boolToStr(CmdLineParameters.getGlobalSearchTextFlag));
    2292     Lines.Add('getGlobalSearchText: ' + CmdLineParameters.getGlobalSearchText);
     2277    Lines.Add('getGlobalSearchFlag: ' + boolToStr(CmdLineParameters.getGlobalSearchFlag));
    22932278    Lines.Add('getLanguage: ' + CmdLineParameters.getLanguage);
    22942279    Lines.Add('getHelpManagerFlag: ' + boolToStr(CmdLineParameters.getHelpManagerFlag));
    … …  
    23062291    Lines.Add('getWindowTitle: ' + CmdLineParameters.getWindowTitle);
    23072292    Lines.Add('getFileNames: ' + CmdLineParameters.getFileNames);
    2308     Lines.Add('getTopics: ' + CmdLineParameters.getTopics);
    2309 
    23102293  end;
    23112294
    … …  
    29182901  FileIndex: longint;
    29192902Begin
    2920   ProfileEvent( 'DisplayTopicInWindow' );
     2903  LogEvent(LogDisplay, 'DisplayTopicInWindow');
    29212904
    29222905  SetWaitCursor;
    … …  
    30203003  Var CanClose: Boolean);
    30213004Begin
    3022   ProfileEvent( '-------- Shutdown ----------' );
     3005  LogEvent(LogShutdown, '-------- Shutdown ----------');
    30233006
    30243007
    … …  
    35153498  S: string;
    35163499begin
    3517   ProfileEvent( 'Load bookmarks for ' + HelpFile.Filename );
     3500  LogEvent(LogSettings, 'Load bookmarks for ' + HelpFile.Filename);
    35183501
    35193502  BookmarksFileName:= ChangeFileExt( HelpFile.FileName, '.bmk' );
    … …  
    35643547  HelpFile: THelpFile;
    35653548begin
    3566   ProfileEvent( 'Save notes' );
     3549  LogEvent(LogSettings, 'Save notes');
    35673550
    35683551  for FileIndex := 0 to CurrentOpenFiles.Count - 1 do
    … …  
    35813564  BookmarkCount: integer;
    35823565begin
    3583   ProfileEvent( 'Save bookmarks for ' + HelpFile.Filename );
     3566  LogEvent(LogSettings, 'Save bookmarks for ' + HelpFile.Filename);
    35843567
    35853568  BookmarksFileName:= ChangeFileExt( HelpFile.FileName, '.bmk' );
    … …  
    36443627Procedure TMainForm.MainFormOnDestroy (Sender: TObject);
    36453628Begin
    3646   ProfileEvent( 'MainFormOnDestroy' );
    3647 
    3648   ProfileEvent( 'Write window position' );
    3649 
     3629  LogEvent(LogShutdown, 'MainFormOnDestroy');
     3630
     3631  LogEvent(LogSettings, 'Write window position');
    36503632  WriteWindowPos( self );
    36513633
    3652   ProfileEvent( 'Update colors' );
     3634  LogEvent(LogSettings, 'Update colors');
    36533635  GetColors;
    36543636
    3655   ProfileEvent( 'Save settings' );
    3656 
     3637  LogEvent(LogSettings, 'Save settings');
    36573638  SaveSettings;
    3658 
    3659   ProfileEvent( '  Done' );
     3639  LogEvent(LogSettings, 'Save settings done');
    36603640
    36613641  // else- don't save position/size if doing own help
    … …  
    36633643  TopicText.Destroy;
    36643644
    3665   ProfileEvent( 'Destroy MRU menu items' );
     3645  LogEvent(LogShutdown, 'Destroy MRU menu items');
    36663646  MRUMenuItems.Destroy;
    36673647
    3668   ProfileEvent( 'Destroy navigate to menu items' );
     3648  LogEvent(LogShutdown, 'Destroy navigate to menu items');
    36693649  NavigateToMenuItems.Destroy;
    36703650
    3671   ProfileEvent( 'Destroy pagehistory' );
     3651  LogEvent(LogShutdown, 'Destroy pagehistory');
    36723652  PageHistory.Destroy;
    36733653
    3674   ProfileEvent( 'Clear/destroy notes' );
     3654  LogEvent(LogShutdown, 'Clear/destroy notes');
    36753655  ClearNotes;
    36763656  Notes.Destroy;
    36773657
    3678   ProfileEvent( 'Clear/destroy bookmarks' );
     3658  LogEvent(LogShutdown, 'Clear/destroy bookmarks');
    36793659  ClearBookmarks;
    36803660  Bookmarks.Destroy;
    36813661
    3682   ProfileEvent( 'Destroy bookmark menu items' );
     3662  LogEvent(LogShutdown, 'Destroy bookmark menu items');
    36833663  BookmarksMenuItems.Destroy;
    36843664
    3685   ProfileEvent( 'Destroy files/index/windows' );
     3665  LogEvent(LogShutdown, 'Destroy files/index/windows');
    36863666  CurrentOpenFiles.Destroy;
    36873667  DisplayedIndex.Destroy;
    … …  
    37023682    g_CurrentLanguageFile.Destroy;
    37033683
    3704   ProfileEvent( 'Close global filelist' );
     3684  LogEvent(LogShutdown, 'Close global filelist');
    37053685  GlobalFilelist.Destroy;
    37063686
    3707   ProfileEvent( 'Close shared memory' );
     3687  LogEvent(LogShutdown, 'Close shared memory');
    37083688  SharedMemory.Destroy;
    37093689
    37103690  AllFilesWordSequences.Destroy;
    37113691
    3712   ProfileEvent( 'MainFormOnDestroy done' );
     3692  LogEvent(LogShutdown, 'MainFormOnDestroy done');
    37133693End;
    37143694
    37153695Procedure TMainForm.MainFormOnSetupShow (Sender: TObject);
    37163696Begin
    3717   ProfileEvent( 'OnSetupShow' );
     3697  LogEvent(LogSettings, 'OnSetupShow');
    37183698  TabSet.TabIndex := 0;
    37193699  Notebook.PageIndex := 0;
    … …  
    38433823var
    38443824  tmpCmdLine: String;
    3845   tmpSplittedCmdLine : TStringList;
    38463825  tmpRc : Integer;
    38473826Begin
    3848   ProfileEvent( 'MainFormOnCreate' );
     3827  LogEvent(LogStartup, 'MainFormOnCreate');
    38493828
    38503829  StartingUp := true;
    … …  
    38583837  // parse parameters into Parameters object
    38593838  tmpCmdLine := nativeOS2GetCmdLineParameter;
    3860   tmpSplittedCmdLine := TStringList.Create;
    3861   tmpRc := splitCmdLineParameter(tmpCmdLine, tmpSplittedCmdLine);
    38623839  CmdLineParameters := TCmdLineParameters.Create;
    3863   CmdLineParameters.parseCmdLine(tmpSplittedCmdLine);
    3864   tmpSplittedCmdLine.destroy;
     3840  CmdLineParameters.parseCmdLine(tmpCmdLine);
     3841
    38653842  RegisterForLanguages( OnLanguageEvent );
    38663843
    … …  
    38853862  ContentsOutline.SmoothScroll := false;
    38863863
    3887   ProfileEvent( 'Choosing default font: Trying WarpSans' );
     3864  LogEvent(LogStartup, 'Choosing default font: Trying WarpSans');
    38883865
    38893866  Font := GetNiceDefaultFont;
    … …  
    38963873  // in TApplication.Run
    38973874
    3898   ProfileEvent( 'Starting NewView: MainFormOnCreate' );
     3875  LogEvent(LogStartup, 'Starting NewView: MainFormOnCreate');
    38993876
    39003877  Application.OnHint := OnHint;
    … …  
    39283905  NavigateToMenuItems := TList.Create;
    39293906
    3930   ProfileEvent( 'Loading settings' );
     3907  LogEvent(LogSettings, 'Loading settings');
    39313908
    39323909  LoadSettings;
    … …  
    39343911
    39353912  // load default strings
    3936   ProfileEvent( 'Loading language' );
     3913  LogEvent(LogSettings, 'Loading language');
    39373914
    39383915  if CmdLineParameters.getLanguage <> '' then
    … …  
    39413918    LoadDefaultLanguage( 'newview' );
    39423919
    3943   ProfileEvent( 'Applying settings' );
    3944 
     3920  LogEvent(LogSettings, 'Applying settings');
    39453921  ApplySettings;
    39463922
    39473923  // default position is centered..
    3948   ProfileEvent( 'Set default position' );
     3924  LogEvent(LogSettings, 'Set default position');
    39493925  if Width > Screen.Width then
    39503926    Width := Screen.Width;
    … …  
    39543930  Bottom := ( Screen.Height - Height ) div 2;
    39553931
    3956   ProfileEvent( 'ReadWindowPos' );
    3957 
     3932  LogEvent(LogSettings, 'ReadWindowPos');
    39583933  ReadWindowPos( Self );
    39593934
    39603935  PositionWindow;
    39613936
    3962   ProfileEvent( 'Creating MRU list' );
     3937  LogEvent(LogSettings, 'Creating MRU list');
    39633938
    39643939  CreateMRUMenuItems;
    … …  
    39663941  CloseFile;
    39673942
    3968   ProfileEvent( 'OnCreate done' );
     3943  LogEvent(LogStartup, 'OnCreate done');
    39693944
    39703945  if CmdLineParameters.getWindowPositionFlag then
    … …  
    39783953  end;
    39793954
    3980   ProfileEvent( 'MainFormOnCreate Done' );
     3955  LogEvent(LogStartup, 'MainFormOnCreate Done');
    39813956End;
    39823957
    … …  
    40754050  EnableCallstackLogging( true );
    40764051
    4077   ProfileEvent( 'MainFormOnShow' );
     4052  LogEvent(LogStartup, 'MainFormOnShow');
    40784053
    40794054  if CmdLineParameters.getOwnerWindow <> NULLHANDLE then
    40804055  begin
    4081     ProfileEvent( 'Setting owner: '
    4082                   + IntToStr( CmdLineParameters.getOwnerWindow ) );
     4056    LogEvent(LogStartup, 'Setting owner: '
     4057                  + IntToStr( CmdLineParameters.getOwnerWindow));
    40834058    WinSetOwner( Frame.Handle,
    40844059                 CmdLineParameters.getOwnerWindow );
    … …  
    40884063  if CmdLineParameters.getHelpManagerFlag then
    40894064  begin
    4090     ProfileEvent( '  Help Manager Title: '
     4065    LogEvent(LogStartup, '  Help Manager Title: '
    40914066                  + StrNPas( pSharedStruct ^. Title,
    40924067                             SHARED_STRUCT_TITLE_SIZE ) );
    40934068    HelpManagerVersion := StrNPas( pSharedStruct ^. Version,
    40944069                                   SHARED_STRUCT_VERSION_SIZE );
    4095     ProfileEvent( '  Help Manager Version: '
    4096                   + HelpManagerVersion );
     4070    LogEvent(LogStartup, '  Help Manager Version: ' + HelpManagerVersion );
    40974071
    40984072  end;
    … …  
    41004074  CoolBar.SetMinConstButtonWidth;
    41014075
    4102   ProfileEvent( 'Post WM_OPENED' );
     4076  LogEvent(LogStartup, 'Post WM_OPENED');
    41034077
    41044078  ResetProgress;
    … …  
    41894163  LoadSupportDLL;
    41904164
    4191   ProfileEvent( 'WMOpened: SetLayout' );
     4165  LogEvent(LogStartup, 'WMOpened: SetLayout');
    41924166
    41934167  if CmdLineParameters.getHelpManagerFlag then
    … …  
    42014175//  ApplySettings;
    42024176
    4203   ProfileEvent( 'Enable controls' );
     4177  LogEvent(LogStartup, 'Enable controls');
    42044178  EnableControls;
    42054179
    … …  
    42074181//  ReadWindowPos( Self );
    42084182
    4209   ProfileEvent( 'Finish paint' );
     4183  LogEvent(LogStartup, 'Finish paint');
    42104184  Update;
    42114185
    42124186  if not CmdLineParameters.getHelpManagerFlag then
    42134187  begin
    4214     ProfileEvent( 'Check environment vars' );
     4188    LogEvent(LogStartup, 'Check environment vars');
    42154189    CheckEnvironmentVars;
    42164190
    42174191    if CmdLineParameters.getShowUsageFlag then
    42184192    begin
    4219       ProfileEvent( 'Showing usage' );
     4193      LogEvent(LogStartup, 'Showing usage');
    42204194      ShowUsage;
    42214195      exit;
    … …  
    42334207    StringToList(cmdLineParameters.getFileNames, Filenames, '+' );
    42344208
    4235     ProfileEvent( 'Call OpenFiles' );
     4209    LogEvent(LogStartup, 'Call OpenFiles');
    42364210
    42374211    OpenFirstTopic := true;
    4238     if    ( CmdLineParameters.getTopics <> '' )
    4239        or CmdLineParameters.getSearchTextFlag then
     4212    if ( CmdLineParameters.getSearchText <> '' )
     4213       or CmdLineParameters.getSearchFlag then
    42404214      // if we're going to search, don't open first topic
    42414215      OpenFirstTopic := false;
    … …  
    42534227    Filenames.Destroy;
    42544228
    4255     if CmdLineParameters.getTopics <> '' then
     4229    if CmdLineParameters.getSearchText <> '' then
    42564230    begin
    42574231      // search in contents only!
    4258       ProfileEvent( 'Do startup topic search' );
    4259 
    4260       StartupTopicSearch( CmdLineParameters.getTopics );
     4232      LogEvent(LogStartup, 'Do startup topic search');
     4233
     4234      StartupTopicSearch( CmdLineParameters.getSearchText );
    42614235    end
    4262     else if CmdLineParameters.getSearchTextFlag then
     4236    else if CmdLineParameters.getSearchFlag then
    42634237    begin
    42644238      // search in specified files
    4265       ProfileEvent( 'Do search for topic' );
     4239      LogEvent(LogStartup, 'Do search for topic');
    42664240      DisplaySearch;
    42674241
    … …  
    42704244  end;
    42714245
    4272   if CmdLineParameters.getGlobalSearchTextFlag then
     4246  if CmdLineParameters.getGlobalSearchFlag then
    42734247  begin
    42744248    // Global search
    4275     ProfileEvent( 'Do global search: ' + CmdLineParameters.getGlobalSearchText );
    4276     DoGlobalSearch( CmdLineParameters.getGlobalSearchText );
     4249    LogEvent(LogStartup, 'Do global search: ' + CmdLineParameters.getSearchText );
     4250    DoGlobalSearch( CmdLineParameters.getSearchText );
    42774251  end;
    42784252
    42794253  if     ( length(CmdLineParameters.getFileNames) = 0 )
    4280      and ( not CmdLineParameters.getGlobalSearchTextFlag ) then
     4254     and ( not CmdLineParameters.getSearchFlag ) then
    42814255  begin
    42824256    // user hasn't requested any particular file
    … …  
    42994273  end;
    43004274
    4301   ProfileEvent( 'Open finished' );
     4275  LogEvent(LogStartup, 'Open finished');
    43024276
    43034277  if CmdLineParameters.getHelpManagerFlag then
    … …  
    43134287  StartingUp := false;
    43144288
    4315   ProfileEvent( 'RUN PROGRAM' );
     4289  LogEvent(LogStartup, 'RUN PROGRAM');
    43164290end;
    43174291
    … …  
    44014375                      - Notebook.Bottom;
    44024376
    4403   ProfileEvent( 'TMainForm.SetLayout' );
    4404   ProfileEvent( '  RealClientHeight: '  + IntToStr( RealClientHeight ) );
    4405 
    4406   ProfileEvent( '  Form Width: '  + IntToStr( Width ) );
    4407   ProfileEvent( '  Form Height: '  + IntToStr( Height ) );
    4408   ProfileEvent( '  Form ClientWidth: '  + IntToStr( ClientWidth ) );
    4409   ProfileEvent( '  Form ClientHeight: '  + IntToStr( ClientHeight ) );
    4410   ProfileEvent( '  CoolBar.Height: '  + IntToStr( CoolBar.Height ) );
    4411   ProfileEvent( '  CoolBar.Bottom: '  + IntToStr( CoolBar.Bottom ) );
     4377  LogEvent(LogStartup, 'TMainForm.SetLayout');
     4378  LogEvent(LogStartup, '  RealClientHeight: '  + IntToStr( RealClientHeight ));
     4379
     4380  LogEvent(LogStartup, '  Form Width: '  + IntToStr( Width ));
     4381  LogEvent(LogStartup, '  Form Height: '  + IntToStr( Height ) );
     4382  LogEvent(LogStartup, '  Form ClientWidth: '  + IntToStr( ClientWidth ) );
     4383  LogEvent(LogStartup, '  Form ClientHeight: '  + IntToStr( ClientHeight ) );
     4384  LogEvent(LogStartup, '  CoolBar.Height: '  + IntToStr( CoolBar.Height ) );
     4385  LogEvent(LogStartup, '  CoolBar.Bottom: '  + IntToStr( CoolBar.Bottom ) );
    44124386
    44134387  if CurrentOpenFiles.Count > 0 then
    … …  
    44494423  DisplayPanel.Width:= ClientWidth - DisplayPanel.Left;
    44504424  DisplayPanel.Height := RealClientHeight;
    4451   ProfileEvent( '  DisplayPanel.Width: '  + IntToStr( DisplayPanel.Width ) );
    4452   ProfileEvent( '  DisplayPanel.Height: '  + IntToStr( DisplayPanel.Height ) );
    4453   ProfileEvent( '  DisplayPanel.Bottom: '  + IntToStr( DisplayPanel.Bottom ) );
     4425  LogEvent(LogStartup, '  DisplayPanel.Width: '  + IntToStr( DisplayPanel.Width ) );
     4426  LogEvent(LogStartup, '  DisplayPanel.Height: '  + IntToStr( DisplayPanel.Height ) );
     4427  LogEvent(LogStartup, '  DisplayPanel.Bottom: '  + IntToStr( DisplayPanel.Bottom ) );
    44544428
    44554429  ProgressBar.Left:= 1;
    … …  
    57775751begin
    57785752  ContentsOutline.BeginUpdate;
    5779   ProfileEvent( 'Load contents outline' );
     5753  LogEvent(LogStartup, 'Load contents outline');
    57805754
    57815755  // we don't clear it first, to allow adding additional files
    57825756  // into the contents tree
    57835757
    5784   ProfileEvent( 'Loop files' );
     5758  LogEvent(LogStartup, 'Loop files');
    57855759
    57865760  FirstNode := nil;
    … …  
    57915765  begin
    57925766    HelpFile := Files[ FileIndex ];
    5793     ProfileEvent( 'File ' + IntToStr( FileIndex ) );
     5767    LogEvent(LogStartup, 'File ' + IntToStr( FileIndex ) );
    57945768    TopicIndex := 0;
    57955769    while TopicIndex < HelpFile.TopicCount do
    … …  
    58265800    end;
    58275801  end;
    5828   ProfileEvent( '  EndUpdate' );
     5802  LogEvent(LogStartup, '  EndUpdate' );
    58295803  ContentsOutline.EndUpdate;
    58305804
    58315805  if Settings.OpenWithExpandedContents then
    58325806  begin
    5833     ProfileEvent( '  Expand all contents' );
     5807    LogEvent(LogStartup, '  Expand all contents' );
    58345808    ContentsOutline.ExpandAll
    58355809  end
    58365810  else if ContentsOutline.ChildCount = 1 then
    58375811  begin
    5838     ProfileEvent( '  Expand first node' );
     5812    LogEvent(LogStartup, '  Expand first node' );
    58395813    // Contents has only one top level node... expand it
    58405814    FirstNode.Expand;
    … …  
    58425816
    58435817  ContentsLoaded := true;
    5844   ProfileEvent( '  Contents loaded' );
     5818  LogEvent(LogStartup, '  Contents loaded' );
    58455819
    58465820end;
    … …  
    58605834
    58615835begin
    5862   ProfileEvent( 'Save notes for ' + HelpFile.Filename );
     5836  LogEvent(LogStartup, 'Save notes for ' + HelpFile.Filename );
    58635837
    58645838  if not HelpFile.NotesLoaded then
    … …  
    58675841    exit;
    58685842
    5869   ProfileEvent( 'Really saving' );
     5843  LogEvent(LogStartup, 'Really saving' );
    58705844
    58715845  NotesFileName := ChangeFileExt( HelpFile.FileName, '.nte' );
    … …  
    59535927
    59545928begin
    5955   ProfileEvent( 'Load notes for ' + HelpFile.Filename );
     5929  LogEvent(LogStartup, 'Load notes for ' + HelpFile.Filename );
    59565930
    59575931  if HelpFile.NotesLoaded then
    … …  
    61196093  StopPrinting;
    61206094
    6121   ProfileEvent( 'Set Caption' );
     6095  LogEvent(LogShutdown, 'Set Caption' );
    61226096  MainTitle := '';
    61236097  SetMainCaption;
    61246098
    6125   ProfileEvent( 'Close Windows' );
     6099  LogEvent(LogShutdown, 'Close Windows' );
    61266100  CloseWindows;
    6127   ProfileEvent( 'Set selected node to nil' );
    6128 
     6101
     6102  LogEvent(LogShutdown, 'Set selected node to nil' );
    61296103  ContentsOutline.SelectedNode:= Nil;
    61306104
    61316105  M1:= MemAvail;
    61326106
    6133   ProfileEvent( 'Clear contents outline' );
    6134 
     6107  LogEvent(LogShutdown, 'Clear contents outline' );
    61356108  ContentsOutline.Clear;
    61366109
    6137   ProfileEvent( 'Free contents: ' + IntToStr( MemAvail - M1 ) );
     6110  LogEvent(LogShutdown, 'Free contents: ' + IntToStr( MemAvail - M1 ) );
    61386111  M1:= MemAvail;
    61396112
    61406113  DisplayedIndex.Clear;
    61416114  IndexListBox.Clear;
    6142   ProfileEvent( 'Clear index ' + IntToStr( MemAvail - M1 ) );
     6115  LogEvent(LogShutdown, 'Clear index ' + IntToStr( MemAvail - M1 ) );
    61436116  M1:= MemAvail;
    61446117
    … …  
    61466119  SearchResultsListBox.Clear;
    61476120
    6148   ProfileEvent( 'Notes, search etc ' + IntToStr( MemAvail - M1 ) );
     6121  LogEvent(LogShutdown, 'Notes, search etc ' + IntToStr( MemAvail - M1 ) );
    61496122  M1:= MemAvail;
    61506123
    … …  
    61596132  ClearAllWordSequences;
    61606133
    6161   ProfileEvent( 'Destroy helpfile objects' );
     6134  LogEvent(LogShutdown, 'Destroy helpfile objects' );
    61626135
    61636136  // Now destroy help files
    … …  
    61726145  CurrentOpenFiles.Clear;
    61736146
    6174   ProfileEvent( 'Destroy helpfiles ' + IntToStr( MemAvail - M1 ) );
     6147  LogEvent(LogShutdown, 'Destroy helpfiles ' + IntToStr( MemAvail - M1 ) );
    61756148  M1 := MemAvail;
    61766149
    6177   ProfileEvent( 'Clear notes' );
     6150  LogEvent(LogShutdown, 'Clear notes' );
    61786151  ClearNotes;
    61796152
    6180   ProfileEvent( 'Clear bookmarks' );
     6153  LogEvent(LogShutdown, 'Clear bookmarks' );
    61816154  ClearBookmarks;
    61826155
    61836156  ClearPageHistory;
    61846157
    6185   ProfileEvent( 'Enable controls' );
     6158  LogEvent(LogShutdown, 'Enable controls' );
    61866159  EnableControls;
    61876160
    6188   ProfileEvent( 'CloseFile done' );
     6161  LogEvent(LogShutdown, 'CloseFile done' );
    61896162
    61906163end;
    … …  
    62416214  i : longint;
    62426215begin
    6243   ProfileEvent( 'Create index' );
     6216  LogEvent(LogStartup, 'Create index' );
    62446217
    62456218  SetWaitCursor;
    62466219
    6247   ProfileEvent( '  Get/sort lists' );
     6220  LogEvent(LogStartup, '  Get/sort lists' );
    62486221
    62496222  ProgressBar.Position := 70;
    … …  
    62946267  ProgressBar.Position := 80;
    62956268
    6296   ProfileEvent( '  Merge lists' );
     6269  LogEvent(LogStartup, '  Merge lists' );
    62976270
    62986271  pLastEntry := NullStr;
    … …  
    63976370
    63986371  ProgressBar.Position := 95;
    6399   ProfileEvent( '  Display index (count = '
     6372  LogEvent(LogStartup, '  Display index (count = '
    64006373                + IntToStr( DisplayedIndex.Count )
    64016374                + ')' );
    … …  
    64046377  IndexListBox.Items.Assign( DisplayedIndex );
    64056378
    6406   ProfileEvent( '  Tidy up' );
     6379  LogEvent(LogStartup, '  Tidy up' );
    64076380
    64086381  IndexLists.Destroy;
    … …  
    64156388
    64166389  SetStatus( 'Index loaded' );
    6417   ProfileEvent( '  Done' );
     6390  LogEvent(LogStartup, '  Done' );
    64186391end;
    64196392
    … …  
    65276500  RequiredFileHandles: LONG;
    65286501begin
    6529   ProfileEvent( 'LoadFiles' );
     6502  LogEvent(LogStartup, 'LoadFiles' );
    65306503
    65316504  LoadingFilenameList := TStringList.Create;
    … …  
    65336506  TranslateIPFEnvironmentVars( FileNames, LoadingFilenameList );
    65346507
    6535   ProfileEvent( 'Finding files' );
     6508  LogEvent(LogStartup, 'Finding files' );
    65366509
    65376510  ProgressBar.Show;
    … …  
    65426515  begin
    65436516    FileName := LoadingFilenameList[ FileIndex ];
    6544     ProfileEvent( '  File: ' + FileName );
     6517    LogEvent(LogStartup, '  File: ' + FileName );
    65456518
    65466519    // Find the help file, if possible
    … …  
    65486521    if FullFilePath <> '' then
    65496522    begin
    6550       ProfileEvent( '    Full path: ' + FullFilePath );
     6523      LogEvent(LogStartup, '    Full path: ' + FullFilePath );
    65516524    end
    65526525    else
    65536526    begin
    6554       ProfileEvent( '    File not found' );
     6527      LogEvent(LogStartup, '    File not found' );
    65556528      FullFilePath := FileName; // we'll complain later.
    65566529    end;
    … …  
    65796552  begin
    65806553    Filename := LoadingFilenameList[ FileIndex ];
    6581     ProfileEvent( '  Loading: ' + Filename );
     6554    LogEvent(LogStartup, '  Loading: ' + Filename );
    65826555    try
    65836556      LoadingFileIndex := FileIndex;
    … …  
    66596632  FileIndex: longint;
    66606633begin
    6661   ProfileEvent( 'DisplayFiles' );
     6634  LogEvent(LogStartup, 'DisplayFiles' );
    66626635  // Now load the various parts of the file(s)
    66636636  // into the user interface
    … …  
    66936666  SetStatus( LoadingStatusDone );
    66946667
    6695   ProfileEvent( 'DisplayFiles Done' );
     6668  LogEvent(LogStartup, 'DisplayFiles Done' );
    66966669
    66976670end;
    … …  
    67046677  FirstContentsNode: TNode;
    67056678begin
    6706   ProfileEvent( 'OpenFiles' );
     6679  LogEvent(LogStartup, 'OpenFiles' );
    67076680
    67086681  if not OKToCloseFile then
    … …  
    67616734  if FirstContentsNode <> nil then
    67626735  begin
    6763     ProfileEvent( '  Select first node' );
     6736    LogEvent(LogStartup, '  Select first node' );
    67646737    ContentsOutline.SelectedNode := FirstContentsNode;
    67656738  end;
    … …  
    67756748  if DisplayFirstTopic then
    67766749  begin
    6777     ProfileEvent( 'Display first topic' );
     6750    LogEvent(LogStartup, 'Display first topic' );
    67786751    DisplaySelectedContentsTopic;
    67796752  end;
    67806753
    6781   ProfileEvent( 'OpenFiles complete' );
     6754  LogEvent(LogStartup, 'OpenFiles complete' );
    67826755end;
    67836756
    … …  
    67886761  FirstNewContentsNode: TNode;
    67896762begin
    6790   ProfileEvent( 'OpenAdditionalFiles' );
     6763  LogEvent(LogStartup, 'OpenAdditionalFiles' );
    67916764
    67926765  if not OKToCloseFile then
    … …  
    68296802    DisplaySelectedContentsTopic;
    68306803
    6831   ProfileEvent( 'OpenAdditionalFiles complete' );
     6804  LogEvent(LogStartup, 'OpenAdditionalFiles complete' );
    68326805end;
    68336806

  • trunk/NewView/NewView.spr

    r38 r44  
    1717[Breakpoints]
    1818
    19 Breakpoint0=.\HELPTOPIC.PAS|1044
     19Breakpoint0=.\MAINFORM.PAS|2271
    2020
    2121[Browser Files]
    … …  
    6565File42=ACLLANGUAGEUNIT
    6666File43=GENERICTHREAD
    67 File44=CMDLINEPARAMETERUNIT
    68 File45=SPLITBAR
    69 File46=CONTROLSCROLLING
    70 File47=OUTLINE2
    71 File48=CANVASFONTMANAGER
    72 File49=RICHTEXTDOCUMENTUNIT
    73 File50=RICHTEXTSTYLEUNIT
    74 File51=CLIPBRD
    75 File52=RICHTEXTLAYOUTUNIT
    76 File53=CONTROLSUTILITY
    77 File54=RICHTEXTDISPLAYUNIT
    78 File55=RICHTEXTVIEW
    79 File56=CUSTOMLISTBOX
    80 File57=IPFFILEFORMATUNIT
    81 File58=HELPWINDOWDIMENSIONS
    82 File59=ASTRINGUTILITYUNIT
    83 File60=STRINGUTILSUNIT
    84 File61=SETTINGSUNIT
    85 File62=HELPTOPIC
    86 File63=CUSTOMMEMO
    87 File64=SYSTEMICONUNIT
    88 File65=ACLMESSAGEFORM
    89 File66=ACLDIALOGS
    90 File67=HELPBITMAP
    91 File68=SEARCHTABLE
    92 File69=HELPFILE
    93 File70=HELPWINDOWUNIT
    94 File71=NAVIGATEPOINTUNIT
    95 File72=MISCUNIT
    96 File73=HELPMANAGERUNIT
    97 File74=TEXTSEARCHQUERY
    98 File75=TABSET2UNIT
    99 File76=RUNPROGRAMUNIT
    100 File77=RICHTEXTPRINTUNIT
    101 File78=INFORMATIONFORMUNIT
    102 File79=COLORMAPPING
    103 File80=COLORWHEEL
    104 File81=CUSTOMFONTDIALOG
    105 File82=BSEDEV
    106 File83=DRIVEINFOUNIT
    107 File84=BITMAPUTILITY
    108 File85=CUSTOMFILECONTROLS
    109 File86=FILEDIALOGFORM
    110 File87=OPTIONSFORM
    111 File88=VERSIONUNIT
    112 File89=WEBBROWSERUNIT
    113 File90=PRODUCTINFORMATIONFORMUNIT
    114 File91=NOTEFORM
    115 File92=LED
    116 File93=SEARCHUNIT
    117 File94=SEARCHDIRECTORIESFORMUNIT
    118 File95=GLOBALSEARCHFORM
    119 File96=BOOKMARKSFORMUNIT
    120 File97=PRINTDIALOGUNIT
    121 File98=GLOBALFILELISTUNIT
    122 File99=STARTUPUNIT
    123 File100=MAINFORM
     67File44=STRINGUTILSUNIT
     68File45=DEBUGUNIT
     69File46=CMDLINEPARAMETERUNIT
     70File47=SPLITBAR
     71File48=CONTROLSCROLLING
     72File49=OUTLINE2
     73File50=CANVASFONTMANAGER
     74File51=RICHTEXTDOCUMENTUNIT
     75File52=RICHTEXTSTYLEUNIT
     76File53=CLIPBRD
     77File54=RICHTEXTLAYOUTUNIT
     78File55=CONTROLSUTILITY
     79File56=RICHTEXTDISPLAYUNIT
     80File57=RICHTEXTVIEW
     81File58=CUSTOMLISTBOX
     82File59=IPFFILEFORMATUNIT
     83File60=HELPWINDOWDIMENSIONS
     84File61=ASTRINGUTILITYUNIT
     85File62=SETTINGSUNIT
     86File63=HELPTOPIC
     87File64=CUSTOMMEMO
     88File65=SYSTEMICONUNIT
     89File66=ACLMESSAGEFORM
     90File67=ACLDIALOGS
     91File68=HELPBITMAP
     92File69=SEARCHTABLE
     93File70=HELPFILE
     94File71=HELPWINDOWUNIT
     95File72=NAVIGATEPOINTUNIT
     96File73=MISCUNIT
     97File74=HELPMANAGERUNIT
     98File75=TEXTSEARCHQUERY
     99File76=TABSET2UNIT
     100File77=RUNPROGRAMUNIT
     101File78=RICHTEXTPRINTUNIT
     102File79=INFORMATIONFORMUNIT
     103File80=COLORMAPPING
     104File81=COLORWHEEL
     105File82=CUSTOMFONTDIALOG
     106File83=BSEDEV
     107File84=DRIVEINFOUNIT
     108File85=BITMAPUTILITY
     109File86=CUSTOMFILECONTROLS
     110File87=FILEDIALOGFORM
     111File88=OPTIONSFORM
     112File89=VERSIONUNIT
     113File90=WEBBROWSERUNIT
     114File91=PRODUCTINFORMATIONFORMUNIT
     115File92=NOTEFORM
     116File93=LED
     117File94=SEARCHUNIT
     118File95=SEARCHDIRECTORIESFORMUNIT
     119File96=GLOBALSEARCHFORM
     120File97=BOOKMARKSFORMUNIT
     121File98=PRINTDIALOGUNIT
     122File99=GLOBALFILELISTUNIT
     123File100=STARTUPUNIT
     124File101=MAINFORM
    124125
    125126[Compiler Options]
    … …  
    143144[Debugger Options]
    144145
    145 DebugInfo=LocalSymbols
     146DebugInfo=LineNumbers,LocalSymbols
    146147EvalHints=True
    147148Dbg_Options=1
    … …  
    151152[Directories]
    152153
    153 LastDir=P:\NEWVIEW_DEV\NEWVIEW
     154LastDir=P:\NEWVIEW_DEV\Components
    154155OutDir=P:\newview_dev\build\newview
    155156LibDir=P:\newview_dev\build\sibyl\lib;P:\newview_dev\build\components;P:\newview_dev\build\library
    … …  
    169170[Find History]
    170171
    171 Find0=beta3
    172 Find1=StrDoubleQuote
    173 Find2=quote
    174 Find3=t
    175 Find4=impl
    176 Find5=rbri
    177 Find6=url
    178 Find7=TSerializableStringList
    179 Find8=StrUnDoubleQuote
    180 Find9=FullDoubleQuote
    181 Find10=Quote
    182 Find11=OnClickLink
    183 Find12=link
    184 Find13=on
    185 Find14=run
    186 Find15=Forms
     172Find0=profile
     173Find1=CmdLineParameters
     174Find2=tmpCmdLineParameters
     175Find3=Startup
     176Find4=searchtext
     177Find5=color
     178Find6=beta3
     179Find7=StrDoubleQuote
     180Find8=quote
     181Find9=t
     182Find10=impl
     183Find11=rbri
     184Find12=url
     185Find13=TSerializableStringList
     186Find14=StrUnDoubleQuote
     187Find15=FullDoubleQuote
    187188
    188189[General]
    189190
    190191Version=Sibyl Project Ver2.02
    191 ProjectName=P:\newview_dev\NewView\NewView.spr
     192ProjectName=P:\NEWVIEW_DEV\NewView\NewView.spr
    192193ProjectType=Visual
    193194CompLibName=D:\progs\Sibyl\Bin\CompLib.dll
    … …  
    200201[Last Closed Files]
    201202
    202 File0=..\.\Library\ACLStringUtility.pas
    203 File1=..\.\SIBYL\RTL\SYSTEM.PAS
    204 File2=.\HelpFile.pas
    205 File3=.\StartupUnit.pas
    206 File4=.\SettingsUnit.pas
    207 File5=.\ProductInformationFormUnit.pas
     203File0=.\unittests\cmdlineparameterunittests.pas
     204File1=.\VersionUnit.pas
     205File2=..\.\Library\ACLStringUtility.pas
     206File3=..\.\SIBYL\RTL\SYSTEM.PAS
     207File4=.\HelpFile.pas
    208208
    209209[Last Open Files]
    … …  
    213213File0.Bottom=-5
    214214File0.Width=1243
    215 File0.Height=538
    216 File0.Column=36
    217 File0.Line=5490
     215File0.Height=481
     216File0.Column=1
     217File0.Line=5
    218218File1=.\NewView.pas
    219219File1.Left=-4
    220220File1.Bottom=-5
    221221File1.Width=1243
    222 File1.Height=538
    223 File1.Column=10
    224 File1.Line=15
     222File1.Height=481
     223File1.Column=4
     224File1.Line=26
    225225File2=.\HelpTopic.pas
    226226File2.Left=-4
    227227File2.Bottom=-5
    228228File2.Width=1243
    229 File2.Height=538
    230 File2.Column=35
    231 File2.Line=1053
     229File2.Height=481
     230File2.Column=1
     231File2.Line=1232
    232232File3=..\.\LIBRARY\RunProgramUnit.pas
    233233File3.Left=-4
    234234File3.Bottom=-5
    235235File3.Width=1243
    236 File3.Height=538
     236File3.Height=481
    237237File3.Column=1
    238238File3.Line=369
    … …  
    241241File4.Bottom=-5
    242242File4.Width=1243
    243 File4.Height=538
    244 File4.Column=23
    245 File4.Line=29
    246 File5=.\VersionUnit.pas
     243File4.Height=481
     244File4.Column=40
     245File4.Line=280
     246File5=.\StartupUnit.pas
    247247File5.Left=-4
    248248File5.Bottom=-5
    249249File5.Width=1243
    250 File5.Height=538
    251 File5.Column=32
    252 File5.Line=17
     250File5.Height=481
     251File5.Column=13
     252File5.Line=319
     253File6=.\CmdLineParameterUnit.pas
     254File6.Left=-4
     255File6.Bottom=-5
     256File6.Width=1243
     257File6.Height=481
     258File6.Column=26
     259File6.Line=162
     260File7=.\DebugUnit.pas
     261File7.Left=-4
     262File7.Bottom=-5
     263File7.Width=1243
     264File7.Height=481
     265File7.Column=1
     266File7.Line=31
     267File8=..\.\Library\ACLProfile.pas
     268File8.Left=-4
     269File8.Bottom=-5
     270File8.Width=1243
     271File8.Height=481
     272File8.Column=21
     273File8.Line=43
     274File9=..\.\Components\ACLLanguageUnit.pas
     275File9.Left=-4
     276File9.Bottom=-5
     277File9.Width=1243
     278File9.Height=481
     279File9.Column=3
     280File9.Line=799
    253281
    254282[Linker Options]
    … …  
    271299MainFile0=.\NewView.pas
    272300MainFile0.Ext=.EXE
    273 MainFile0.Checksum=26368
     301MainFile0.Checksum=26624
    274302MainFile0.Expanded=False
    275303MainFile0.File0=.\BookmarksFormUnit.pas
    … …  
    346374MainFile0.Dependency42=..\.\components\ACLLANGUAGEUNIT.PAS
    347375MainFile0.Dependency43=..\.\components\GENERICTHREAD.PAS
    348 MainFile0.Dependency44=.\CMDLINEPARAMETERUNIT.PAS
    349 MainFile0.Dependency45=..\.\components\SPLITBAR.PAS
    350 MainFile0.Dependency46=..\.\components\CONTROLSCROLLING.PAS
    351 MainFile0.Dependency47=..\.\components\OUTLINE2.PAS
    352 MainFile0.Dependency48=..\.\components\CANVASFONTMANAGER.PAS
    353 MainFile0.Dependency49=..\.\components\RICHTEXTDOCUMENTUNIT.PAS
    354 MainFile0.Dependency50=..\.\components\RICHTEXTSTYLEUNIT.PAS
    355 MainFile0.Dependency51=..\.\sibyl\spcc\CLIPBRD.PAS
    356 MainFile0.Dependency52=..\.\components\RICHTEXTLAYOUTUNIT.PAS
    357 MainFile0.Dependency53=..\.\components\CONTROLSUTILITY.PAS
    358 MainFile0.Dependency54=..\.\components\RICHTEXTDISPLAYUNIT.PAS
    359 MainFile0.Dependency55=..\.\components\RICHTEXTVIEW.PAS
    360 MainFile0.Dependency56=..\.\components\CUSTOMLISTBOX.PAS
    361 MainFile0.Dependency57=.\IPFFILEFORMATUNIT.PAS
    362 MainFile0.Dependency58=.\HELPWINDOWDIMENSIONS.PAS
    363 MainFile0.Dependency59=..\.\library\ASTRINGUTILITYUNIT.PAS
    364 MainFile0.Dependency60=.\STRINGUTILSUNIT.PAS
    365 MainFile0.Dependency61=.\SETTINGSUNIT.PAS
    366 MainFile0.Dependency62=.\HELPTOPIC.PAS
    367 MainFile0.Dependency63=..\.\components\CUSTOMMEMO.PAS
    368 MainFile0.Dependency64=..\.\components\SYSTEMICONUNIT.PAS
    369 MainFile0.Dependency65=..\.\components\ACLMESSAGEFORM.PAS
    370 MainFile0.Dependency66=..\.\components\ACLDIALOGS.PAS
    371 MainFile0.Dependency67=.\HELPBITMAP.PAS
    372 MainFile0.Dependency68=.\SEARCHTABLE.PAS
    373 MainFile0.Dependency69=.\HELPFILE.PAS
    374 MainFile0.Dependency70=.\HELPWINDOWUNIT.PAS
    375 MainFile0.Dependency71=.\NAVIGATEPOINTUNIT.PAS
    376 MainFile0.Dependency72=.\MISCUNIT.PAS
    377 MainFile0.Dependency73=.\HELPMANAGERUNIT.PAS
    378 MainFile0.Dependency74=.\TEXTSEARCHQUERY.PAS
    379 MainFile0.Dependency75=..\.\components\TABSET2UNIT.PAS
    380 MainFile0.Dependency76=..\.\library\RUNPROGRAMUNIT.PAS
    381 MainFile0.Dependency77=..\.\components\RICHTEXTPRINTUNIT.PAS
    382 MainFile0.Dependency78=.\INFORMATIONFORMUNIT.PAS
    383 MainFile0.Dependency79=..\.\components\COLORMAPPING.PAS
    384 MainFile0.Dependency80=..\.\components\COLORWHEEL.PAS
    385 MainFile0.Dependency81=..\.\components\CUSTOMFONTDIALOG.PAS
    386 MainFile0.Dependency82=..\.\sibyl\rtl\BSEDEV.PAS
    387 MainFile0.Dependency83=..\.\components\DRIVEINFOUNIT.PAS
    388 MainFile0.Dependency84=..\.\components\BITMAPUTILITY.PAS
    389 MainFile0.Dependency85=..\.\components\CUSTOMFILECONTROLS.PAS
    390 MainFile0.Dependency86=.\FILEDIALOGFORM.PAS
    391 MainFile0.Dependency87=.\OPTIONSFORM.PAS
    392 MainFile0.Dependency88=.\VERSIONUNIT.PAS
    393 MainFile0.Dependency89=..\.\components\WEBBROWSERUNIT.PAS
    394 MainFile0.Dependency90=.\PRODUCTINFORMATIONFORMUNIT.PAS
    395 MainFile0.Dependency91=.\NOTEFORM.PAS
    396 MainFile0.Dependency92=.\SEARCHUNIT.PAS
    397 MainFile0.Dependency93=.\SEARCHDIRECTORIESFORMUNIT.PAS
    398 MainFile0.Dependency94=.\GLOBALSEARCHFORM.PAS
    399 MainFile0.Dependency95=.\BOOKMARKSFORMUNIT.PAS
    400 MainFile0.Dependency96=.\PRINTDIALOGUNIT.PAS
    401 MainFile0.Dependency97=.\GLOBALFILELISTUNIT.PAS
    402 MainFile0.Dependency98=.\STARTUPUNIT.PAS
    403 MainFile0.Dependency99=.\MAINFORM.PAS
    404 MainFile0.Dependency100=.\NewView.scu
     376MainFile0.Dependency44=.\STRINGUTILSUNIT.PAS
     377MainFile0.Dependency45=.\DEBUGUNIT.PAS
     378MainFile0.Dependency46=.\CMDLINEPARAMETERUNIT.PAS
     379MainFile0.Dependency47=..\.\components\SPLITBAR.PAS
     380MainFile0.Dependency48=..\.\components\CONTROLSCROLLING.PAS
     381MainFile0.Dependency49=..\.\components\OUTLINE2.PAS
     382MainFile0.Dependency50=..\.\components\CANVASFONTMANAGER.PAS
     383MainFile0.Dependency51=..\.\components\RICHTEXTDOCUMENTUNIT.PAS
     384MainFile0.Dependency52=..\.\components\RICHTEXTSTYLEUNIT.PAS
     385MainFile0.Dependency53=..\.\sibyl\spcc\CLIPBRD.PAS
     386MainFile0.Dependency54=..\.\components\RICHTEXTLAYOUTUNIT.PAS
     387MainFile0.Dependency55=..\.\components\CONTROLSUTILITY.PAS
     388MainFile0.Dependency56=..\.\components\RICHTEXTDISPLAYUNIT.PAS
     389MainFile0.Dependency57=..\.\components\RICHTEXTVIEW.PAS
     390MainFile0.Dependency58=..\.\components\CUSTOMLISTBOX.PAS
     391MainFile0.Dependency59=.\IPFFILEFORMATUNIT.PAS
     392MainFile0.Dependency60=.\HELPWINDOWDIMENSIONS.PAS
     393MainFile0.Dependency61=..\.\library\ASTRINGUTILITYUNIT.PAS
     394MainFile0.Dependency62=.\SETTINGSUNIT.PAS
     395MainFile0.Dependency63=.\HELPTOPIC.PAS
     396MainFile0.Dependency64=..\.\components\CUSTOMMEMO.PAS
     397MainFile0.Dependency65=..\.\components\SYSTEMICONUNIT.PAS
     398MainFile0.Dependency66=..\.\components\ACLMESSAGEFORM.PAS
     399MainFile0.Dependency67=..\.\components\ACLDIALOGS.PAS
     400MainFile0.Dependency68=.\HELPBITMAP.PAS
     401MainFile0.Dependency69=.\SEARCHTABLE.PAS
     402MainFile0.Dependency70=.\HELPFILE.PAS
     403MainFile0.Dependency71=.\HELPWINDOWUNIT.PAS
     404MainFile0.Dependency72=.\NAVIGATEPOINTUNIT.PAS
     405MainFile0.Dependency73=.\MISCUNIT.PAS
     406MainFile0.Dependency74=.\HELPMANAGERUNIT.PAS
     407MainFile0.Dependency75=.\TEXTSEARCHQUERY.PAS
     408MainFile0.Dependency76=..\.\components\TABSET2UNIT.PAS
     409MainFile0.Dependency77=..\.\library\RUNPROGRAMUNIT.PAS
     410MainFile0.Dependency78=..\.\components\RICHTEXTPRINTUNIT.PAS
     411MainFile0.Dependency79=.\INFORMATIONFORMUNIT.PAS
     412MainFile0.Dependency80=..\.\components\COLORMAPPING.PAS
     413MainFile0.Dependency81=..\.\components\COLORWHEEL.PAS
     414MainFile0.Dependency82=..\.\components\CUSTOMFONTDIALOG.PAS
     415MainFile0.Dependency83=..\.\sibyl\rtl\BSEDEV.PAS
     416MainFile0.Dependency84=..\.\components\DRIVEINFOUNIT.PAS
     417MainFile0.Dependency85=..\.\components\BITMAPUTILITY.PAS
     418MainFile0.Dependency86=..\.\components\CUSTOMFILECONTROLS.PAS
     419MainFile0.Dependency87=.\FILEDIALOGFORM.PAS
     420MainFile0.Dependency88=.\OPTIONSFORM.PAS
     421MainFile0.Dependency89=.\VERSIONUNIT.PAS
     422MainFile0.Dependency90=..\.\components\WEBBROWSERUNIT.PAS
     423MainFile0.Dependency91=.\PRODUCTINFORMATIONFORMUNIT.PAS
     424MainFile0.Dependency92=.\NOTEFORM.PAS
     425MainFile0.Dependency93=.\SEARCHUNIT.PAS
     426MainFile0.Dependency94=.\SEARCHDIRECTORIESFORMUNIT.PAS
     427MainFile0.Dependency95=.\GLOBALSEARCHFORM.PAS
     428MainFile0.Dependency96=.\BOOKMARKSFORMUNIT.PAS
     429MainFile0.Dependency97=.\PRINTDIALOGUNIT.PAS
     430MainFile0.Dependency98=.\GLOBALFILELISTUNIT.PAS
     431MainFile0.Dependency99=.\STARTUPUNIT.PAS
     432MainFile0.Dependency100=.\MAINFORM.PAS
     433MainFile0.Dependency101=.\NewView.scu
    405434
    406435[Replace History]
Note: See TracChangeset for help on using the changeset viewer.