Changeset 617 for trunk/Packages/DpiControls/Dpi.Common.pas
- Timestamp:
- Sep 15, 2024, 1:31:30 PM (14 months ago)
- File:
- 
      - 1 edited
 
 - 
          
  trunk/Packages/DpiControls/Dpi.Common.pas (modified) (2 diffs)
 
Legend:
- Unmodified
- Added
- Removed
- 
      trunk/Packages/DpiControls/Dpi.Common.pasr608 r617 225 225 function ScaleToNative(Value: Integer): Integer; inline; 226 226 begin 227 Result := ScreenInfo.Lookup [Value];227 Result := ScreenInfo.LookupToNative[Value]; 228 228 // Round and Trunc are fast. Ceil and Floor are slow. 229 229 // Without lookup table we would use: … … 238 238 function ScaleFromNative(Value: Integer): Integer; 239 239 begin 240 Result := Trunc(Value * ScreenInfo.FromNative); 240 Result := ScreenInfo.LookupFromNative[Value]; 241 // Round and Trunc are fast. Ceil and Floor are slow. 242 // Without lookup table we would use: 243 // Result := Floor(Value * ScreenInfo.FromNative); 241 244 end; 242 245 
  Note:
 See   TracChangeset
 for help on using the changeset viewer.
  
