Einzelnen Beitrag anzeigen

mmw

Registriert seit: 10. Sep 2019
Ort: OWL
324 Beiträge
 
Delphi 11 Alexandria
 
#8

AW: TurboPack - VirtualShellTools - TCustomVirtualExplorerTree

  Alt 25. Feb 2021, 18:34
hallo,

ich hatte #1 nicht beachtet. Bin von folgenden ausgegangen. ( VirtualExplorerTree);

Delphi-Quellcode:
 if Column = Header.MainColumn then
    begin
      Result := Images;
      if Result = nil then
        {$IF CompilerVersion >= 33}
        Result := FScaledSmallSysImages;
        {$ELSE}
        Result := SmallSysImages;
        {$IFEND}
  Mit Zitat antworten Zitat