Платные хостинги     Раскрутка сайта     Книги по программированию

Создание курсора, Как в SVGA создать мышиную стрелку?

- Насколько я тебя понял, думаю это тебе подойдет:var r:registers; gr,gm:integer;procedure reset(var ok:boolean; var button:byte);begin r.ax:=$00; intr($33,r); ok:=odd(r.ax); button:=r.bxend;procedure show;begin r.ax:=$01; intr($33,r);end;procedure hide;begin r.ax:=$02; intr($33,r);end;procedure init;begin initgraph(gr,gm,'');end;begin clrscr; init; show; repeat until keypressed; hide; closegraph;end.

- можно еще самому нарисовать и отслеживать по координатам. Заморочистто, но дает ряд преимуществ.

Интернет казино     Онлайн игры     Увеличение члена     Купить DVD