Показать сообщение отдельно
  #5  
Старый 01.02.2013, 15:29
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,721
Репутация: 52347
По умолчанию

Цитата:
Сообщение от Freeman
Что конкретно интересует-то? Ввод ударе́ния с клавиатуры -- зажать Alt и набрать 769 на цифровой клаве. Переименовать файл -- в любой программе, поддерживающей Unicode, -- в том же "Проводнике", не к ночи будет помянут.

Программно -- аналогично, только использовать WideString (UnicodeString или просто string в модных версиях Delphi) и W-версии системных функций:
Код:
var
  W: WideString;
begin
  W := Application.ExeName;
  if not MoveFileW(Pointer(W), Pointer(W + WideChar(769))) then
    RaiseLastOSError;
end;
1. Открываем проводник в WinXP, пробуем переименовать по вашему рецепту. Получаем неотображаемый символ. Вывод - не катит такое решение.
2. Пока проверить не могу. Проверьте у кого есть Дельфа с поддержкой юникода и отпишитесть о результатах.
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием