TImage

[Unique_Maks]

Здравствуйте.
Пытаюсь загрузить в наследника класса Timage картинку *.jpg при его сознании, но выскакивает исключение что неизвестное расширение файла.

PHP код:

     Picture.LoadFromFile('..\..\images\1.jpg'); 


хотя загрузить в режиме конструирования проекта в Timage (родительский класс) файлы с расширением jpg можно, а вот в наследника во время выполнения проги - косяк.

PHP код:

// кусочек
type
  TMy_image = class(TImage)
  private
....
  public
    constructor Create(Owner: TComponent; patc:string); overload;
....
end;

constructor TMy_image.Create(Owner: TComponent; patc:string);
begin
    inherited Create(Owner);
    Parent := my_form; 
    Picture.LoadFromFile(''+patc+''); // так не пашет и не проходит дальше
.....
end;

procedure Tmy_gallery.add1Click(Sender: TObject);
var str:string;
begin
  if(open_pic.Execute)then
  begin
    str := open_pic.FileName;
  end
  else
    exit;
  image_new := TMy_image.Create(image_new, str);
end; 


Подскажите, как правильно реализовать этот момент

IDE Delphi XE2

[Delphi_ProGer]

uses
....Jpeg;

[Unique_Maks]

даж чет и не подумал об этом....)) спасибо)