يه كامپوننت Image ميخوام كه ....

در زمان اجرا فايلهاي عكس با پسوند GIF , JPG , TTF رو بخونه و يا نمايش بده
ولي اون jpg , gif برام خيلي مهمه
كامپوننت image معمولي در زمان اجرا روي يه فايل با پسوند gif و يا jpg كليك ميكنم پيغام Unknown file extension(.jpg) رو ميده

سلام

برای JPG توی uses برنامه ات JPEG رو اضافه کن..

برای GIF هم کمپننت هایی معرفی شده که باید بگردی....

کامپوننت هاي TMS، خصوصا AdvancedPicture مشکلت رو حل مي کنه

شما از کامپوننت Imageen استفتذه کن.
تو همین فروم هست فقط کافی سرچ کنی

کد:

---

easily load all kind of images (Gif, Ico, Jpeg and more) in a TImage



uses axCtrls
  ...procedure TForm1.Button1Click(Sender: TObject);
var
 OleGraphic: TOleGraphic;
 fs: TFileStream;
begin
 try
  OleGraphic := TOleGraphic.Create;
  fs    := TFileStream.Create('C:\...\test.gif', fmOpenRead or fmSharedenyNone);
  OleGraphic.LoadFromStream(fs);
  SampleImage.Picture.Assign(OleGraphic);
 finally
  fs.Free;
  OleGraphic.Free
 end;
end;

---