|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 11 Nov 2005 20:03:50
To : Konstantin Tokar
Subject : Re: Русские буквы в Tk
--------------------------------------------------------------------------------
Konstantin Tokar -> All @ Fri, 11 Nov 2005 14:42:08 +0000 (UTC):
KT> Hижеописанное происходит только при запуске EXE
KT> файлов, созданных с помощью PAR, в perl 5.8.4
KT> ActiveState build 810.
KT> Hа страничке http://www.tokar.ru/perl/par/ я
KT> привёл скриншоты вывода при запуске из командной
KT> строки и при запуске получившегося EXE файла.
KT> Я встретил неожиданную проблему при выводе строк с
KT> кириллическими символами в Tk::Label и другие
KT> виджеты. Строки, полученные из базы данных и
KT> содержащие символы в кодировке cp1251, выводятся
KT> неправильно; символы, которые выводятся из скрипта
KT> напрямую, выводятся правильно. Hапример, в фрагменте
KT> $mw->Label( -text => "Label: Строки из базы
KT> данных" )->pack();
KT> while ( my @row = $sth->fetchrow_array ) {
KT> my $text = 'Строки из базы данных' . join
KT> ',', @row;
KT> $mw->Label( -text => $text )->pack();
KT> } ## end while ( my @row = $sth->fetchrow_array)
KT> первая Label выведется правильно, остальные видны
KT> неправильно - слова 'Строки из базы данных'
KT> русскими буквами, остальное крякозябрами.
KT> Я так и не смог побороть пока такое повведение.
KT> Может быть, кто-то уже сталкивался с подобным? Или
KT> есть какая-то тонкость, которую я не учёл?
OEM AKA cp866? Или уникод?
--
Artem Chuprina
RFC2822: <ran{}ran.pp.ru> Jabber: ran@jabber.ran.pp.ru
Я не люблю делать что бы то ни было для целевой аудитории Microsoft
(С)энта
--- ifmail v.2.15dev5.3
* Origin: Leninsky 45 home network (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: Русские буквы в Tk 
