anchor.diff:  procedure TmDBGridHelper.SetupGrid;
   begin
     FDBGrid.Align:= alClient;
  -  FDBGrid.AlternateColor:= clMoneyGreen;
  +  FDBGrid.AlternateColor:= DefaultGridAlternateColor;
     FDBGrid.Flat := True;
     FDBGrid.Options := [dgTitles, dgIndicator, dgColumnResize, dgColumnMove, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgAutoSizeColumns, dgDisableDelete, dgDisableInsert, dgMultiselect];
   end;
  
positive.code: 
  function GetLastUsedFolderForExport : TNullableString;
  
  implementation
  
  uses
  
negative.code: procedure TmDrawGridHelper.SetupGrid;
  begin
    FDrawGrid.Align:= alClient;
    FDrawGrid.AlternateColor:= DefaultGridAlternateColor;
    FDrawGrid.Flat := True;
    //(FDBGrid as TDrawGrid).Options := [dgTitles, dgIndicator, dgColumnResize, dgColumnMove, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgAutoSizeColumns, dgDisableDelete, dgDisableInsert, dgMultiselect];
    FDrawGrid.Options := [goRowHighlight, goColSizing, goColMoving, goVertLine, goHorzLine, goTabs, goDrawFocusSelected, goDblClickAutoSize, goRelaxedRowSelect];
  