|
Вопрос # 5 647/ вопрос открыт / |
|
Здравствуйте, уважаемые эксперты!
Delphi 7. Для вывода вывода графики в режиме консольного приложения написал такой модуль (см. приложение).
Беда в том, что при движении курсора мыши наверх всплывают кнопки лежащих "ниже" окон.
Поэтому приходится фиксировать курсор, а это неудобно, если приходится что-то показывать собеседнику на экране (не пальцем же тыкать).
Подскажите, пожалуйста, как решить эту проблему.
Приложение: Переключить в обычный режим- procedure GraphInit(ScreenColor: TColor);
-
- begin
- ScreenDC := GetDC(0);
- Canvas := TCanvas.Create();
- Canvas.Handle := ScreenDC;
-
-
- BitMap := TBitMap.Create();
- BitMap.Height := Screen.Height;
- BitMap.Width := Screen.Width;
- RectScr := Rect(0, 0, Screen.Width, Screen.Height);
- BitMap.Canvas.CopyRect(RectScr, Canvas, RectScr);
- BitMap.SaveToFile('fon.bmp');
-
-
- ClipCursor(@RectCur);
-
- Canvas.Font.Size := 16;
- Canvas.TextOut(Screen.Width-120,
-
- end;
-
 |
Вопрос задал: Dod (статус: Посетитель)
Вопрос отправлен: 22 сентября 2011, 08:10
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Мини-форум пуст.
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|