Форум: "Основная";
Текущий архив: 2005.01.16;
Скачать: [xml.tar.bz2];
Внизkak sohranit jpg kartinku v bazu dannih ?? Найти похожие ветки
← →
NEED_Help (2004-12-26 17:18) [0]U menja takoj vopros: kak mozhno sohranit" jpg kartinku v bazu dannih (friends.bd), u menja polu4aetsja sohranit" tol"ko kartinki s rasshirenie bmp =(( 4to mne delat" ... HELP =) Esli mozhite podskazhite pozhalujsta.
Spomoshju etih komand ja vivodila v DBImage1 kartinku s rosshireniem bmp :
procedure TfEdit.butLoadClick(Sender: TObject);
begin
if OpenPictureDialog.execute then begin
DMFriends.tFriendsPhoto.LoadFromFile(OpenPictureDialog.FileName);
DMFriends.tFriends.Post;
end;
end;
O4en" nadejus" na vashu pomosh =)))
← →
ferr © (2004-12-26 17:27) [1]BLOB
← →
PZ (2004-12-26 17:33) [2]Преобразуйте jpg-картинки в bmp-формат с помощью редактора Paint
← →
NEED_Help (2004-12-26 17:35) [3]=( Kak rabotat" s BLOB? Pomogite, please....
← →
NEED_Help (2004-12-26 17:38) [4]ЫЫЫЫЫЫЫЫЫ.... =))) s preobrozovaniem nepolu4itsja.. tak kak eto budet addresnaja knizhka, i pol"zovatelju etu proceduru kazhdij raz javno nezajho4itsja vipolnjat". ... =((
← →
aus (2004-12-26 18:10) [5]Поиск. Вопрос часто задавался.
← →
Shnabs (2004-12-26 22:05) [6]Пробовал преобразовывать из bmp в jpg.
procedure TForm1.Button1Click(Sender: TObject);
var
JPEG: TJPEGImage;
Bitmap: TBitmap;
begin
JPEG := TJPEGImage.Create;
Bitmap := TBitmap.Create;
try
Bitmap.LoadFromFile("C:\Program Files\Common Files\alarm.bmp");
JPEG.Assign(Bitmap);
Image1.Picture.Assign(JPEG);
finally
JPEG.Free;
Bitmap.Free;
end;
end;
← →
NEED_Help (2004-12-27 22:20) [7]OGROMNOE SPASIBO!!! =))) VSE POLU4ILOS" =))))
← →
Bork (2004-12-27 22:33) [8]
> Преобразуйте jpg-картинки в bmp-формат с помощью редактора
> Paintfunction JPEGtoBMP(Quality:integer;jpeg:tjpegimage):tbitmap;
var
bmp: TBitmap;
begin
try
if quality>100 then quality :=100;
if quality<1 then quality:=1;
jpeg.CompressionQuality := quality;
bmp := TBitmap.Create;
try
bmp.Assign(jpeg);
result:=bmp;
finally
bmp.Free
end;
finally
jpeg.Free
end;
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2005.01.16;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.035 c