powered by simpleCommunicator - 2.0.59     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как заставить работать EControl
25 сообщений из 25, страница 1 из 1
Как заставить работать EControl
    #37684745
Janex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Привет всем.
Ктото работает с EControl Syntax Editor ?
У меня версия 2.6.

Записать чтот в TSyntaxMemo возможно только латынскими буквами :(
Если перключаюсь на русскую клавиатуру, то пишется ерунда всякая,
если рядом поставить простои TMemo то там пишется как
положено - в юникодах (Дельфа ХЕ), хоть в трёх языках сразу, если пототм
ctrl+c/ctrl+v из TMemo в TSyntaxMemo то всё видно как положено, а
напримую записать нефига :(
Перепробовал всё, дажё перекопилил с {$DEFINE EC_UNICODE}, нефига :(

Есть у когото опыт с токим глюком ?

WBR
Janex
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #37684909
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
function ecKeyChar(const C: Char): ecChar;
begin
  {$IFDEF EC_UNICODE}
    MultiByteToWideChar(CodePageFromLocale(GetKeyboardLayout(0) and $FFFF),
                        MB_USEGLYPHCHARS, @C, 1, @Result, 1);
  {$ELSE}
    Result := C;
  {$ENDIF}
end;

procedure TCustomSyntaxMemo.KeyPress(var Key: Char);
var WC: ecChar;
begin
  inherited;
  {$IFDEF EC_UNICODE}
  if (Key = #63) and (FUniChar <> #0) then WC := FUniChar
   else WC := ecKeyChar(Key);  //ошибка здесь
  FUniChar := #0;
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #37684913
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
JanexПривет всем.
Ктото работает с EControl Syntax Editor ?
У меня версия 2.6.

В новых версиях всё хорошо, а 2.6 - последняя доступная пиратская.
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #37684967
Janex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DimaBr
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
function ecKeyChar(const C: Char): ecChar;
begin
  {$IFDEF EC_UNICODE}
    MultiByteToWideChar(CodePageFromLocale(GetKeyboardLayout(0) and $FFFF),
                        MB_USEGLYPHCHARS, @C, 1, @Result, 1);
  {$ELSE}
    Result := C;
  {$ENDIF}
end;

procedure TCustomSyntaxMemo.KeyPress(var Key: Char);
var WC: ecChar;
begin
  inherited;
  {$IFDEF EC_UNICODE}
  if (Key = #63) and (FUniChar <> #0) then WC := FUniChar
   else WC := ecKeyChar(Key);  //ошибка здесь
  FUniChar := #0;



Вот бы ешё расказал что на что править ... :) :) :)

WBR
Janex
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #37685085
Janex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Разобрался :)
TNX

WBR
Janex
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
Как заставить работать EControl
    #40059186
WaveRunner
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Janex,
Помогите разобраться другим. Что нужно сделать, чтобы кириллица нормально отображалась?
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059196
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
WaveRunner
Janex,
Помогите разобраться другим. Что нужно сделать, чтобы кириллица нормально отображалась?


в третьей версии всё нормально отображается
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059201
WaveRunner
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
defecator, у меня, к сожалению, версия 2.60
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059205
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
WaveRunner
defecator, у меня, к сожалению, версия 2.60

ну, я сожалею
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059221
энди
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Оно вообще-то еще официально живое? Судя по сайту давно умерло.
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059308
WaveRunner
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
defecator, может у вас есть какие-нибудь мысли по поводу этой проблемы?
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059311
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
WaveRunner
defecator, может у вас есть какие-нибудь мысли по поводу этой проблемы?
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059312
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
WaveRunner
defecator, может у вас есть какие-нибудь мысли по поводу этой проблемы?
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059648
WaveRunner
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
defecator, при вводе латиницы все нормально отображается. Но как только переключаюсь на кириллицу, в редакторе выводится всякая белиберда (см. скрин). Вот что не так. В посте выше сказали, где искать ошибку, но не сказали, что конкретно нужно сделать, чтобы избавиться от этой проблемы. У самого додуматься не получается, поэтому прошу помочь
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059649
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
WaveRunner
defecator, при вводе латиницы все нормально отображается. Но как только переключаюсь на кириллицу, в редакторе выводится всякая белиберда (см. скрин). Вот что не так. В посте выше сказали, где искать ошибку, но не сказали, что конкретно нужно сделать, чтобы избавиться от этой проблемы. У самого додуматься не получается, поэтому прошу помочь



я не знаю, что у тебя за проблема
Я тебе привёл скриншоты от древней версии 2.35 (2007-й год) и 3.0 (2011-й год)

Везде прекрасно печатается кириллица - 2.35 на Delphi 7, версия 3.0 на Delphi XE7
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059669
WaveRunner
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
defecator, мне ваши скриншоты никак погоды не делают
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059679
asutp2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
WaveRunner,

зачем использовать либу, которая автором уже брошена?
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059686
WaveRunner
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
asutp2, затем, что понравилась. О том, что она заброшена слышу впервые
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059687
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
asutp2
WaveRunner,

зачем использовать либу, которая автором уже брошена?


она не совсем брошена, там под 10.2 есть
значит, кто-то допиливал
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059689
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
WaveRunner
asutp2, затем, что понравилась. О том, что она заброшена слышу впервые


а ты её купил, что ли ?
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059691
WaveRunner
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
defecator
WaveRunner
asutp2, затем, что понравилась. О том, что она заброшена слышу впервые


а ты её купил, что ли ?


нет. Наверное, если бы я ее купил, то сидел бы на последней версии, и не задавал бы тут вопросов
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059706
asutp2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
defecator
asutp2
WaveRunner,

зачем использовать либу, которая автором уже брошена?


она не совсем брошена, там под 10.2 есть
значит, кто-то допиливал
Вот именно, что только последняя версия для 10.2
А как же Rio? Sydney?
Сайт обновлялся последний раз в 2017 году.

Поэтому большой вопрос - допустим решено использовать библиотеку. Через пару лет принято решении о миграции на делфи 10.5. И?
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059708
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
asutp2
defecator
пропущено...


она не совсем брошена, там под 10.2 есть
значит, кто-то допиливал
Вот именно, что только последняя версия для 10.2
А как же Rio? Sydney?
Сайт обновлялся последний раз в 2017 году.

Поэтому большой вопрос - допустим решено использовать библиотеку. Через пару лет принято решении о миграции на делфи 10.5. И?


Можно таскать за собой, периодически самостоятельно допиливая под новую версию дельфи.
Если последовательно перетаскивать из версии в версию, то и допиливать будет немного
Тем более, что EControl написан на классическом Дельфи, безо всяких генериков и прочих нововведений
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059709
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
WaveRunner
defecator
пропущено...


а ты её купил, что ли ?


нет. Наверное, если бы я ее купил, то сидел бы на последней версии, и не задавал бы тут вопросов


я тебе показал древнюю версию 2.35 и "новую" версию 3.00
У тебя версия 2.60

Ты можешь украсть в том же месте, где ты украл 2.60, и версию 3.00
Что решит твою проблему
...
Рейтинг: 0 / 0
Как заставить работать EControl
    #40059711
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
asutp2,

думаю, что все перенесется без вопросов. недавно переносил проекты с XE6 на 10.4.2, перенеслось правкой нескольких строк кода. если либа достаточно хороша, то, думаю пусть и юзает.
...
Рейтинг: 0 / 0
25 сообщений из 25, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как заставить работать EControl
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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