Size: a a a

2020 March 26

AK

Alexey Kulakov in Delphi & Lazarus
хм, кстати, интересная идея... может, действительно, сменить кодировку консоли? например, на UTF8
источник

TC

Tom Cauf in Delphi & Lazarus
Геннадий Малинин
Изменить кодировку скрипта
Блин, я про программы, написанные в лазарусе
источник

AK

Alexey Kulakov in Delphi & Lazarus
тебе и сказали
источник

AK

Alexey Kulakov in Delphi & Lazarus
я вот только что, например, в командной строке ввёл chcp 65001
источник

AK

Alexey Kulakov in Delphi & Lazarus
и потом программа в кодировке УТФ8 вывела текст на русском
источник

ГМ

Геннадий Малинин in Delphi & Lazarus
Tom Cauf
Блин, я про программы, написанные в лазарусе
А там проблема с кодировкой?
источник

TC

Tom Cauf in Delphi & Lazarus
Alexey Kulakov
я вот только что, например, в командной строке ввёл chcp 65001
А, теперь вспомнил о чем речь
источник

AK

Alexey Kulakov in Delphi & Lazarus
ну, а если не хочешь менять, надо будет в программе пропускать текст через конверсию, типа UTF8ToSys (но это для 1251 кодировки)
источник

ГМ

Геннадий Малинин in Delphi & Lazarus
Tom Cauf
Блин, я про программы, написанные в лазарусе
Тогда погугли команды для консоли для паскаля
источник

TC

Tom Cauf in Delphi & Lazarus
Делал уже такое под бидон
источник

ГМ

Геннадий Малинин in Delphi & Lazarus
Tom Cauf
А, теперь вспомнил о чем речь
Например SetConsoleOutputCP(1251);
источник

AK

Alexey Kulakov in Delphi & Lazarus
Tom Cauf
Народ, привет. Я сейчас задам наверное самый частый вопрос новичка: А как в венде кирилицу выводить в консоль?

😁
// converts UTF8 string to console encoding (used by Write, WriteLn)
function UTF8ToConsole(const s: string): string; {$IFDEF UTF8_RTL}inline;{$ENDIF}
источник

AK

Alexey Kulakov in Delphi & Lazarus
в lazutf8.pas файлике (lazutils пакет)
источник

AK

Alexey Kulakov in Delphi & Lazarus
вариантов много, короче
источник

AK

Alexey Kulakov in Delphi & Lazarus
только надо помнить, что в 2.0.6 лазаре, вроде, идёт 1251 (АНСИ) кодировка текста по-умолчанию, а в транке УТФ8
источник

TC

Tom Cauf in Delphi & Lazarus
Alexey Kulakov
// converts UTF8 string to console encoding (used by Write, WriteLn)
function UTF8ToConsole(const s: string): string; {$IFDEF UTF8_RTL}inline;{$ENDIF}
Если это из FileUtil, то у меня пишет, что не найдено

А теперь вижу, что это lazutil
источник

AK

Alexey Kulakov in Delphi & Lazarus
это в папке лазаря, components\lazutils\lazutf8.pas
источник

VA

Viktor Akselrod in Delphi & Lazarus
есть еще тормоза, кроме меня, которые не знали, что в vcl есть альтернативный классическим TJpegImage и тп MS-вский энкодер/декодер всех популярных графических форматов, включая tiff? 🙂

причем скорость просто поражает
загрузка и копирование jpeg файла в битмап
TJpegImage 940ms
TWICImage 70ms
источник

GB

George Bakhtadze in Delphi & Lazarus
Viktor Akselrod
есть еще тормоза, кроме меня, которые не знали, что в vcl есть альтернативный классическим TJpegImage и тп MS-вский энкодер/декодер всех популярных графических форматов, включая tiff? 🙂

причем скорость просто поражает
загрузка и копирование jpeg файла в битмап
TJpegImage 940ms
TWICImage 70ms
видимо есть. а что за жпг который аж секунду грузится?
источник

VA

Viktor Akselrod in Delphi & Lazarus
George Bakhtadze
видимо есть. а что за жпг который аж секунду грузится?
в моем случае это 2х1.5К точек
~450КБ вес
источник