On-line: PSP, гостей 1. Всего: 2 [подробнее..]
АвторСообщение
администратор




Пост N: 3022
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 13.04.13 17:01. Заголовок: Снова WVT


Казалось бы все верно в тексте. Но ни кодировка не работает ни картинку не показывает.
Harbour 3.2
Исходник


 
#include "hbgtinfo.ch"

proc Main()
REQUEST HB_GT_WVT
REQUEST HB_GT_WVG_DEFAULT
REQUEST HB_GT_WVG

hb_GtInfo( HB_GTI_CLOSABLE,.f.)
Hb_GtInfo( HB_GTI_RESIZABLE,.f.)


hb_gtInfo(HB_GTI_CODEPAGE, 255)
hb_gtInfo(HB_GTI_FONTNAME, 'Lucida Console')
hb_GTInfo( HB_GTI_WINTITLE, hb_oemtoansi("ТЕСТ")) // Define the title of the window from the main menu

Wvt_DrawImage( 0, 0, MaxRow(), MaxCol(), "134.jpg")
wait

RETURN NIL


hbp файл
 
-lgtwvg
-lhbwin

-workdir=obj
-otest.exe
-inc
-gtwvt

-std


test.prg



батник
 
set path=C:\MinGW\bin\
c:\hb32mingw\bin\hbmk2 test.hbp


Что ему не хватает ;) ?

Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 5 [только новые]


администратор




Пост N: 3023
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 13.04.13 18:46. Заголовок: С кодировкой разобра..


С кодировкой разобрался , не хватало ему оказывается
REQUEST HB_CODEPAGE_RU866
hb_cdpSelect( "RU866" )

А картинку по прежнему не рисует
ни так
Wvt_DrawImage( 0, 0, MaxRow(), MaxCol(), "134.jpg")
ни сяк
Wvt_DrawImage( 0, 0, MaxRow(), MaxCol(), hb_DirBase()+"134.jpg")

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 2794
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 13.04.13 19:00. Заголовок: Dima пишет: А карти..


Dima пишет:

 цитата:
А картинку по прежнему не рисует


Возьми мой пример (так и не доделанный), там есть показ картинки ...
http://files.mail.ru/DD055DB78EB4468D9BD727D135C685C5

Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 3024
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 13.04.13 22:02. Заголовок: Dima пишет: #includ..


Dima пишет:

 цитата:
#include "hbgtinfo.ch"

proc Main()
REQUEST HB_GT_WVT
REQUEST HB_GT_WVG_DEFAULT
REQUEST HB_GT_WVG

hb_GtInfo( HB_GTI_CLOSABLE,.f.)
Hb_GtInfo( HB_GTI_RESIZABLE,.f.)


hb_gtInfo(HB_GTI_CODEPAGE, 255)
hb_gtInfo(HB_GTI_FONTNAME, 'Lucida Console')
hb_GTInfo( HB_GTI_WINTITLE, hb_oemtoansi("ТЕСТ")) // Define the title of the window from the main menu

Wvt_DrawImage( 0, 0, MaxRow(), MaxCol(), "134.jpg")
wait

RETURN NIL



А не хватало ему какого либо вывода на экран и ХЗ зачем
Перед Wvt_DrawImage , добавить строку ? " " (Поседел на 2 года пока понял )

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 2795
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 14.04.13 00:58. Заголовок: Dima пишет: Перед W..


Dima пишет:

 цитата:
Перед Wvt_DrawImage , добавить строку ? " " (Поседел на 2 года пока понял )




Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 3027
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 15.04.13 10:26. Заголовок: Andrey пишет: Перед..


Andrey пишет:

 цитата:
Перед Wvt_DrawImage , добавить строку ? " "


По ходу в Xharbour добавлять строку (или CLS) не нужно , и так работает.

Спасибо: 0 
ПрофильЦитата Ответить
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 53
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет