Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 31.12.2008, 00:18   #11
С.М.С
Участник клуба
 
Аватар для С.М.С
 
Регистрация: 29.12.2008
Сообщений: 1,598
По умолчанию

Нет невидел, потому и спрашиваю. Но будит ли она коректно работать со всеми офисами. в том же 2007 офисе несколько раз просматривал - ненашёл некоторых символов, в частности повернутую с. Да и некоторые кода несовпадают.
С.М.С вне форума Ответить с цитированием
Старый 31.12.2008, 02:12   #12
С.М.С
Участник клуба
 
Аватар для С.М.С
 
Регистрация: 29.12.2008
Сообщений: 1,598
По умолчанию

Что-то проясняется! Visual Basic 6 испльзует кодовую таблицу Windows(CP-1251) и к офису отношения неимеет. Теперь надо думать что сделать чтобы заимел!
к слову. все символы транскрипции есть в Unicode 4. А вот в 2007 офисе всё через одно место пропущено в прочем как и в VB.

Вопрос к alexBlack - Скажите при каком офисе писали English-Russian dictionary.
С.М.С вне форума Ответить с цитированием
Старый 31.12.2008, 03:47   #13
Sasha_Smirnov
Особый статус
Участник клуба
 
Аватар для Sasha_Smirnov
 
Регистрация: 24.11.2008
Сообщений: 1,535
По умолчанию

Перевёрнутая с (в качестве транскрипции английского звука между о и а — например, в слове comedy) скоро выйдет из употребления. Смотрите в магазинах: там все новые словари уже с несколько другой семиотикой (то есть значки в транскрипции другие, отчасти).

Я использовал метод
Код:
Selection.ShapeRange.ConvertToInlineShape
(Это в VBA 5 или 6). А сами значки рисовал в Word.

Но есть и готовые в Unicode*: æ, ə (+греческие — здесь не отобразились).
_____________________

* VBA, начиная с Windows 98, использует для хранения строк исключительно Unicode
Sasha_Smirnov вне форума Ответить с цитированием
Старый 31.12.2008, 04:20   #14
Sasha_Smirnov
Особый статус
Участник клуба
 
Аватар для Sasha_Smirnov
 
Регистрация: 24.11.2008
Сообщений: 1,535
По умолчанию

С офисами, начиная то ли с 2000, то ли с экс-пи, работает встроенный редактор шрифтов eudcedit.exe.
Вызывается так:
Код:
кнопка Пуск (на панели задач Windows) > Выполнить... > eudcedit > OK
Там есть справка.
И можете любые значки там нарисовать, а затем вызывать из своего приложения.

Последний раз редактировалось Sasha_Smirnov; 31.12.2008 в 04:22.
Sasha_Smirnov вне форума Ответить с цитированием
Старый 31.12.2008, 09:32   #15
alexBlack
Участник клуба
 
Регистрация: 12.10.2007
Сообщений: 1,204
По умолчанию

Цитата:
Сообщение от С.М.С Посмотреть сообщение
Вопрос к alexBlack - Скажите при каком офисе писали English-Russian dictionary.
в Delphi

Может Вам проще будет установить специализированный шрифт. Например: http://www.alleng.ru/texts/ph_tm.htm
alexBlack вне форума Ответить с цитированием
Старый 31.12.2008, 10:22   #16
С.М.С
Участник клуба
 
Аватар для С.М.С
 
Регистрация: 29.12.2008
Сообщений: 1,598
По умолчанию

Спасибо огромное Всем кто принимал участие!!!!
С.М.С вне форума Ответить с цитированием
Старый 03.01.2009, 15:35   #17
AXS
Программер
Пользователь Подтвердите свой е-майл
 
Аватар для AXS
 
Регистрация: 03.07.2008
Сообщений: 36
По умолчанию

Я недавно сталкивался с похожей проблемой. Получал транскрипцию с lingvo.ru в виде номеров картинок (у них транскрипция картинками выводится).

