Окна и клавиши Опции

[Димас]

Как например можно сделать такое окно на Турбо Паскале:



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

[volvo]

Зачем делать 2 вложенных цикла, если можно обойтись

...
Initgraph(D,M,'');
  setfillstyle(solidfill, cyan);
  bar(getmaxx div 4, getmaxy div 4, 3*(getmaxx div 4), 3*(getmaxy div 4));
  setcolor(white);
  rectangle(getmaxx div 4, getmaxy div 4, 3*(getmaxx div 4), 3*(getmaxy div 4));
...

Непонятно...