Kłopot z wypełnieniem bmp prostokąta w win 98

Mam klopot zrobilem program ktory wypełnia bitmapą prostokąt

Form1.Image1.Canvas.Brush.Bitmap:=TBitmap.Create;
Form1.Image1.Canvas.Brush.Bitmap.LoadFromFile(ExtractFilePath(Application.ExeName)+az+a+'.bmp');
Form1.Image1.Canvas.Pen.Color:=clblack;
Form1.Image1.Canvas.Rectangle(x,y,x+4,y+h);

W win xp wszystko jest ok
ale w win98 zamiast bitmapy wyświetla jakieś wzorki

ustaw przed rysowaniem :

Canvas.Brush.Style := bsSolid;
Canvas.Brush.Color := jakiśkolor;