Создал массив
Код:
rwst: Array [0..43] of Array [0..2] of string[3] = (
  ('39',  'A',  ''''),    // 0
  ('40',  'A',  '('),     // 1
  ('41',  'A',  ')'),     // 2
  ('44',	'A',  ','),     // 3
  ('91',  'A',  '['),     // 4
  ('93',  'A',  ']'),     // 5
  ('176', 'A',  'i:'),    // 6
  ('177', 'A',  'a:'),    // 7
  ('178', 'W',  '596'),   // 8
  ('179', 'A',  'u:'),    // 9
  ('180', 'W',  '601'),   // 10
  ('181', 'U',  '652'),   // 11
  ('182', 'U',  '601'),   // 12
  ('183', 'U',  '230'),   // 13
  ('184', 'U',  '596'),   // 14
  ('185', 'U',  '240'),   // 15
  ('186', 'U',  '658'),   // 16
  ('187', 'U',  '676'),   // 17
  ('188', 'U',  '331'),   // 18
  ('189', 'A',  'u'),     // 19
  ('190', 'U',  '952'),   // 20
  ('191', 'U',  '643'),   // 21
  ('192', 'U',  '679'),   // 22
  ('193', 'A',  'i'),     // 23
  ('194', 'A',  'e'),     // 24
  ('195', 'A',  'p'),     // 25
  ('196', 'A',  'b'),     // 26
  ('197', 'A',  'm'),     // 27
  ('198', 'A',  'w'),     // 28
  ('199', 'A',  'f'),     // 29
  ('200', 'A',  'v'),     // 30
  ('201', 'A',  's'),     // 31
  ('202', 'A',  'z'),     // 32
  ('203', 'A',  't'),     // 33
  ('204', 'A',  'd'),     // 34
  ('205', 'A',  'n'),     // 35
  ('206', 'A',  'l'),     // 36
  ('207', 'A',  'r'),     // 37
  ('208', 'A',  'k'),     // 38
  ('209', 'A',  'g'),     // 39
  ('210', 'A',  'h'),     // 40
  ('211', 'A',  'j'),     // 41
  ('212', 'U',  '603'),   // 42
  ('213', 'A',  'a'));    // 43
первая ячейка - номер картинки
вторая 'A' - ANSI, 'U' - unicode, 'W' - unicode плюс двоеточие
Третья ячейка - если символ помечен как 'A', то это просто символ который можно просто отобразить.
Если 'U' (unicode), то это десятиричный номер символа в unicod'e. Отображаем так: WideChar(XXX) где XXX тот самый номер
Если 'W' то также как 'U' только добавляем двоеточие

Получается вот так

PS: Шрифт Lucida Sans Unicode
PPS: Для вывода использовал компоненты tntunicode
<AXS> Если один из двух выходов - ловушка, надо найти третий... </AXS>
<AXS> "Живой" - явление временное... </AXS>

<><><> www.mak-ms.com <><><>

Последний раз редактировалось AXS; 03.01.2009 в 15:37.
AXS вне форума Ответить с цитированием
Старый 03.01.2009, 15:50   #18
С.М.С
Участник клуба
 
Аватар для С.М.С
 
Регистрация: 29.12.2008
Сообщений: 1,598
По умолчанию

Сделал проще, установил шрифт с символами транскрипции, вывел символ на кнопку, при нажатии кнопки символ берётся с caption этой кнопки, ненадо ни масивов ни дополнительных переменных, итд. Вот только хронятся эти наборы в .txt под своими кодами и Шрифтом по умолчанию, но это не мешает. Осталось решить как устанавливать шрифт - программно или предоставить это пользователю.
С.М.С вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Нужна помощь по языку Фортран GGfromthesky Помощь студентам 4 23.05.2009 17:07
Работа с русскими символами... Sota Помощь студентам 5 31.05.2008 18:44
Задания по языку Pascal Corpse Паскаль, Turbo Pascal, PascalABC.NET 5 04.05.2008 19:43
Какому языку посвятить себя? SputNIK Свободное общение 5 11.11.2007 23:34