Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=90008&view=findpost&p=2932338 Mon, 11 Jul 2011 08:16:48 +0000 Вопрос - Ответ https://forum.sources.ru/index.php?showtopic=90008&view=findpost&p=2932338 Цитата alexsa @
Может быть кто-нибудь знает как заставить Паскаль (не Лазарус) отображать русские буквы. Хотел ради интереса поработать просто в Паскале - вместо русских букв разные символы.

Ответ зависит от того о каком компиляторе идёт речь и о какой ОС. А, вообще, следовало начать с поиска по форуму.]]> Romtek Все языки: Статьи, заготовки в FAQ https://forum.sources.ru/index.php?showtopic=90008&view=findpost&p=2932168 Mon, 11 Jul 2011 05:00:46 +0000 Вопрос - Ответ https://forum.sources.ru/index.php?showtopic=90008&view=findpost&p=2932168 alexsa Все языки: Статьи, заготовки в FAQ https://forum.sources.ru/index.php?showtopic=90008&view=findpost&p=763502 Thu, 30 Jun 2005 09:00:26 +0000 Вопрос - Ответ https://forum.sources.ru/index.php?showtopic=90008&view=findpost&p=763502 Вопрос:
Как сделать так, чтобы когда я вводил выражение от x, программа вычисляла бы её значения в определённых точках?

Ответ:
Скачайте модуль FParser отсюда: Парсер мат. выражения]]> Romtek Все языки: Статьи, заготовки в FAQ https://forum.sources.ru/index.php?showtopic=90008&view=findpost&p=756589 Wed, 22 Jun 2005 20:37:29 +0000 Вопрос - Ответ https://forum.sources.ru/index.php?showtopic=90008&view=findpost&p=756589 Вопрос:
Почему при работе с модулем Crt вылетает с ошибкой "Error 200: division by zero"?

Ответ:
Надо заменить файл TURBOTPL.zip (30.47 кб) - устраняется ошибка на компьютерах свыше 200 MHz.]]> Romtek Все языки: Статьи, заготовки в FAQ https://forum.sources.ru/index.php?showtopic=90008&view=findpost&p=736066 Thu, 02 Jun 2005 08:19:22 +0000 Вопрос - Ответ https://forum.sources.ru/index.php?showtopic=90008&view=findpost&p=736066 Вопрос:
Сообщить сколько раз встречаются в тексте каждая русская гласная буква. Какой самый легкий и правильный алгоритм?

Ответ:
Нужно объявить массив
    var arr: array[char] of integer;

и проходя по тексту посимвольно подсчитать частоту каждой буквы в тексте:
    for i := 1 to length(s) do inc(arr[s[i]]);

в результате мы получим информацию обо всех символах текста, и останется выделить только то, что нужно.]]> Romtek Все языки: Статьи, заготовки в FAQ https://forum.sources.ru/index.php?showtopic=90008&view=findpost&p=710513 Mon, 09 May 2005 17:27:13 +0000 Вопрос - Ответ https://forum.sources.ru/index.php?showtopic=90008&view=findpost&p=710513 Вопрос:
Как в граф. режиме при смене видеостраниц сделать чтобы мышь не мерцала

Ответ:
Перед сменой любых режимов графики и, вообще, графики, нужно скрыть курсор мыши и после смены его снова показать.
Вопрос:
Как выполнить действия над большими числами?

Ответ:
FAQ: Длинная арифметика - решение математики]]> Romtek Все языки: Статьи, заготовки в FAQ https://forum.sources.ru/index.php?showtopic=90008&view=findpost&p=672060 Tue, 05 Apr 2005 19:45:31 +0000 Вопрос - Ответ https://forum.sources.ru/index.php?showtopic=90008&view=findpost&p=672060 Форма такая:
Вопрос:
Почему Vesa под XP не работает?
Ответ:
NT-ядро не дает напрямую обращаться к любому оборудованию. Выход из положения - перейти на компилятор ТМТ Pascal, в котором поддерживаются все режимы графики.
Вопрос:
GetImage и PutImage действуют медленно. Как можно осуществить процесс анимации без мерцания?
Ответ:
Нужно использовать видеостраницы. Используется в анимации: сначала рисовать в памяти (в неактивной странице), а по окончанию отрисовки переключить страницу на активную (отображаемую), тогда анимация будет без мерцания. Подробности в Видеостраница
Вопрос:
Как скопировать изображение,которое нарисовано в Паскале с помощью Graph'a, если с помощью PrintScreen'a не получается.
А то график не могу в буфер скопировать или в файл. Подскажите пожалуйста.Заранее спасибо.
Ответ:
Вот модуль для сохранения и загрузки в PCX формат: скачать


Добавлено
тег [ HR ] (без пробелов) вставляет разделяющую линию, как у меня в сообщении.
]]> Romtek Все языки: Статьи, заготовки в FAQ