Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.67/9: Рейтинг темы: голосов - 9, средняя оценка - 4.67
0 / 0 / 1
Регистрация: 16.03.2015
Сообщений: 46

Отобразить JPEG из буфера

04.05.2015, 23:54. Показов 2345. Ответов 27
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Если из файла, то получается так:

Delphi
1
2
3
4
pic := TbitMap.Сreate;
jpg := TJpegImage.Create;
jpg.LoadFromFile ('pic.jpg');
pic.Assign(jpg);
А если jpeg в памяти лежит, то как?
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
04.05.2015, 23:54
Ответы с готовыми решениями:

Загрузка картинки в Jpeg - затем из буфера в DBImage
Добрый вечер! Подскажите, пожалуйста... Перекопал очень много источников, не нашел в чем причина: Необходимо записать картинку в базу...

Resize JPEG, BMP, GIF, PNG --> JPEG
Доброго дня! Стала задача сделать ресайзер. Требования: картинка по соотношению вес/качество должна примерно соответствовать...

Создать папку с именем из буфера и копировать файлы используя инфу буфера как маску
Может пригодится ... :coffee: 1) Создаст папку (по вашему пути) имя папки будет взято из буфера обмена. 2) Откроет папку (созданную)...

27
 Аватар для VladWH
243 / 193 / 94
Регистрация: 01.05.2015
Сообщений: 732
05.05.2015, 02:21
Студворк — интернет-сервис помощи студентам
Цитата Сообщение от провинцыалекс Посмотреть сообщение
что нужно написать ПЕРЕД jpg.LoadFromStream()
Вот пример из справки Delphi

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure TForm1.Button1Click(Sender: TObject);
 
var
  TempStream : TMemoryStream;
begin
  TempStream := TMemoryStream.Create;
 
  ListBox1.Items.SaveToStream(TempStream);  // write list box contents to the 
                                            // stream
  TempStream.Position := 0;      // reset to the beginning of the stream
  Memo1.Lines.LoadFromStream( TempStream);  // load stream contents into memo
                                            // control
 
  TempStream.Free;
end;
Тоже самое при сохранении/загрузке в jpg
0
пофигист широкого профиля
4770 / 3206 / 862
Регистрация: 15.07.2013
Сообщений: 18,613
05.05.2015, 02:32
Цитата Сообщение от провинцыалекс Посмотреть сообщение
Пока я с ним работал на С, там понятное дело получаешь указатель на буфер да и всё.
Т.е. ты хочешь чтобы тебе написали такую же понятную процедуру, но на Дельфи?
Раз плюнуть. Но сначала разберись с этим "драйвером" и дай всю информацию по нему.
0
0 / 0 / 1
Регистрация: 16.03.2015
Сообщений: 46
05.05.2015, 02:50  [ТС]
Цитата Сообщение от VladWH Посмотреть сообщение
Вот пример из справки Delphi
Спасибо, кое-что получилось:
Delphi
1
2
3
4
stm := TMemoryStream.Create;
stm.LoadFromFile (JPGNAME);
jpg.LoadFromStream (stm);
pic.Assign(jpg);
Осталось как-то получить такой поток от драйвера.
0
 Аватар для VladWH
243 / 193 / 94
Регистрация: 01.05.2015
Сообщений: 732
05.05.2015, 02:59
good )

Цитата Сообщение от провинцыалекс Посмотреть сообщение
Осталось как-то получить такой поток от драйвера
А этого мы от тебя уже третий час добиться не можем...

