Delphi - comprobar el tamaño de una imagen....

Alguien de ustedes sabe como puedo comprobar el tamaño de una imagen antes de cargarla a componente Image......????

...lo que quiero hacer es poner un boton 'Examinar' para cambiar la imagen del componente, pero si la imagen no cumple con el tamaño que yo deseo, que no la cargue....agradeceria su ayuda....

var
BitMap:TBitMap;
JPG:TJPegImage;
Ancho,Alto:Integer;
begin
try
//creamos un bitmap temporal para acojer la imagen
BitMap:=TBitMap.Create;
//Cargamos la imagen en el BM temporal. Mira los métodos loadfromstream si la tienes en este formatyo etc.
BitMap.Loadfromfile(fichero);
Ancho:=BitMap.Width;
Alto:=BitMap.Heigth;
If (alto=33) and (ancho=44) then
Image1.Picture.Bitmap.Assign(BitMap);
finally
BitMap.Free;
end;
end

oye....gracias..me sirvio.....