ГрафРедактор

[NSvirus]

Привет, кому не лень протестируйте прогу.

Что делает:

Рисует круг: клавиша- q
Рисует прямоугольник:клавиша - w
Рисует прямую: - клавиша -e
Вставляет текст: клавиша t
**Символы текста можно удалять - backspace

Движение осуществляется стрелками, выход - цифра 2.
увеличить или уменьшить скорость: + и - соответственно.

После выхода создается в Папке с программой файл "Arisynok.pas",
в нем находится код вашего рисунка, который можно скомпилировать
с помощью того же pascal.

ах да, еще: в архиве есть файл шрифта. Если этот файл не будет присутствовать в папке с компилятором, то шрифт будет некоректен.

Спасибо)

[OCTAGRAM]

Программа не делает CloseGraph после выхода (и генерируемой программы это тоже касается).

InstallUserFont('Litt') — это лишнее. Litt — это один из стандартных шрифтов:



SmallFont у него идентификатор.

Начальное положение курсора, наверное, лучше ставить в центр экрана, а то поначалу не очень понятно, что и как.

[NSvirus]

Странно, никогда не пользовался closegraph. Это так важно?
Все остальное работает?
Спасибо, это демо))

[OCTAGRAM]

Ну блин программа завершилась, делаю dir, чтобы посмотреть, что за файл она создала, а там не понять ничего. DOS в текстовый режим сам не возвращается. Частично текстовые функции в графическом режиме работают, но не все.