Форум программистов, компьютерный форум CyberForum.ru

Lazarus

Войти
Регистрация
Восстановить пароль
 
ЦенительПрекрасного
0 / 0 / 0
Регистрация: 02.06.2016
Сообщений: 13
#1

нуб и русские заголовки окна :) - Lazarus

30.12.2016, 18:04. Просмотров 204. Ответов 1
Метки нет (Все метки)

методом копипаста создал код для определения хэндлов, заголовка окна и текста под курсором мыши
вот часть кода
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var
  hWnd: THandle;
  aName,
  eText : array [0..255] of char;
begin
  hWnd := WindowFromPoint(CrPos) ;
  edit1.text := IntToStr(hWnd) ;
 
  if boolean(GetClassName(hWnd, aName, 256)) then
    edit2.text := string(aName)
  else
    edit2.text := 'ClassName : not found';
  SendMessage(hWnd, WM_GETTEXT,
              SizeOf((eText)), integer(@eText)) ;
  edit3.text := UTF8ToWinCP(eText);
вроде бы я молодец и все работает, но русские буквы заменяются знаками вопроса
курсор мышки я подрисовал
Соответственно вопрос знатокам:"Как это исправить?".
Миниатюры
нуб и русские заголовки окна :)  
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
30.12.2016, 18:04     нуб и русские заголовки окна :)
Посмотрите здесь:
Русские буквы на DBGrid Lazarus
Lazarus Не отображаются русские буквы
Русские буквы в ADSTable? Lazarus
Русские буквы в пути к файлу Lazarus
Lazarus Lazarus, RichMemo и русские буквы
Lazarus Не выводятся русские символы на TImage как части строки
Русские заголовки в Datagridview C#
DatGridView. Русские заголовки столбцов. C#
Windows 7 заголовки окна прозрачные(
Как правильно убрать не нужные заголовки активного окна из текстбокса? C# .NET 3.x
PHP HTTP заголовки. Как увидеть реальные принятые заголовки ?
Pascal я нуб)

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
quwy
Native x86
3133 / 1981 / 527
Регистрация: 13.02.2013
Сообщений: 6,632
30.12.2016, 18:12     нуб и русские заголовки окна :) #2
Сообщение было отмечено автором темы, экспертом или модератором как ответ
Вместо UTF8ToWinCP нужно наоборот использовать WinCPToUTF8
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru