Changeset 40 for trunk


Ignore:
Timestamp:
Oct 15, 2018, 5:17:15 PM (6 years ago)
Author:
chronos
Message:
  • Added: 16-bit channel RGB color format.
Location:
trunk
Files:
1 added
6 edited

Legend:

Unmodified
Added
Removed

  • trunk/Forms/UFormMain.lfm

    r37 r40  
    11object FormMain: TFormMain
    2   Left = 546
     2  Left = 577
    33  Height = 640
    4   Top = 316
     4  Top = 304
    55  Width = 920
    66  Caption = 'LibrePaint'

  • trunk/Forms/UFormMain.pas

    r38 r40  
    245245  if Assigned(Core.Project) then
    246246  with Core.Project do begin
    247     if Imagetool = itMoveView then begin
     247    if ImageTool = itMoveView then begin
    248248      View.SrcRect := Bounds(Trunc(StartViewPoint.X + (StartMousePoint.X - X) / View.Zoom),
    249249        Trunc(StartViewPoint.Y + (StartMousePoint.Y - Y) / View.Zoom),

  • trunk/Packages/FastGraphics/FastGraphics.lpk

    r26 r40  
    1111      <SearchPaths>
    1212        <OtherUnitFiles Value="ColorFormats"/>
    13         <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)\"/>
     13        <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
    1414      </SearchPaths>
    1515      <Parsing>
    … …  
    3232    <License Value="CC0"/>
    3333    <Version Minor="1"/>
    34     <Files Count="10">
     34    <Files Count="11">
    3535      <Item1>
    3636        <Filename Value="UFGraphics.pas"/>
    … …  
    7474        <UnitName Value="UColorRGBA8"/>
    7575      </Item10>
     76      <Item11>
     77        <Filename Value="ColorFormats\UColorRGB16.pas"/>
     78        <UnitName Value="UColorRGB16"/>
     79      </Item11>
    7680    </Files>
    7781    <RequiredPkgs Count="2">

  • trunk/Packages/FastGraphics/FastGraphics.pas

    r26 r40  
    55unit FastGraphics;
    66
     7{$warn 5023 off : no warning about unused units}
    78interface
    89
    … …  
    1011  UFGraphics, UGGraphics, UPixmapSpecialized, UColorGray1, UColorGray2,
    1112  UColorGray4, UColorGray8, UColorRGB8, UColorRGB565, UColorRGBA8,
    12   LazarusPackageIntf;
     13  UColorRGB16, LazarusPackageIntf;
    1314
    1415implementation

  • trunk/Packages/FastGraphics/UFGraphics.pas

    r39 r40  
    207207uses
    208208  UColorGray1, UColorGray2,UColorGray4, UColorGray8, UColorRGB8, UColorRGBA8,
    209   UColorRGB565;
     209  UColorRGB565, UColorRGB16;
    210210
    211211procedure Register;
    … …  
    633633  RegisterFormat(TColorFormatRGBA8);
    634634  RegisterFormat(TColorFormatRGB565);
     635  RegisterFormat(TColorFormatRGB16);
    635636end;
    636637

  • trunk/UCore.lfm

    r37 r40  
    44  OldCreateOrder = False
    55  Height = 614
    6   HorizontalOffset = 799
    7   VerticalOffset = 416
     6  HorizontalOffset = 253
     7  VerticalOffset = 184
    88  Width = 1071
    99  PPI = 120
Note: See TracChangeset for help on using the changeset viewer.