Замена стандартных цифр

@97mik · Регистрация: 08.04.2009

Author24 — интернет-сервис помощи студентам

Как сделать чтобы например имея число 938 в Image1 писалось это число с помощью битмапов цифр загруженных ранее?

@NIKOLAYY · 15.02.2014, 00:28

Сообщение от 97mik

писалось это число с помощью битмапов цифр загруженных ранее

Битмап- это bmp картинка, можно ее загрузить заранее в память, но в конечном итоге это будет тоже самое.
Делай условие, если в переменной у тебя число 938, то в имагу ты загружаеш заранее подготовленую картинку с этими числами:

Delphi

var
s: Integer;
begin
  s:= 938;
  if s = 938 then
  Image1.Picture.LoadFromFile('938.bmp');
end;

А в саму имагу цифры можно так написать:

Delphi

1	Image1.Canvas.TextOut(10, 10, '938');

@cotseec · 15.02.2014, 00:31

Сообщение от NIKOLAYY

тебя число 938

а если ряд чисел от одно до ста, то сто картинок?
сделать 10 картинок с цифрами от 0 до 9, разбивать число на цифры и выводить картинки с цифрами или подобрать какой-нибудь шрифт посимпатичнее и использовать его для вывода чисел, например такой

@NIKOLAYY · 15.02.2014, 00:41

Все верно, а еще наверное даже лучше не 10 картинок, а одну картинку сделать и путем неких расчетов, взависимости от условия, копировать нужную область с этой картинки и вставлять в какую нибудь область канвы.

@NIKOLAYY · 15.02.2014, 00:43

Не по теме:

Опоздал я с картинкой ))

@cotseec · 15.02.2014, 00:51

одна картинка на все цифры подойдет если цифры отрисованы моноширинным шрифтом (каждая цифра занимает одинаковый прямоугольник)

@Роман_111 · 15.02.2014, 01:03

Вопрос супер, меня тоже это интересует.
Хорошо если из знающих людей привел кто-нибудь пример с использование спрайтов(хорошая заметка).
Например: имеем 1 спрайт содержащий цифры, русский и английский шрифт и привел пример с выводом цифр и шрифта через спрайт, очень классный урок получился бы.

@NIKOLAYY · 15.02.2014, 01:15

Сообщение от cotseec

одна картинка на все цифры подойдет если цифры отрисованы моноширинным шрифтом (каждая цифра занимает одинаковый прямоугольник)

Я читал- есть какие то такие шрифты в системе имеющие одинаковые расстояния между символами, тока непомню их названия.
А может он свой какой-нибудь более интересный шрифт придумает-нарисует.

@cotseec · 15.02.2014, 01:21

Сообщение от NIKOLAYY

тока непомню их названия

семейство Моноширинных шрифтов, о них я упоминал

Сообщение от NIKOLAYY

более интересный шрифт придумает

можно поискать
раз два три и т.д.

@NIKOLAYY · 15.02.2014, 01:22

Я когда- то нарезку изображений в цикле делал вот в этой теме:

Части изображений

Плохо что нарезать приходилось по двум осям, по X и Y, если сделать по одной оси - то проще координаты нарезки высчитать.

15.02.2014, 01:46

Сообщение от Роман_111

очень классный урок получился бы

OpenGL устроит? Хотя идею уроков можно перенести куда угодно.

Добавлено через 22 минуты

Сообщение от cotseec

если цифры отрисованы моноширинным шрифтом

Можно и не моноширинный, но тогда потребуется таблица ширины каждого символа. Для текстовой информации такой подход удобнее, смотрится аккуратнее.

@97mik · 17.02.2014, 16:39 **[ТС]**

А ещё такая идея: в памяти уже есть каким либо образом битмапы чисел, и надо просто вставить этот битмап в битмап Image1 в определённую позицию, как это сделать?

@NIKOLAYY · 17.02.2014, 20:13

Грузиш битмапку в память а дальше x- по горизонтали, y- по вертикали:

Delphi

1	Image1.Canvas.Draw(x, y, Image2.Picture.Bitmap);

@97mik 12 / 12 / 5 Регистрация: 08.04.2009 Сообщений: 879
	17.02.2014, 16:39 [ТС]	12
	А ещё такая идея: в памяти уже есть каким либо образом битмапы чисел, и надо просто вставить этот битмап в битмап Image1 в определённую позицию, как это сделать? 0

@97mik 12 / 12 / 5 Регистрация: 08.04.2009 Сообщений: 879
		1
	Замена стандартных цифр 13.02.2014, 17:09. Показов 762. Ответов 12 Метки нет (Все метки) Как сделать чтобы например имея число 938 в Image1 писалось это число с помощью битмапов цифр загруженных ранее? 0

@cotseec Пишу на Delphi...иногда 1423 / 1278 / 286 Регистрация: 03.12.2012 Сообщений: 3,914 Записей в блоге: 5
	15.02.2014, 00:31	3
	Сообщение от NIKOLAYY тебя число 938 а если ряд чисел от одно до ста, то сто картинок? сделать 10 картинок с цифрами от 0 до 9, разбивать число на цифры и выводить картинки с цифрами или подобрать какой-нибудь шрифт посимпатичнее и использовать его для вывода чисел, например такой 0

@NIKOLAYY 843 / 738 / 342 Регистрация: 22.09.2012 Сообщений: 5,034
	15.02.2014, 00:41	4
	Все верно, а еще наверное даже лучше не 10 картинок, а одну картинку сделать и путем неких расчетов, взависимости от условия, копировать нужную область с этой картинки и вставлять в какую нибудь область канвы. Изображения 0

@NIKOLAYY
	15.02.2014, 00:43 #5
	Не по теме: Опоздал я с картинкой )) 0

@cotseec Пишу на Delphi...иногда 1423 / 1278 / 286 Регистрация: 03.12.2012 Сообщений: 3,914 Записей в блоге: 5
	15.02.2014, 00:51	6
	одна картинка на все цифры подойдет если цифры отрисованы моноширинным шрифтом (каждая цифра занимает одинаковый прямоугольник) 0

@Роман_111 0 / 0 / 0 Регистрация: 15.02.2014 Сообщений: 19
	15.02.2014, 01:03	7
	Вопрос супер, меня тоже это интересует. Хорошо если из знающих людей привел кто-нибудь пример с использование спрайтов(хорошая заметка). Например: имеем 1 спрайт содержащий цифры, русский и английский шрифт и привел пример с выводом цифр и шрифта через спрайт, очень классный урок получился бы. 0

@NIKOLAYY 843 / 738 / 342 Регистрация: 22.09.2012 Сообщений: 5,034
	15.02.2014, 01:15	8
	Сообщение от cotseec одна картинка на все цифры подойдет если цифры отрисованы моноширинным шрифтом (каждая цифра занимает одинаковый прямоугольник) Я читал- есть какие то такие шрифты в системе имеющие одинаковые расстояния между символами, тока непомню их названия. А может он свой какой-нибудь более интересный шрифт придумает-нарисует. 0

@cotseec Пишу на Delphi...иногда 1423 / 1278 / 286 Регистрация: 03.12.2012 Сообщений: 3,914 Записей в блоге: 5
	15.02.2014, 01:21	9
	Сообщение от NIKOLAYY тока непомню их названия семейство Моноширинных шрифтов, о них я упоминал Сообщение от NIKOLAYY более интересный шрифт придумает можно поискать раз два три и т.д. 1

@NIKOLAYY 843 / 738 / 342 Регистрация: 22.09.2012 Сообщений: 5,034
	15.02.2014, 01:22	10
	Я когда- то нарезку изображений в цикле делал вот в этой теме: Части изображений Плохо что нарезать приходилось по двум осям, по X и Y, если сделать по одной оси - то проще координаты нарезки высчитать. 0

angstrom
	15.02.2014, 01:46	11
	Сообщение от Роман_111 очень классный урок получился бы OpenGL устроит? Хотя идею уроков можно перенести куда угодно. Добавлено через 22 минуты Сообщение от cotseec если цифры отрисованы моноширинным шрифтом Можно и не моноширинный, но тогда потребуется таблица ширины каждого символа. Для текстовой информации такой подход удобнее, смотрится аккуратнее.

	17.02.2014, 20:13