I had to forget a small modification at the time of my last sends. I put properties WIDTH and HEIGHT in Published.

thanks

? .directory
? ~lazarus27022003.diff
? tools/updatepofiles
Index: lcl/controls.pp
=================================================================== RCS file: /FPC/CVS/projects/lazarus/lcl/controls.pp,v retrieving revision 1.102
diff -u -r1.102 controls.pp
--- lcl/controls.pp 26 Feb 2003 12:44:52 -0000 1.102 +++ lcl/controls.pp 27 Feb 2003 09:37:18 -0000
@@ -973,9 +973,9 @@
{ TImageList }

   TImageList = class(TDragImageList)
-//  published
-//  Property Height;
-//  Property Width;
+  published
+    Property Height;
+    Property Width;
 //    property Count : Integer read FCount;
   end;

Le Jeudi 27 F�vrier 2003 10:52, Mattias Gaertner a �crit :

it is for acces with the protected methods ReadData and WriteData of TBitMap. On Delphi, I make a simple transtipage but there that does not function

Type
  THackBitMap=Class(TBitMap);

and in code i use
THackBitMap(Bmp).ReadData() ... very simple no ?

Olivier