Draws status image.
procedure DrawStatus(Canvas: TCanvas; const R: TRect);
IPropertyStatusImage Methods