Форум » [x]Harbour » Потерялся я ))) » Ответить

Потерялся я )))

Dima: Юзаю (X)Harbour редко и что то не пойму одну вещь ;) Ну запустил я задачу (WVT терминал). Как по простому сделать это окно на весь экран ? Ну допустим разрешение на экране 1024 на 768 , как сделать окно с таким же размером ? PS Старею , склероз ;)

Ответов - 3

Andrey: Dima пишет: Как по простому сделать это окно на весь экран ? Ну допустим разрешение на экране 1024 на 768 , как сделать окно с таким же размером ? По простому можно как у в демо-примере. При инициализации терминала выставить шрифт. nWidth := Wvt_GetScreenWidth() DO CASE CASE nWidth >= 1024 Wvt_SetFont( 'Terminal', 18, 10 ) CASE nWidth >= 800 Wvt_SetFont( 'System', 16, - 8 ) OTHERWISE Wvt_SetFont( 'Terminal', 12, 6 ) ENDCASE Скачай исходник с http://clipper.borda.ru/?1-3-0-00000224-000-0-0-1350559419 Описание этого исходника в теме: Переход на версию xHarbour 1.2 + GTWVT-терминал ?

Andrey: Dima пишет: Старею , склероз ;) Не ты один... И я себя уже на этой мысли ловлю....

gustow: Этак дело пойдет - так скоро уже мемом будет: "Старею, склероз... пора переходить на Harbour..." :)) (извиняюсь за оффтоп)




полная версия страницы