ExtractFilePath UNICODE?

Вопросы программирования на Free Pascal, использования компилятора и утилит.

Модератор: Модераторы

Аватара пользователя
McLion
постоялец
Сообщения: 332
Зарегистрирован: 06.02.2015 17:41:00

Сообщение McLion »

ssadragon писал(а):А если поставить {$mode objfpc}{$H+}
И нет ли у вас -dEnableUTF8RTL и/или -FcUTF8 ?


Не мне нужно delphi!
-dEnableUTF8RTL и/или -FcUTF8? Где это можно поставить?
ssadragon
постоялец
Сообщения: 148
Зарегистрирован: 03.12.2012 20:21:35

Сообщение ssadragon »

McLion
У меня стоит {$mode objfpc}.
McLion писал(а):-dEnableUTF8RTL и/или -FcUTF8? Где это можно поставить?

Эти у меня не стоят, но их можно включить в Проект->Параметры проекта->Параметры компилятора->И там будет кнопка "Задать UTF-8 в RTL"
P.S. У меня Лазарь из транка. FPC 2.6.4
slyubez
постоялец
Сообщения: 186
Зарегистрирован: 31.03.2015 07:44:07

Сообщение slyubez »

Вообще не работает, одни ????? кругом!

Что-то мне подсказывает, что функции SysToUTF8 и UTF8ToSys подразумевают, что родная кодировка для Windows - UTF16, а классы для INI работают только с ANSI и только под винду. Попробуй сформируй корректную строку в UTF8, преобразуй ее с помощью UTF8ToANSI и скорми функции. Само собой, про работу в Linux придется забыть.
Аватара пользователя
McLion
постоялец
Сообщения: 332
Зарегистрирован: 06.02.2015 17:41:00

Сообщение McLion »

ssadragon писал(а):McLion
У меня стоит {$mode objfpc}.
McLion писал(а):-dEnableUTF8RTL и/или -FcUTF8? Где это можно поставить?

Эти у меня не стоят, но их можно включить в Проект->Параметры проекта->Параметры компилятора->И там будет кнопка "Задать UTF-8 в RTL"
P.S. У меня Лазарь из транка. FPC 2.6.4



Не мог бы мне скриншот прислать это настройки?
alex208210
постоялец
Сообщения: 207
Зарегистрирован: 12.05.2010 13:16:51

Сообщение alex208210 »

ExtractShortPathNameUTF8 ( Const FileName : String ) : string ;
Аватара пользователя
McLion
постоялец
Сообщения: 332
Зарегистрирован: 06.02.2015 17:41:00

Сообщение McLion »

alex208210 писал(а):ExtractShortPathNameUTF8 ( Const FileName : String ) : string ;


Вау... пошло! Супер! Огромное спасибо всем!
Ответить