forum.boolean.name - Очистка экрана

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

- Основной форум (http://forum.boolean.name/forumdisplay.php?f=49)

- - Очистка экрана (http://forum.boolean.name/showthread.php?t=7023)

Очистка экрана

Недавно только разобрался в обычном Pascal и Midlet Pascal и пока умею делать только простенькие программки. Другими словами я еще ламер :)
Встретился с проблемой очистки экрана. Решения этой проблемы нигде не нашел, потому я создал эту тему. Если такая тема уже соществует, то прошу скинуть мне ссылку.

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

Ну, вот пример.

Код:

program display;

var next, clicked, exit:command;

begin

        drawText ('Очистка экрана', 5, 5);

        repaint;

        next := createCommand ('Дальше', CM_SCREEN, 1);

        exit := createCommand ('Выйти', CM_EXIT, 1);

        addCommand (next);

        addCommand (exit);

        repeat 

        clicked := GetClickedCommand;

        until clicked <> emptyCommand;

        if clicked = next then 

        drawText ('Экрана очистка', 5, 5);

        repaint;

        delay (10000);

end.

Как вы видите, в конце программы "Экрана очистка" закрывает "Очистка экрана" и они сливаются. Как сделать так, чтобы "Очистка экрана" стиралась после того, как я нажму кнопку "Дальше"? Если такое возможно.

Ответ: Очистка экрана

если цвет экрана белый, то
setColor(255,255,255);
fillRect(0,0,getWidth,getHeight);
не забыть потом вернуть цвет
setColor(0,0,0);

Ответ: Очистка экрана

Т.е. эта процедура зарисует экран нужным мне цветом? Другими словами, фон?

А еще есть методы?

Ответ: Очистка экрана

А какие еще могут быть методы? Это только в бейсике есть CLS (очистка экрана). Ну разве что можно еще рисовать фоновую картинку поверх экрана.

Ответ: Очистка экрана

Ладно, буду знать. Спасибо.

Ответ: Очистка экрана

Насколько знаю cls и в паскале есть) Ну по крайней мере в Turbo Pascale 7.0 точно была)))

Ответ: Очистка экрана

в турбо паскале:
1)она была частью библиотеки к паскалю
2)cls заливала фон черным цветом

Ответ: Очистка экрана

В МР2.02 очистка идет так

PHP код:




procedure Cls; // Очистка экрана 
begin 
 SetColor(255,255,255); FillRect(0,0,GetWidth,GetHeight); 
 end;

В нужном месте вызываешь Cls; вот и вся очистка дисплея.