Показать сообщение отдельно
Старый 13.07.2008, 15:33   #4
Romanzes
Разработчик
 
Аватар для Romanzes
 
Регистрация: 06.04.2008
Сообщений: 541
Написано 196 полезных сообщений
(для 637 пользователей)
Ответ: Lib_font32: Графические шрифты

У меня функция Format вешает телефон, если в строке есть буква "я". Вот, например:
Program Font32test;
Uses	font32;

var
  scrW,scrH,h,k: integer;

Begin
  scrW:=GetWidth;
  scrH:=GetHeight;
  font32.init(1); // Инициализация (всего у нас будет 1 шрифт)
  font32.Font(0); // Выбираем шрифт номер 0
  LoadFont('Verdana_7'); // Загружаем шрифт
  font32.TextWindow(50,50,50,50);
  h:=font32.Format('Раз Два Три Четыре Пять Шесть Семь Восемь Девять Десять'); //Здесь ошибка
  while true do
  begin
    SetColor(255,255,255);
    FillRect(0,0,scrW,scrH);
    SetColor(255,0,0);
    DrawRect(49,49,52,52);
    k:=KeyToAction(GetKeyPressed);
    if k=GA_UP then h:=MoveUp(3);
    if k=GA_DOWN then h:=MoveDown(3);
    DrawTextWindow;
    Repaint;
  end;
End.
Если убрать буквы "я", то пример будет работать. Можно, конечно, писать "йа", но неудобно
(Offline)
 
Ответить с цитированием