forum.boolean.name - Lib_font32: Графические шрифты

forum.boolean.name (http://forum.boolean.name/index.php)

- Библиотеки (http://forum.boolean.name/forumdisplay.php?f=124)

- - Lib_font32: Графические шрифты (http://forum.boolean.name/showthread.php?t=6103)

Ответ: Lib_font32: Графические шрифты

Как заставить работать вот эту процедуру

PHP код:


		
			
Procedure Helper(s1: string; s2: string);

 begin

   Font(0); ww:=Format(s1, 0); DrawTextWindow; xx:=xx + ww;

   Font(1); ww:=Format(s2, 0); TextWindow(2, xx, wi - 4, hi - 2);

   DrawTextWindow; xx:=xx + ww; TextWindow(2, xx, wi - 4, hi - 2);

 end;

с новой либой. Мидлет не вешается, но и нет ни какого отображения информации. С Lib_font32 от 13.12.2009г такого не наблюдалось.

Ответ: Lib_font32: Графические шрифты

Не знаю. Надо глянуть саму программу полностью.

Ответ: Lib_font32: Графические шрифты

Цитата:

Сообщение от odd (Сообщение 140622)

Не знаю. Надо глянуть саму программу полностью.

Пример отправлен на Яндекс "мыло". Помощь ожидается?

Ответ: Lib_font32: Графические шрифты

Odd так как можно заставить работать процедуру из 136 поста с новой либой фонт32? Или же работать со старой?

Ответ: Lib_font32: Графические шрифты

Долго колупался с поиском глюка у тебя. В итоге причина оказалась в банальной несовместимости шрифтов. У тебя шрифты Verdana_10 сгенерированы в старом генераторе. Но всё равно в процессе анализа немного модернизировал библиотеку и за это спасибо.

Держите более свежую.

Ответ: Lib_font32: Графические шрифты

Цитата:

Сообщение от odd (Сообщение 141340)

Извиняюсь. Собрал архив из другой патки, а там в поекте не прописаны были шрифты в инициализации, но в проекте были добавлены оба варианта шрифтов. Т.к. работал и со старой версией библиотеки. На данный момент процедура работает с новой библиотекой.

Ответ: Lib_font32: Графические шрифты

еще заметил что зависает на старых телефонах новая версия.
3100 при прокрутке вверх-вниз большого окна, а также что сетклип не помогает(((

Ответ: Lib_font32: Графические шрифты

с исолюстрациями некоректкно расчитывает высоту текста. ПОстоянно на разных экрнаха видна часть текста. Чем меньше экран тем больше отобржается. Если не добавляю илюстрации то всё норм. ДАЖЕ В ТВОЁм примере с динозаврами глянь отображается не весь текст

Ответ: Lib_font32: Графические шрифты

Да, что-то теперь появились проблемы с форматированием текста. Нужно разобраться...

Все нормально, разобрался. Действительно, при добавлении иллюстраций часть текста внизу не отображалась.

Ответ: Lib_font32: Графические шрифты

odd большое спасибо. Еще вопрос: как мне реализовать смену шрифтов при нажатии клавиши 0? Если одиночную, т.е. с одного FOnt(0) на второй Font(1) и обратно я сделал вот так: всё работает)

Цитата:

f1: boolean;
-----------------------------------------
Font(0); f1:=false;
-------------------------------------------
if (f1) then
begin font(1); DrawTextWindow; repaint;
if getkeyclicked= KE_KEY0 then f1:=false; end;
if f1 =false then
begin Font(0); DrawTextWindow; repaint; end;
-------------------------------------------------------
if getkeyclicked = KE_KEY0 then begin f1:=NOT f1; end;

А как сделать так:
например, нажимаю на 0 шрифт меняется. Потом, уже во врмея нового шрифта если нажимаю на 0, то опять меняется на Font(2), а если еще, 3 раз нажимаю, то тогда уже меняется вновь на 1. (FOnt(0)).
Я пытался сделать так:

Цитата:

-------------------------
f1,f2:boolean;
------------------------
f1:=false; f2:=false;
-------------------------
if (f1) then
begin f2:=false; font(1); DrawTextWindow; repaint; if getkeyclicked= KE_KEY0 then f1:=false; f2:=NOT f2; end;
if f1 =false then begin f:=0; Font(0); DrawTextWindow; repaint; end;
if (f2) then
begin
font(2); f1:=false; DrawTextWindow; repaint;
if getkeyclicked= KE_KEY0 then f2:=false; f1:=false; drawtextwindow; repaint;
end;
if f2 =false then
begin ; Font(0); DrawTextWindow; repaint; end;
-----------------------------------------------------------
if getkeyclicked = KE_KEY0 then begin f1:=NOT f1; end;
-----------------------------------------------------

то не выходит ничего :( подскажите плиз . Я хочу сделать чтоб разного цвета шрифты могли быть, т.е например так
Font(0); LoadFont('Arial10'); color(255, 0, 0, 0);
Font(1); LoadFont('Arial10'); color(255, 255, 0, 0);
Font(2); LoadFont('Arial10'); color(255, 0, 0, 255);
И чтоб они менялись, как я писал выше.

Ответ: Lib_font32: Графические шрифты

Попробуй что-то типа такого:

PHP код:


		
			
var current_font: integer;
......
current_font:=0;
......
if getkeyclicked = KE_KEY0 then
begin
current_font:=current_font+1;
if current_font = 3 then current_font:=0;
Font(current_font);
DrawTextWindow;
Repaint;
Delay(200);
end;

Ответ: Lib_font32: Графические шрифты

Цитата:

Сообщение от odd (Сообщение 141678)

А картинок так и не ма в мидлете...:''((

Ответ: Lib_font32: Графические шрифты

Цитата:

Сообщение от GRAY_WOLF (Сообщение 141719)

А картинок так и не ма в мидлете...:''((

у меня есть :) :super: и причём и на телефоне, и на всех эмуляторах

Ответ: Lib_font32: Графические шрифты

Цитата:

Сообщение от GRAY_WOLF (Сообщение 141719)

А картинок так и не ма в мидлете...:''((

Пришли программу, может я разберусь. Может в самой программе дело?

Ответ: Lib_font32: Графические шрифты

Цитата:

Сообщение от odd (Сообщение 141731)

Пришли программу, может я разберусь. Может в самой программе дело?

Я компилирую прилагаемый примет только...
Все другие твои примеры идут на УРА!!!