[delphi] Rozmiar obrazka

Jak wyciągnąc z jakiegoś pliku graficznego (bmp,jpg) rozmiar obrazka??

var
  B: TBitmap;
  x, y: integer;
begin
  B := TBitmap.Create;
  B.LoadFromFile('sciezka do pliku');
  x := B.Width;
  y := B.Height;
  B.Free;

w x i y masz rozmair obrazka co za problem?

to co podales zadziala chyba tylko na bitmapie.
z jpg nie pojdzie.
powino byc raczej:

var Pict:TPicture;
    x,y:Integer;
begin
  Pict := TPicture.Create;
  Pict.LoadFromFile('panzer46.jpg');
  x := Pict.Width;
  y := Pict.Height;
  Pict.Free;
end;

a jesli zamierzasz uzywac jpg to musi jeszcze byc:

uses JPEG;