Changeset 15 for trunk/ScreenTools.pas


Ignore:
Timestamp:
Jan 7, 2017, 10:16:37 PM (8 years ago)
Author:
chronos
Message:
  • Fixed: Top left position of main window.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/ScreenTools.pas

    r14 r15  
    66uses
    77  Windows, StringTables,
    8 
    98  LCLIntf, LCLType, LMessages, Messages, SysUtils, Classes, Graphics, Controls,
    109  Forms, Menus;
    … …  
    608607  PixelDst: ^TPixel;
    609608begin
    610   // TODO assert(Src.PixelFormat = pf8bit);
    611   // TODO assert(dst.PixelFormat = pf24bit);
     609  {TODO assert(Src.PixelFormat = pf8bit);}
     610  assert(dst.PixelFormat = pf24bit);
    612611  if xDst < 0 then
    613612  begin
Note: See TracChangeset for help on using the changeset viewer.