Перейти к содержанию
  • Регистрация

Поиск сообщества

Показаны результаты для тегов 'TBitmapSurface'.

  • Поиск по тегам

    Введите теги через запятую.
  • Поиск по автору

Тип контента


Форумы

  • Общие вопросы
    • Анимация
    • Графика
    • Стили
    • Базы данных и REST
    • Компоненты
    • Положение, размеры, выравнивание
    • Работа с текстом
    • Приложение и формы
    • Отладка
    • Развертывание приложений
    • Вопросы по языку Object Pascal и RTL
    • Общая информация о TControl
    • События
    • Прочие вопросы
  • Вопросы по платформам
  • Вопросы по использованию RAD Studio
  • Native FGX
  • Обучение
  • Поиск специалистов по FireMonkey
  • Дополнительные ресурсы по FireMonkey
  • Организация работы данного форума
  • Видеокурсы

Поиск результатов в...

Поиск контента, содержащего...


Дата создания

  • Начало

    Конец


Дата обновления

  • Начало

    Конец


Фильтр по количеству...

Регистрация

  • Начало

    Конец


Группа


AIM


MSN


Сайт


ICQ


Yahoo


Jabber


Skype


StackOverflow


Защита от ботов


Город


Интересы

Найдено: 2 результата

  1. Здравствуйте. Хочу загнать карту в приложение. Т.е. сделать ПринтСрин нескольких участков, слить их в одно изображение в фотошопе, а потом иметь возможность просматривать на смартфоне под android. Что бы можно было пальцами приблизить, подвигать карту. Какой компонет посоветуете?
  2. Как изменить качество (Quality) изображения? Написал такую функцию, но она не работает procedure ChangeQuality( SrcBitmap: TBitmap; var DstBitmap: TBitmap; AQuality: Integer ); var Stream: TStream; Surface: TBitmapSurface; SaveParam: TBitmapCodecSaveParams; begin if Assigned( DstBitmap ) then begin //DstBitmap.SetSize( SrcBitmap.Width, SrcBitmap.Height ); Stream := TMemoryStream.Create; Surface := TBitmapSurface.Create; try Surface.Assign( SrcBitmap ); SaveParam.Quality := AQuality; // AQuality = 65 TBitmapCodecManager.SaveToStream( Stream, Surface, '.jpg', @SaveParam ); Stream.Position := 0; DstBitmap.LoadFromStream( Stream ); finally Surface.Free; Stream.Free; end; end; end;
×
×
  • Создать...