ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Delphi 7 и Unicode
35 сообщений из 35, показаны все 2 страниц
  все  
Delphi 7 и Unicode
    #40051042
bors
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bors
Гость
Появилась необходимость отображения "нестандартных" для среды Delphi 7 символов, а она в упор не видит больше стандартных 255, но их недостаточно, смена шрифтов не помогает, может кто-то знает способ как 'научить' читать что-то новое? Заранее спасибо
...
Рейтинг: 0 / 0
05.03.2021, 13:20
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051045
Мимопроходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Мимопроходящий
Участник
05.03.2021 13:20, bors пишет:
> Появилась необходимость отображения "нестандартных" для среды Delphi 7 символов, а она в упор не видит больше стандартных 255, но их недостаточно, смена шрифтов не помогает, может кто-то знает способ как 'научить' читать что-то новое? Заранее спасибо


TNT Unicode controls for Delphi.

Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
05.03.2021, 13:30
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051060
white_nigger
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
white_nigger
Участник
Если хочешь развиваться - поставь нормальную современную делфи. Есть бесплатные версии
...
Рейтинг: 0 / 0
05.03.2021, 14:02
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051067
bors
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bors
Гость
white_nigger, задумался об этом, просто пока есть возможность работы только в 7, на какую лучше перейти в будущем? И про бесплатные тоже интересно
...
Рейтинг: 0 / 0
05.03.2021, 14:19
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051068
bors
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bors
Гость
Мимопроходящий,

Спасибо
...
Рейтинг: 0 / 0
05.03.2021, 14:19
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051072
Мимопроходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Мимопроходящий
Участник
05.03.2021 14:19, bors пишет:
> на какую лучше перейти в будущем?

на самую свежую.
бесплатная (Community Edition) пока отстаёт от неё по версии.
https://www.embarcadero.com/ru/products/delphi/starter/free-download
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
05.03.2021, 14:23
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051080
bors
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bors
Гость
Мимопроходящий,

спасибо!
...
Рейтинг: 0 / 0
05.03.2021, 14:34
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051121
Fr0sT-Brutal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Fr0sT-Brutal
Гость
Или Lazarus
...
Рейтинг: 0 / 0
05.03.2021, 16:38
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051186
Фотография DarkMaster
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DarkMaster
Участник
Fr0sT-Brutal,

В Лазаре - UTF8. Это несколько отличается от UTF16 Винды. Хотя может ТСу и хватит.
...
Рейтинг: 0 / 0
05.03.2021, 19:53
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051213
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kazantsev Alexey
Участник
DarkMaster
В Лазаре - UTF8. Это несколько отличается от UTF16 Винды.

В винде и utf-8 имеется...


DarkMaster
Хотя может ТСу и хватит.

А чего может не хватить? Охват у этих кодировок одинаковый.
...
Рейтинг: 0 / 0
05.03.2021, 21:22
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051228
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
makhaon
Участник
DarkMaster,

в лазаре еще веселее. на винде - анси, на линухах - utf8. но насколько я знаю собираются и в лазарь utf16 дефолтно завезти
...
Рейтинг: 0 / 0
05.03.2021, 22:16
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051229
Фотография wadman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
wadman
Участник
makhaon
в лазаре еще веселее. на винде - анси

Удивительно.
...
Рейтинг: 0 / 0
05.03.2021, 22:22
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051231
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kazantsev Alexey
Участник
makhaon
в лазаре еще веселее. на винде - анси,

Дремучий ты...




з.ы. Правильные опции компиляции использовать надо :)
...
Рейтинг: 0 / 0
05.03.2021, 22:37
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051234
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Vasilisk_
Участник
Kazantsev Alexey
з.ы. Правильные опции компиляции использовать надо :)
Для компиляции проекта или Лазаря?
...
Рейтинг: 0 / 0
05.03.2021, 22:50
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051235
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kazantsev Alexey
Участник
_Vasilisk_,

Проекта конечно.
...
Рейтинг: 0 / 0
05.03.2021, 22:55
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051238
Фотография wadman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
wadman
Участник
_Vasilisk_
Kazantsev Alexey
з.ы. Правильные опции компиляции использовать надо :)
Для компиляции проекта или Лазаря?

Удивительно.

Сколько "профи" приходит учить.
...
Рейтинг: 0 / 0
05.03.2021, 23:12
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051249
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
makhaon
Участник
Kazantsev Alexey
makhaon
в лазаре еще веселее. на винде - анси,

Дремучий ты...
з.ы. Правильные опции компиляции использовать надо :)

ты лучше покажи опцию для обращения к utf16 'W' api windows ansi сплошное. проблема там не в string.
...
Рейтинг: 0 / 0
06.03.2021, 00:20
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051252
Фотография wadman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
wadman
Участник
makhaon
Kazantsev Alexey
пропущено...

Дремучий ты...
з.ы. Правильные опции компиляции использовать надо :)

ты лучше покажи опцию для обращения к utf16 'W' api windows ansi сплошное. проблема там не в string.

