Ignore:
Timestamp:
Apr 11, 2018, 11:22:58 AM (7 years ago)
Author:
chronos
Message:
  • Added: Basic TStringTable class.
  • Fixed: Removed various compiler warnings.
Location:
Common
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • Common

    • Property svn:ignore
      •  

        old new  
        11lib
        22backup
         3*.lrj
  • Common/UListViewSort.pas

    r506 r510  
    480480    FHeaderHandle := ListView_GetHeader(FListView.Handle);
    481481    for I := 0 to FListView.Columns.Count - 1 do begin
     482      {$push}{$warn 5057 off}
    482483      FillChar(Item, SizeOf(THDItem), 0);
     484      {$pop}
    483485      Item.Mask := HDI_FORMAT;
    484486      Header_GetItem(FHeaderHandle, I, Item);
Note: See TracChangeset for help on using the changeset viewer.