Вверх ↑
Этот топик читают: Гость
Ответов: 1924
Рейтинг: 172
#16: 2018-10-25 22:21:49 ЛС | профиль | цитата
25.10.2018 компонент обновлён на SVN, так что теперь берите только оттуда.
http://svn.hiasm.com/packs/delphi/conf/Jpeg.ini
http://svn.hiasm.com/packs/delphi/code/Exif.pas
http://svn.hiasm.com/packs/delphi/code/hiJpeg.pas
Пример

Редактировалось 2 раз(а), последний 2018-10-25 22:36:48
карма: 9
0
Ответов: 1535
Рейтинг: 176
#17: 2018-10-27 17:33:17 ЛС | профиль | цитата
3042, комментарии в коде - кракозябры.
карма: 1
Не так страшна ошибка, как опасность её не заметить.

0
Ответов: 16884
Рейтинг: 1239
#18: 2018-10-27 18:17:06 ЛС | профиль | цитата
ser_davkin писал(а):
комментарии в коде - кракозябры.
Это не главное.
Главное реклама писал(а):
большое обновление (71 свойство, схема, видео)

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26061
Рейтинг: 2120
#19: 2018-10-27 19:09:41 ЛС | профиль | цитата
ser_davkin писал(а):
комментарии в коде - кракозябры.

Где конкретно, номер строки скажи
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#20: 2018-10-27 19:28:20 ЛС | профиль | цитата
Это вроде первый
procedure THIJpeg._var_idStandardOutputSensitivity;
begin
dtReal(_Data,exif.StandardOutputSensitivity);
//По стандарту LongWord, но в hiasm оно приводится к integer, а нужно без знака
end;

и дальше

Редактировалось 1 раз(а), последний 2018-10-27 19:36:26
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26061
Рейтинг: 2120
#21: 2018-10-27 22:01:59 ЛС | профиль | цитата
Tad писал(а):
_var_idStandardOutputSensitivity

В копии SVN у меня на диске нормально

procedure THIJpeg._var_idStandardOutputSensitivity;
begin
dtReal(_Data,exif.StandardOutputSensitivity);
//По стандарту LongWord, но в hiasm оно приводится к integer, а нужно без знака
end;
Может проблема возникла при передаче новой черепахой. А вы не браузерм смотрите, случаем?
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#22: 2018-10-28 07:34:57 ЛС | профиль | цитата
А вот так оно смотрится прямо на SVN (http://svn.hiasm.com/packs/delphi/code/hiJpeg.pas)
Просмотрщик пишет ASCII Кодировка DOS
procedure THIJpeg._var_idStandardOutputSensitivity;
begin
dtReal(_Data,exif.StandardOutputSensitivity);
//По стандарту LongWord, но в hiasm оно приводится к integer, а нужно без знака
end;
А это комментарии из Share
unit Share;

// ************************************************
// Общие данные, ф-ции и классы для компонент HiAsm

Редактировалось 1 раз(а), последний 2018-10-28 07:41:08
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 1535
Рейтинг: 176
#23: 2018-10-28 09:59:23 ЛС | профиль | цитата
nesco писал(а):
Где конкретно, номер строки скажи

Похоже, сама среда hiasm неверно отображает кириллицу. (v4.05 build 186) В любых других редакторах текста отображается без проблем (блокнот, Notepad++, Sublime Text)

Редактировалось 1 раз(а), последний 2018-10-28 09:59:39
карма: 1
Не так страшна ошибка, как опасность её не заметить.

0
Ответов: 16884
Рейтинг: 1239
#24: 2018-10-28 10:40:58 ЛС | профиль | цитата
ser_davkin писал(а):
В любых других редакторах текста отображается без проблем (блокнот
Блокнот

Редактировалось 2 раз(а), последний 2018-10-28 10:42:24
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 9906
Рейтинг: 351
#25: 2018-10-28 11:30:49 ЛС | профиль | цитата
Подтверждаю.
Скачанное (без привнесенного интеллекта) с SVN -- это UTF-8
У меня FAR тоже типа правильно показал (и сказал про кодировку - 65001), но это не отменяет проблему.

А Tad показал две картинки того же: в кодировке 866 (пост #20) и 1251 (посты #22 и #24)
Tad писал(а):
Просмотрщик пишет ASCII Кодировка DOS

Нехай клевещут

Редактировалось 3 раз(а), последний 2018-10-28 13:19:39
карма: 9

0
Разработчик
Ответов: 26061
Рейтинг: 2120
#26: 2018-10-28 12:19:34 ЛС | профиль | цитата
Я так понял, что Автор правил файл pas в блокноте или еще где и сохранил его в UTF-8. Блокнот показал, что оригинальный файл действительно UTF-8, но HiAsm4 не сохраняет в UTF-8. Надо будет пересохранить в ANSI.

Редактировалось 1 раз(а), последний 2018-10-28 12:20:51
карма: 22

0
Ответов: 1924
Рейтинг: 172
#27: 2018-10-28 21:33:47 ЛС | профиль | цитата
Правил в n++, видимо, недоглядел смену кодировки.
Exif.pas-то в ANSI, а вот hiJpeg в юнике оказался.
карма: 9
0
Разработчик
Ответов: 26061
Рейтинг: 2120
#28: 2018-10-29 13:43:25 ЛС | профиль | цитата
Пофиксил кодировку на SVN.
карма: 22

0
28
Сообщение
...
Прикрепленные файлы
(файлы не залиты)