Цитата Сообщение от northener Посмотреть сообщение
с этим "драйвером" и дай всю информацию по нему
0
пофигист широкого профиля
4770 / 3206 / 862
Регистрация: 15.07.2013
Сообщений: 18,613
05.05.2015, 03:03
Цитата Сообщение от провинцыалекс Посмотреть сообщение
Осталось как-то получить такой поток от драйвера.
"Такой" поток от "драйвера" ты не получишь не разобравшись с тем "драйвером".
И вот в этой твоей способности, я лично сомневаюсь. Так же как и в твоём знании языка Си.
0
0 / 0 / 1
Регистрация: 16.03.2015
Сообщений: 46
05.05.2015, 03:04  [ТС]
Цитата Сообщение от northener Посмотреть сообщение
И вот в этой твоей способности, я лично сомневаюсь. Так же как и в твоём знании языка Си.
Мне глубоко по барабану, в чём ты сомневаешься.
0
пофигист широкого профиля
4770 / 3206 / 862
Регистрация: 15.07.2013
Сообщений: 18,613
05.05.2015, 03:13
Цитата Сообщение от провинцыалекс Посмотреть сообщение
Мне глубоко по барабану, в чём ты сомневаешься
Взаимно. Мне глубоко по барабану твои проблемы. Так что я ухожу из этой темы. Мне-то это нафиг не нужно.
Бодайся сам, пока не уволят/отчислят.
0
0 / 0 / 1
Регистрация: 16.03.2015
Сообщений: 46
05.05.2015, 03:17  [ТС]
Цитата Сообщение от northener Посмотреть сообщение
Так что я ухожу из этой темы.
Давно пора :-)))))
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
05.05.2015, 03:17

JPEG->MemoryStream = 120тиков а JPEG->Image1 и Image1->MemoryStream = 30тиков?
Добрый вечер. Впринципе название темы все объясняет. Ради любопытства думал что может по умолчанию размер JPEGa не задан и он кроме рисунка...

Сжатие JPEG
Здравствуйте...я запрограммировала на языке си программу сжатия JPEG.....все вроде бы нормально работает, НО....изображение, с которым я...

Jpeg-ico
Нужно переделать данную картинку из .Jpeg--в--.ico

JPEG error #53
здравствуйте. вылетает ошибка JPEG error #53 , как я понял из за того что подгружается "неправильный" Jpeg файл а можно...

AVI from JPEG
Здравствуйте, подскажите куда копать что бы из картинок(джепег) сделать ави файл может есть туториалы? или библиотеки?


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
28
Ответ Создать тему
Новые блоги и статьи
Термопринтер QR701
Argus19 03.08.2026
Термопринтер QR701 Купил два термопринтера QR701. На сэлф-тесте написано: Language: PC936 (GB18030). Что означает, что принтеры могут печатать только латиницу и китайские иероглифы. Так же. . .
Создание формы заимствованного документа
Maks 03.08.2026
Задача: Необходимо создать собственную форму заимствованного документа. На форме должен быть реквизит "Покупатель", а также табличная часть со следующими реквизитами: - Расчетный счет покупателя. . .
Задача предоставления скидок покупателям
Maks 03.08.2026
Задача: В документе "Продажи" необходимо реализовать функционал предоставления скидок покупателям. Скидка должна автоматически рассчитываться и подставляться в соответствующее поле при выборе. . .
Почему SEO не начинается с ключевых слов: что проверить до написания текстов
Neotwalker 01.08.2026
Когда владельцу сайта предлагают заняться SEO, первым шагом часто становится сбор запросов и написание текстов. Логика кажется понятной: 1. Находим ключевые слова. 2. Добавляем их на. . .
Знание — сила: Доктрина интенциональности знаний, углубление в формулу
Hrethgir 01.08.2026
https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11957&stc=1&d=1785567302 Знаменитый афоризм Фрэнсиса Бэкона «Знание — сила» (Scientia potentia est) в массовой культуре принято понимать. . .
SUNO Ai - Река Без Дна
zorxor 31.07.2026
Автор стихотворения - астрофизик Марина Катыс Ссылка на сгенерированную музыкальную композицию: https:/ / suno. com/ song/ 6f6e5464-b290-4650-be6c-44c85f8d8013 Я говорю, что Время- как вода течет. . .
Из невошедшего на форум (диалог с ИИ-гугла)
zorxor 29.07.2026
А вот, что интересно, сказал мне ИИ-гугла: Этот текст — эмоциональный пост пользователя под ником zorxor на интернет-форуме (вероятно, посвященном мистике, непознанному или альтернативной науке). . . .
Был праздник вчера, а я и не знал.
kumehtar 28.07.2026
27. 07. 2026г. Intel Core 2 Duo исполнилось 20 лет Салют, шампанское, овации! :drink:
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru