меню во фрейме, как єто сделать? Опции

[Wait]

здавствуйте, если можете, помогите, пожалуйста..
мне нужно меню во фрейме для игры... Где-то слышал, что такое возможно... Напишите, пожалуйста модуль для этого.
Заранее благодарен

[NightPaladin]

Лично у меня получилось вот так:

Код

program asd;
Uses
   crt,graph;
var
   a,i : Integer;
begin
    a:= detect;
    i:=0;
    InitGraph(a, i, 'C:\BP\BGI');
             ClearDevice;
             SetFillStyle(5, 9);
             bar(0,0,640,480);
             SetLineStyle(4,255,red);
             rectangle(10,10,630,470);
             SetFillStyle(4, 10);
             bar(10,10,630,470);
             SetFillStyle(SolidFill,black);
             bar(220,170,450,320);
             SetFillStyle(7, 3);
             bar3D(200,150,430,300, 0, TopOn);
             OutTextXY(285,180,'Options');
             OutTextXY(282,200,'New Game');
             OutTextXY(297,220,'Exit');
             Readkey;
     CloseGraph;
end.

Внешний вид огрничен только фантазией и занием графики в TP. Я конечно сделал очень просто, но ИМХО похоже на рамку...