Дефолт не вариант? Лазарус с нуля поставлен и все работает во всех ОС (винда, дебиан, убунту).

Есть пример, где что-то не работает? Без смайликов.
...
Рейтинг: 0 / 0
06.03.2021, 00:42
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051253
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kazantsev Alexey
Участник
makhaon
ты лучше покажи опцию для обращения к utf16 'W' api windows ansi сплошное.

Если хочется прям по-взрослому, то переключаешься на unicodestring и пользуешься апи с W.
...
Рейтинг: 0 / 0
06.03.2021, 00:43
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051257
Фотография Dmitry Arefiev
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dmitry Arefiev
Участник
wadman
Есть пример, где что-то не работает? Без смайликов.

Что Азия говорит ?
...
Рейтинг: 0 / 0
06.03.2021, 01:10
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051262
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kazantsev Alexey
Участник
wadman
Есть пример, где что-то не работает?

Код: pascal
1.
2.
3.
4.
5.
6.
7.
program console_project1;
uses
 sysutils;
begin
  writeLn(Ord(FileExists('привет.txt')).ToString);
  readLn;
end.


Без явного указания страницы на системе без русской локали не работает, после указания - работает. LCL сама назначает страницу.
...
Рейтинг: 0 / 0
06.03.2021, 01:43
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051265
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kazantsev Alexey
Участник
Ещё пример:
Код: pascal
1.
2.
3.
4.
5.
6.
7.
procedure TForm1.Button2Click(Sender: TObject);
var
  s : Utf8String;
begin
 s := 'привет!';
 showMessage(s);
end;


Запуск на машине без русской локали.

компилировали без директивы:


с директивой:
...
Рейтинг: 0 / 0
06.03.2021, 02:09
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051353
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
makhaon
Участник
Kazantsev Alexey,

Ок, объясни мне, как
автор unicodestring и пользуешься апи с Wповлияет на прописанные дефолтные заголовки? Может я какой-то магии не знаю?

function CallMsgFilter(var lpMsg: TMsg; nCode: Integer): BOOL;external 'user32' name 'CallMsgFilterA';
function DispatchMessage(const lpMsg: TMsg): Longint;external 'user32' name 'DispatchMessageA';
function CommConfigDialog(lpszName: PChar; hWnd: HWND; var lpCC: TCommConfig): BOOL;external 'kernel32' name 'CommConfigDialogA';

повторю для всех. В винде дефолтно - анси, в линуксе дефолтно utf8.
правят что бы сделать utf16 везде, как в делфи.
...
Рейтинг: 0 / 0
06.03.2021, 21:58
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051356
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
makhaon
Участник
Kazantsev Alexey
Ещё пример: s : Utf8String
это неспортивно речь про дефолтный string. читай что ли... что пишут, недремучий наш
...
Рейтинг: 0 / 0
06.03.2021, 22:03
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051362
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kazantsev Alexey
Участник
makhaon,

Я то думал он о чём-то серьёзном, а он о том, что ему заголовков не подвезли... Ну так обновись, что ли...

Вот так оно уже сейчас:
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
function DispatchMessage(const lpMsg: TMsg): Longint;external 'user32' name 'DispatchMessageA';
function DispatchMessageA(const lpMsg: TMsg): Longint; external 'user32' name 'DispatchMessageA';
function DispatchMessageW(const lpMsg: TMsg): Longint; external 'user32' name 'DispatchMessageW';
function CallMsgFilter(var lpMsg: TMsg; nCode: Integer): BOOL;external 'user32' name 'CallMsgFilterA';
function CallMsgFilterA(var lpMsg: TMsg; nCode: Integer): BOOL; external 'user32' name 'CallMsgFilterA';
function CallMsgFilterW(var lpMsg: TMsg; nCode: Integer): BOOL; external 'user32' name 'CallMsgFilterW';
function CommConfigDialog(lpszName: PChar; hWnd: HWND; var lpCC: TCommConfig): BOOL;external 'kernel32' name 'CommConfigDialogA';
function CommConfigDialogA(lpszName: LPCSTR; hWnd: HWND; var lpCC: TCommConfig): BOOL; external 'kernel32' name 'CommConfigDialogA';
function CommConfigDialogW(lpszName: LPWSTR; hWnd: HWND; var lpCC: TCommConfig): BOOL; external 'kernel32' name 'CommConfigDialogW';
...
Рейтинг: 0 / 0
06.03.2021, 22:39
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051365
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kazantsev Alexey
Участник
makhaon
повторю для всех. В винде дефолтно - анси, в линуксе дефолтно utf8.

Глупость, повторенная дважды не перестаёт быть глупостью:
FPC since version 3.0 provides an API to change the default system codepage of RTL to something else. Lazarus (actually its LazUtils package) takes advantage of that API and changes it to UTF-8 (CP_UTF8). It means also Windows users now use UTF-8 strings in the RTL.
...
Рейтинг: 0 / 0
06.03.2021, 23:00
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051369
rgreat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rgreat
Участник
Kazantsev Alexey,

