как вывести текст на экран в графическом режиме. - Паскаль, Turbo Pascal, PascalABC.NET

alex(21) · 21.07.2009, 12:46

как вывести текст на экран в графическом режиме.
например: на экране нарисован круг и под ним надпись "радиус равен..." (цвет текста малиновый или какой нибудь другой)

Stilet · 21.07.2009, 13:02

Цитата:

и под ним надпись

OutTextXY см. в хелпе.

Лубышев · 21.07.2009, 23:45

пишет на экране слово "привет"

Код:

var DC:HDC;
begin
  ...
  dc:=GetDC(0);
  TextOut(DC,10,10,'привет',6);
end;

alex(21) · 24.07.2009, 15:56

а как сделать так:
в нижней части экрана линия, а с верху падают какие либо фигуры(круги, линии и т.п.).
в левом верхнем углу надпись "kol-vo figur=0" которая подсчитывает количество фигур прошедших линию. после того как первая фигура пройдёт линию, надпьсь "kol-vo figur=0" меняется на "kol-vo figur=1" . после нажатия клавиши Esc программа завершает свою работу.

21.07.2009, 12:46	#1
alex(21) Форумчанин Регистрация: 09.06.2009 Сообщений: 545	как вывести текст на экран в графическом режиме. как вывести текст на экран в графическом режиме. например: на экране нарисован круг и под ним надпись "радиус равен..." (цвет текста малиновый или какой нибудь другой)

21.07.2009, 23:45	#3
Лубышев Участник клуба Регистрация: 23.07.2007 Сообщений: 1,054	пишет на экране слово "привет" Код: `var DC:HDC; begin ... dc:=GetDC(0); TextOut(DC,10,10,'привет',6); end;` Писано по д'Эльфийски Последний раз редактировалось Лубышев; 21.07.2009 в 23:48.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Как в графическом режиме вывести на экран переменную String	Doholyan	Паскаль, Turbo Pascal, PascalABC.NET	3	09.07.2009 19:29
Как вывести двумерный массив в графическом режиме паскаль?	Darkwinged	Помощь студентам	3	19.05.2009 21:04
Как вывести из текстового файла на экран русский текст?	Mischa	Помощь студентам	8	12.03.2008 06:23
Как сделать снимок экрана в графическом режиме?	Борис2	Паскаль, Turbo Pascal, PascalABC.NET	9	08.12.2007 21:07
graph - Как в графическом режиме вывести переменную?	nikleb	Паскаль, Turbo Pascal, PascalABC.NET	4	12.04.2007 21:44

24.07.2009, 15:56	#4
alex(21) Форумчанин Регистрация: 09.06.2009 Сообщений: 545	а как сделать так: в нижней части экрана линия, а с верху падают какие либо фигуры(круги, линии и т.п.). в левом верхнем углу надпись "kol-vo figur=0" которая подсчитывает количество фигур прошедших линию. после того как первая фигура пройдёт линию, надпьсь "kol-vo figur=0" меняется на "kol-vo figur=1" . после нажатия клавиши Esc программа завершает свою работу.