چرا فایل تصویری غیر پسوند BMP وارد جدول های DBISAM نمیشود

[ALIreza_nil]

با سلام

من می خواهم تصویر فایلهای
jpg
را به داخل جدول
DBISAM
ببرم نمیشه چرا حتی در جدول های
paradox
هم نمیشه

دلیل
و راه حل را اگه امکان داره بگید
:roll:

[مهدی کرامتی]

اینجا را ببینید: http://www.barnamenevis.org/forum/viewtopic.php?t=14058

[Delphi-Clinic]

برای تبدیل به فرمت BMP از این تابع استفاده کن:


Function Jpeg2Bitmap(JPEGFile : String) : TBitmap;
var
oJPEG : TJPEGImage;
aFormat : Word;
aData : THandle;
aPalette : HPALETTE;
begin
oJPEG := TJPEGImage.Create ;
oJPEG.LoadFromFile(JPEGFile);
oJPEG.SaveToClipboardFormat(aFormat,aData,aPalette );
oJPEG.Free;

Result := TBitmap.Create;
Result.LoadFromClipboardFormat(aFormat,aData,aPale tte);
end;

وبرعکس:


var
aJPEGImage : TJPEGImage;
aPicture : TPicture;


aPicture := TPicture.Create;
aJPEGImage := TJPEGImage.Create;
try
aPicture.Bitmap.Assign(Query.FieldByName(Fieldname ));
aJPEGImage.Assign(aPicture.Graphic);
aJPEGImage.SaveToFile('filename.jpg');
finally
aPicture.Free;
aJPEGImage.Free;
end