И вот что им мешало сделать по дефолту UTF-16?
...
Рейтинг: 0 / 0
06.03.2021, 23:20
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051374
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kazantsev Alexey
Участник
rgreat,

Делают же. Нынешняя поддержка utf-8 это временное решение.
Future

The goal of FPC project is to create a Delphi compatible UnicodeString (UTF-16) based solution, but it is not ready yet. It may take some time to be ready.

This UTF-8 solution of LCL in its current form can be considered temporary. In the future, when FPC supports UnicodeString fully in RTL and FCL, Lazarus project will provide a solution for LCL that uses it. At the same time the goal is to preserve UTF-8 support although it may require changes to string types or something. Nobody know the details yet. We will tell when we know...

In essence LCL will probably have 2 versions, one for UTF-8 and one for UTF-16.
...
Рейтинг: 0 / 0
06.03.2021, 23:39
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051375
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
makhaon
Участник
Kazantsev Alexey
makhaon,

Я то думал он о чём-то серьёзном, а он о том, что ему заголовков не подвезли... Ну так обновись, что ли...

Вот так оно уже сейчас:
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
function DispatchMessage(const lpMsg: TMsg): Longint;external 'user32' name 'DispatchMessageA';
function DispatchMessageA(const lpMsg: TMsg): Longint; external 'user32' name 'DispatchMessageA';
function DispatchMessageW(const lpMsg: TMsg): Longint; external 'user32' name 'DispatchMessageW';
function CallMsgFilter(var lpMsg: TMsg; nCode: Integer): BOOL;external 'user32' name 'CallMsgFilterA';
function CallMsgFilterA(var lpMsg: TMsg; nCode: Integer): BOOL; external 'user32' name 'CallMsgFilterA';
function CallMsgFilterW(var lpMsg: TMsg; nCode: Integer): BOOL; external 'user32' name 'CallMsgFilterW';
function CommConfigDialog(lpszName: PChar; hWnd: HWND; var lpCC: TCommConfig): BOOL;external 'kernel32' name 'CommConfigDialogA';
function CommConfigDialogA(lpszName: LPCSTR; hWnd: HWND; var lpCC: TCommConfig): BOOL; external 'kernel32' name 'CommConfigDialogA';
function CommConfigDialogW(lpszName: LPWSTR; hWnd: HWND; var lpCC: TCommConfig): BOOL; external 'kernel32' name 'CommConfigDialogW';



что поменялось то? те же 'A' дефолтно. глупость повторенная трижды... дальше по тексту.
обновляйся, не обновляйся, пока нормальную поддержку utf16 не завезут, будет как было.
...
Рейтинг: 0 / 0
06.03.2021, 23:59
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051376
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
makhaon
Участник
https://wiki.freepascal.org/Unicode_Support_in_Lazarus
авторThe goal of FPC project is to create a Delphi compatible UnicodeString (UTF-16) based solution, but it is not ready yet. It may take some time to be ready.
авторWhy not use UTF8String in Lazarus? Short answer: Because the FCL does not use it.

И т.д. Текущее состояние строк в лазаре близко к вселенскому ужасу. завезут везде utf16 и всё устаканится. почти сразу же.
...
Рейтинг: 0 / 0
07.03.2021, 00:07
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051377
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kazantsev Alexey
Участник
makhaon,

переключаешься на unicodestring и пользуешься апи с W.
Но это, конечно, осилят не только лишь все.
...
Рейтинг: 0 / 0
07.03.2021, 00:07
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051378
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kazantsev Alexey
Участник
makhaon,

Вижу, ты ещё и не читатель...
...
Рейтинг: 0 / 0
07.03.2021, 00:09
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051379
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
makhaon
Участник
Kazantsev Alexey,

Леша, просто признайся, что пишешь херню и не прав. Ну чо уже, бывает.
...
Рейтинг: 0 / 0
07.03.2021, 00:09
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40051381
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kazantsev Alexey
Участник
makhaon,

Нет, херню про анси пишет не Лёша, а кто-то другой.
...
Рейтинг: 0 / 0
07.03.2021, 00:17
| Ответить | Цитировать | Написать  
Delphi 7 и Unicode
    #40052024
Fr0sT-Brutal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Fr0sT-Brutal
Гость
rgreat
Kazantsev Alexey,

И вот что им мешало сделать по дефолту UTF-16?

Подозреваю, что линуксоидность, а также то, что они начали ее поддерживать еще до появления Д2009
...
Рейтинг: 0 / 0
09.03.2021, 17:24
| Ответить | Цитировать | Написать  
35 сообщений из 35, показаны все 2 страниц
  все  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Delphi 7 и Unicode
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?all=1&fid=58&tid=2037537]:
 0ms
get settings:
 5ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 144ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 43ms
get tp. blocked users:
 1ms
others: 210ms
total:  425ms
созд. / загр.: 425ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]