BitmapOrder example for Delphi

if ( LeadImage.BitmapOrder = ORDER_RGB ) then
   label1.Caption := ' The Bitmap With RGB Order ' ;