Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.11.24;
Скачать: [xml.tar.bz2];

Вниз

Image и TMemoryStream   Найти похожие ветки 

 
killer   (2003-11-12 14:22) [0]

Как мне в Image вставить картинку, которая находится в потоке TMemoryStream? Для "BMP" у меня получается, делаю я так:
var
f:TMemoryStream;
................
Image1.Picture.Bitmap.LoadFromStream(f);

А как мне сделать например для "JPG"? Так же делаю, выдает ошибку. Пишу:var
f:TMemoryStream;
................
ProImage1.Picture.Graphic.LoadFromStream(f);
Тоже выдает ошибку...
Кстати я в uses jpeg прописал... Незнаю что делать... Что я не так делаю?


 
Silver Alex   (2003-11-12 14:33) [1]

а ну попробуй
f.Seek(0,0);
а потом Image1.Picture.Bitmap.LoadFromStream(f);


 
killer   (2003-11-12 14:35) [2]

Не работает всеравно с JPG... :(((


 
Silver Alex   (2003-11-12 14:36) [3]

а вообще-то я так делаю

var
I,Y : integer;
BMPStream : TMemoryStream;
JBMP : TJPEGImage;
begin
BMPStream:=TMemoryStream.Create;
JBMP:=TJPEGImage.Create;
.....
If BMPStream.Size>0 then
begin
BMPStream.Seek(0,0);
JBMP.LoadFromStream(BMPStream);
BMPImage.Picture.Assign(JBMP);
end else BMPImage.Picture.Assign(nil);
finally
BMPStream.Free;
JBMP.Free;
end;

попробуй



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.11.24;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.01 c
1-78898
Extazio
2003-11-12 20:47
2003.11.24
Как динамически создать кнопку на тулбаре?


1-78932
OlegL
2003-11-12 10:45
2003.11.24
Ресурс в .exe


3-78761
Aleksandr
2003-11-03 11:59
2003.11.24
Как бороться с открытой сессией Парадокса?


1-79033
Тимохов
2003-11-13 13:04
2003.11.24
Как сделать аналог packed record только для классов.


3-78861
eds
2003-11-03 13:11
2003.11.24
Процедура резервного копирования Firebird





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский