Извините, ничего не найдено.

Не расстраивайся! Лучше выпей чайку!
Регистрация
Справка
Календарь

Вернуться   forum.boolean.name > Поиск по форуму

Показано с 1 по 6 из 6.
На поиск затрачено 0.01 сек.
Поиск: Сообщения от: ar4angel
Раздел: Основной форум 08.09.2007, 20:20
Ответов: 16
Просмотров: 12,903
Автор ar4angel
Re: Отрисовка

Тоже моё изобретение...
У меня практически никакого опыта в программировании, поэтому не знаю как вывести на дисплей Integer.
Если оставить только: drawText(a,0, 0);
- MP ругается: "error on...
Раздел: Основной форум 08.09.2007, 19:59
Ответов: 16
Просмотров: 12,903
Автор ar4angel
Re: Отрисовка

В общем, вот чего изобрёл:
program test;
var
a:integer;
begin
for a:=1 to 10 do
begin
setColor(0,0,0);
drawText(''+a,0, 0);
repaint;
Раздел: Основной форум 08.09.2007, 19:45
Ответов: 16
Просмотров: 12,903
Автор ar4angel
Re: Отрисовка

Пишу пробел - ноль эффекта, почему-то...
program test;
var
a:integer;
begin
for a:=1 to 10 do
begin
drawText(' ',0, 0);
drawText(''+a,0, 0);
repaint;
Раздел: Основной форум 08.09.2007, 18:20
Ответов: 16
Просмотров: 12,903
Автор ar4angel
Re: Отрисовка

Не, ребят, вы меня не понимаете...
Гляньте на мой пример. Мне нужно, чтобы вместо "1", появиласть "2", затем "3" и т.д. на одном и том же месте.
Т.е. перед отрисовкой следующего числа нужно очистить...
Раздел: Основной форум 08.09.2007, 14:01
Ответов: 16
Просмотров: 12,903
Автор ar4angel
Re: Отрисовка

А если нужно отрисовывать текст именно в одной и той же области?
Как можно очистить экран перед повторной отрисовкой?
Раздел: Основной форум 08.09.2007, 12:56
Ответов: 16
Просмотров: 12,903
Автор ar4angel
Отрисовка

День добрый!

Такой вопрос:
program test;
var
a:integer;
begin
for a:=1 to 10 do
begin
drawText(''+a, 0, 0);
Показано с 1 по 6 из 6.

 

Часовой пояс GMT +4, время: 10:34.


vBulletin® Version 3.6.5.
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Перевод: zCarot
Style crйe par Allan - vBulletin-Ressources.com