Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Вывод на форму немецких букв - умлаутов [D7, Win2k, WinXP]

SMT © (2005-01-27 18:54:00)
Уважаемые мастера,

Помогите, пожалуйста, правильно выводить в форме текст на немецком языке, содержащий умлауты, например, U с двумя точками наверху. Когда я копирую подобный текст из документа Word в форму Delphi, умлауты пропадают. У меня на форме установлен шрифт Microsoft Sans Serif и набор символов Default.
С уважением, Игорь Степанов

SMT (2005-01-31 19:05:00) [1]
К сожалению, я не нашел CHARSET WESTERN в списке доступных для компонента Memo. Где его можно раздобыть и как сделать доступным для визуальных компонентов Delphi?

С уважением, Игорь Степанов

Cobalt (2005-01-30 16:17:00) [2]
Извиняюсь, чарсет называется просто "Western"

Cobalt (2005-01-30 16:14:00) [3]
charset Western Europe - мы именно его использовали.
Но программа была конкретно для использования тольков Германии.

SMT (2005-01-30 14:09:00) [4]
Уважаемый господин Подгорецкий,

Дело в том, что при использовании ANSI_CHARSET в русифицированной Windows умлауты заменены на кириллические символы. Мне же хотелось бы, чтобы и на русифицированной Windows здесь, и на немецкоязычной Windows в Германии умлауты были нормально видны.

Можно ли как-нибудь использовать Unicod для этой цели?
Если да, то как именно?

С уважением,
Игорь Степанов

Anatoly Podgoretsky (2005-01-30 12:53:00) [5]
Ну тебе же ответили в [2]

SMT (2005-01-30 11:22:00) [6]
Уважаемый господин Подгорецкий,

Подскажите, пожалуйста, какой CHARSET подходит именно для Германии, поскольку моя программа предназначена именно для использования моими германскими коллегами?

Буду Вам чрезвычайно признателен за помощь.

С уважением, Игорь Степанов

uny (2005-01-29 21:14:00) [7]
у буквы ё тоже точки, но мы за мир!
:)

Anatoly Podgoretsky (2005-01-29 20:30:00) [8]
Рассказываю BALTIC_CHARSET это для Литвы, Латвии и Эстонии, а не для Германии.

SMT (2005-01-29 20:26:00) [9]
Уважаемый господин Подгорецкий,

Я не совсем понял, что Вы понимаете под правильным экспериментированием? Ведь предложенный мною код работает и в компоненте Memo действительно правильно выводятся умлауты. Какое еще экспериментирование требуется и с какой целью? Пожалуйста, объясние мне подробно.
С уважением и благодарностью, Игорь Степанов

Anatoly Podgoretsky (2005-01-29 14:08:00) [10]
SMT (29.01.05 11:43) [4]
Я поэкспериментировал с разными Charset и выяснил, что подходит BALTIC_CHARSET.

Ни фига себе. Поэкспериментируй еще, только на этот раз правильно.

SMT (2005-01-29 11:43:00) [11]
Уважаемые мастера,

Я поэкспериментировал с разными Charset и выяснил, что подходит BALTIC_CHARSET. При этом Font может быть разным, например, 'Microsoft Sans Serif', 'Times New Roman','Arial'.
Привожу пример вывода текста с умлаутами в компонент Memo. Может быть, кому-нибудь пригодится.

procedure TMainF.FormShow(Sender: TObject);
begin
Memo1.Font.Charset:=BALTIC_CHARSET;
Memo1.Font.Name:='Times New Roman';
{ Memo1.Font.Name:='Arial'; Memo1.Font.Name:='Microsoft Sans Serif';}

Memo1.Lines.Add('This is Latin capital letter A with diaeresis: '+#196);
Memo1.Lines.Add('This is Latin small letter a with diaeresis: '+#228);
Memo1.Lines.Add('This is Latin capital letter O with diaeresis: '+#214);
Memo1.Lines.Add('This is Latin small letter o with diaeresis: '+#246);
Memo1.Lines.Add('This is Latin capital letter U with diaeresis: '+#220);
Memo1.Lines.Add('This is Latin small letter u with diaeresis: '+#252);
Memo1.Lines.Add('This is Latin small letter sharp S with diaeresis: '+#223);

end;

Спасибо за помощь.

С уважением, Игорь Степанов

zmova (2005-01-28 08:57:00) [12]
и фонт поменяй :) - а то MS Sans Serif часто имеет только один набор символов - для текущей локали...

zmova (2005-01-28 08:53:00) [13]
Font > Chatset := ANSI_CHARSET

Начинающий2 (2005-01-27 19:21:00) [14]
Если у тебя винда руская + в настойках везде стоит руский(языковые стандарты и форматы, расположение, язык програм), то с умплаутами будет проблема. Даже если расположение поменяеш на *германия*, всё равно вместо умплаутов будут либо русские буквы либо без точек. Под немецкой виндой без проблем.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »