Как расположить слово по диагонали

[alex_fcsm]

OutTextXY - из модуля Graph и выводит строку в координаты x y

[Wi1D]

Товарищи прогроммисты!как можно вывести в центре окошка,причем размер окошка должен быть таким каким его ввел пользователь(умный!т.е возможный размер)
Размер окошка Dos В PASCAL 80 на 25

[Wi1D]

ничего не понимаю тогда!((( как так тогда вывести именно там слово ПРивет

[5naip]

Program example;
Uses
Crt, Graph;
Const
Grpath = 'd:\bp\bgi';{замените на ваш путь}
privet:array[0..5] of char = ('p','r','i','v','e','t');
Var
gp,gm: integer;
j,i:integer;
space:string;

Begin
gp:=detect;
InitGraph(gp, gm, Grpath);
setfillstyle(1,red);
bar(200, 100, 400, 300);
outtextxy(215,115,'p');
outtextxy(245,145,'r');
outtextxy(275,175,'i');
outtextxy(305,205,'v');
outtextxy(335,235,'e');
outtextxy(365,265,'t');
readln;
CloseGraph;
End.

что-то долго я творил
уже все порешали,походу...я первый раз в графике в паскале...пока мануал покурил..

[Wi1D]

Я смог в центре разместить окошко...
а как теперь сделать чтобы оно было красненькое а все остальное черное?
TextBackground(RED); это не помогает

[alex_fcsm]

TextColor. А вообще почитайте справку

[Wi1D]

я же говорю не помогает ни TextColor ни TextBackground

[alex_fcsm]

TextColor - меняет цвет выводимого на экран текста

[Wi1D]

Сообщение от alex_fcsm

TextColor - меняет цвет выводимого на экран текста

да ты прав..НО меняет цвет ТЕКСТА!!!...а надо чтобы это окошко которое window(x1,y1,x2,y2) было КРАСНОГО ЦВЕТА!

[alex_fcsm]

Почитайте тут