pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

* Change from lazarus resources to native resources / fix checkimage painting / use pascal packarray in carbon / update demos

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4671 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
blikblum
2016-05-28 17:45:09 +00:00
parent 40e70b8c3e
commit 734a8fd99c
61 changed files with 869 additions and 672 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
components/virtualtreeview-new/trunk/demos/advanced/HeaderCustomDrawDemo.pas
View File

@ -11,7 +11,7 @@ interface
uses
LCLIntf, VTGraphics, Types, SysUtils, Classes, Graphics, Controls, Forms,
Dialogs, VirtualTrees, StdCtrls, ExtCtrls, LResources, LCLType, LCLProc;
Dialogs, VirtualTrees, StdCtrls, ExtCtrls, LCLType, LCLProc;
type
THeaderOwnerDrawForm = class(TForm)
@ -52,6 +52,8 @@ var
implementation
{$R *.lfm}
uses
States, LclExt;
@ -241,7 +243,7 @@ begin
//FBackBitmap2.PixelFormat := OptimalPixelFormat;
CreateCheckerBackground;
FHeaderBitmap := TBitmap.Create;
FHeaderBitmap.LoadFromLazarusResource('Transcriptions');
FHeaderBitmap.LoadFromResourceName(HINSTANCE, 'Transcriptions');
end;
//----------------------------------------------------------------------------------------------------------------------
@ -305,8 +307,5 @@ end;
//----------------------------------------------------------------------------------------------------------------------
initialization
{$i HeaderCustomDrawDemo.lrs}
{$i bitmap.lrs}
end.