![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вопрос по существу... [D6, D7]
kull © (2002-12-09 13:58:00)И сказало начальство: "Хочу чтоб приложение Unicode поддерживало".
Подумал я: "без проблем..."
Открыл Delphi, сделал New CLX Application.
Вроде Edit-ы и Label-ы работают, но вот когда добрался до компонентов использующих TStrings, меню и TAction-ов тут-то я понял что в Борланде схалтурили.
У кого нибудь возникали подобные проблемы? Ведь итемы у TString типа string. А когда widestring переоняется через string, здесь уже ни о каком unicode не может быть и речи.
Как решать эту проблемму?
kull (2002-12-10 16:16:00) [1]
> Игорь Шевченко © (10.12.02 15:56)
Да ка-ки-е же вы обивчивые...
Может я плохо выражаю свои мысли?
Но, кажется в моих текстах встречались слова "Спасибо" и "ОЧЕНЬ неплохие компоненты".
Спасибо! Премного благодарен! Замечательные компоненты, нигде таких не встречал.
Мало? Как прикажете вас отблагодарить еще?
И все таки что тут "малось труднее" в замене string на WideString?
Игорь Шевченко (2002-12-10 15:56:00) [2]
> Компоненты на то и компоненты чтоб одни писали а другие
> пользовались.
Не можешь пользоваться из-за отсутствия ActionList - не пользуйся.
А наезжать на то, что дали на халяву - стыдно и неэтично :-)
Шурик Ш (2002-12-10 15:42:00) [3]Просто компоненты эти ты нахаляву получил. А дареному коню, сам знаешь куда, не смотрят.
kull (2002-12-10 15:33:00) [4]
> Игорь Шевченко © (10.12.02 12:36)
> Это малость труднее, чем критиковать, но все же возможно.
Извините, что "малость труднее"? stringна WideString заменить?
kull (2002-12-10 15:26:00) [5]
> kull © (10.12.02 12:04)
>
> Если ты подозреваешь об этом понятии - то флаг тебе в руки,
> вместе с исходниками (они, кстати, свободные). Дописывай,
> дружище. Это малость труднее, чем критиковать, но все же
> возможно.
Не надо мне затыкать рот. Вовсе я не критикую, очень неплохие компоненты. (Просто поразило отсуствие такой важной части.)
И не собираюсь я писать свой ActionList. Это не является моей задачей.
Компоненты на то и компоненты чтоб одни писали а другие пользовались.
Так что такое заявление смахивает на бред, это все равно если бы мне в магазине сказали: "не нравится что без пульта? Собери сам... а то критиковать-то все могут...."
Просто удивляет меня - неужели никто не пользуется этим компонентом?
Игорь Шевченко (2002-12-10 12:36:00) [6]kull © (10.12.02 12:04)
Если ты подозреваешь об этом понятии - то флаг тебе в руки, вместе с исходниками (они, кстати, свободные). Дописывай, дружище. Это малость труднее, чем критиковать, но все же возможно.
kull (2002-12-10 12:04:00) [7]Да, вроде ничего...
Правда я там ActionList не обнаружил. Не в этих не в "моих"...
Без него работать с меню, тулбарами и т.п. - просто несерьезно.
Создается впечатление что и те и другие не подозревают о таком понятии как системный подход. :)
kull (2002-12-10 11:56:00) [8]Спасибо! Сейчас посмотрим....
Игорь Шевченко (2002-12-10 11:17:00) [9]http://home.ccci.org/wolbrink/tntmpd/delphi_unicode_controls_project.htm
kull (2002-12-10 11:06:00) [10]Ну может тогда кто-нибудь подскажет компоненты, которые поддерживают работу с Unicode.
Есть такие компоненты: http://www.eldos.org/elpack/elpack.html
Но в них ввод с клавиатуры на некоторых языках плохо работает. С выводом то все впорядке.
Может знает кто еще какие нибудь.
(PLEASE!)
Внук (2002-12-09 19:25:00) [11]Пока Borland не перепишет VCL под настоящую поддержку Unicode, заниматься такими проектами на Delphi - бессмысленно и беспощадно.
Разумеется, это не относится к внутренним строковым переменным программы (не связанных с интерфейсом или VCL) и вызовам WinApi.
kull (2002-12-09 18:21:00) [12]Да вы че?
Когда весь мир переходит на юникод, вы до сих пор на
ansistring-е сидисте.
Separator (2002-12-09 14:05:00) [13]Извени не вту ветку написал
Separator (2002-12-09 14:02:00) [14]Вот что мне понаписали в пятницу, эта функция выдает позицию элемента N в массиве Values, может поможет
function NPos(N: Integer; const Values: array of Integer):integer;
asm
push ebx
mov ebx, edx
@@10:
test ecx, ecx
jl @@40
cmp eax, [edx]
je @@30
add edx, 4
dec ecx
jmp @@10
@@30:
mov eax, edx
sub eax, ebx
shr eax,2
jmp @@50
@@40:
mov eax,-1
@@50:
pop ebx
end;