Android97
@Android97
Бэкенд и немного фронтенд разработчик

Как вывести картинку формата tiff в Delphi?

062a0d1330694a3eab594c1b6c73d791.jpg

Нужно вывести картинку и накладывать текст по координатам.
координаты указаны так
X Y
61,2289 15,32567
56,36088 19,72337

Каким компонентом мне воспользоваться ? Или как реализовать задуманное ?
Пробовал умножать координаты на число, но размеры картинок разные и числа всегда меняются.
Delphi берет только целые числа.
Рисовал на канве TImage, это очень маленькие числа для рисования на канве.
Размеры картинок от 2000 до 6000
  • Вопрос задан
  • 2677 просмотров
Решения вопроса 1
@OvLab
Может координаты в процентах и надо умножать их на соответствующий размер картинки по горизонтали и вертикали и делить на 100?
Ответ написан
Комментировать
Пригласить эксперта
Ответы на вопрос 2
@Mercury13
Программист на «си с крестами» и не только
Не знаю пока, кто поддерживает TIFF (я бы поискал, а если не нашёл — сам бы наладил формат в достаточной для нашей недо-САПР мере). В FreeImage, говорят, есть обёртка для Delphi.

Поскольку у вас чертежи, видимо, надо уменьшать картинки по методу Блэкмена или Ланцоша, оно есть в Graphics32.

Второе. Надо понять, что означают эти дробные числа. Очень непохоже, что это координаты в пикселях. А не в пикселях — так в чём? Может, в линейных единицах — тогда из TIFF надо извлечь его DPI. (Да, кто-то утверждает, что координаты в процентах.)

И ВНИМАНИЕ!
X Y
61,2289 15,32567
56,36088 19,72337
Налаживая считывание нашего текстового файла, сделайте, чтобы считывание было локаленезависимым. То есть: поставьте в настройках языка вместо десятичной запятой точку — и не должно слетать!
Ответ написан
Комментировать
toxicdream
@toxicdream
Дружелюбный и доверчивый социопат
Из-за своей лени и перфекционизма, я бы прилепил сбоку ImageMagick.
Ответ написан
Комментировать
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Войти через центр авторизации
Похожие вопросы