Отправлено: 03.12.10 19:32. Заголовок: Bitmap на MDI окне - HWGui

Возникает только на доли секунды, потом заменяется противным серым фоном. Неужели никто не сталкивался с этой проблемой?

 Отправлено: 05.12.10 19:41. Заголовок: Не сталкивался. Жела..

Не сталкивался. Желательно пример приводить. Вот тестовый пример выводящий битмап в МДИ

цитата:

#include "hwgui.ch" function Main Local oMainWindow INIT WINDOW oMainWindow MDI TITLE "Test MDI BMP" MENU OF oMainWindow MENU TITLE "&File" MENUITEM "&New" ACTION CreateMDIWindow() SEPARATOR MENUITEM "&Exit" ACTION EndWindow() ENDMENU ENDMENU oMainWindow:Activate() Return nil Function CreateMDIWindow Local oChildWnd INIT WINDOW oChildWnd MDICHILD TITLE "Test BMP" STYLE WS_VISIBLE + WS_OVERLAPPEDWINDOW @ 15,10 BITMAP ".\mybmp.bmp" oChildWnd:Activate() Return Nil

Работает.

 Отправлено: 06.12.10 06:55. Заголовок: Я пытаюсь поместить ..

Я пытаюсь поместить битмар (логотип) на главном окне
Если Ваш пример изменить, это будет выглядеть так :

-----------------------------

#include "hwgui.ch"

function Main
Local oMainWindow
INIT WINDOW oMainWindow MDI TITLE "Test MDI BMP"

MENU OF oMainWindow
MENU TITLE "&File"
MENUITEM "&New" ACTION CreateMDIWindow()
SEPARATOR
MENUITEM "&Exit" ACTION EndWindow()
ENDMENU
ENDMENU
oMainWindow:Activate()
@ 15,10 BITMAP ".\mybmp.bmp"
Return nil

Function CreateMDIWindow
Local oChildWnd

INIT WINDOW oChildWnd MDICHILD TITLE "Test BMP" STYLE WS_VISIBLE + WS_OVERLAPPEDWINDOW

oChildWnd:Activate()

Return Nil

 Отправлено: 06.12.10 06:57. Заголовок: ПС строчку @ 15,..

ПС

строчку

@ 15,10 BITMAP ".\mybmp.bmp"
нужно читать конечно перед

oMainWindow:Activate()

 Отправлено: 06.12.10 13:56. Заголовок: Я бы пользовался сво..

Я бы пользовался свойством окна BACKGROUND для этого. Типа

цитата:

INIT WINDOW oMainWindow MDI TITLE "Test MDI BMP"; BACKGROUND BITMAP HBitmap():AddFile('hwgui.jpg')

Как-то так.. Хотя на мой вкус лучше показывать сплеш с логотипом, чем все время маячить картинкой перед глазами юзера
П.С.
а битмап лучше выводить как объект , то есть в первом примере

цитата:

oBmp := HBitmap() @ 15,10 BITMAP oBmp SHOW ".\hwgui.jpg"

Как-то так...

 Отправлено: 06.12.10 17:26. Заголовок: Спасибо, но битмапа ..

Спасибо, но битмапа никакого я все равно не вижу...

 Отправлено: 06.12.10 21:56. Заголовок: Вот пример, bmp лежи..

Вот пример, bmp лежит рядом, все работает и показывает (работаю с Harbour).

#include "windows.ch"
#include "guilib.ch"

static aChilds := {}

function Main()
Local oMainWindow

INIT WINDOW oMainWindow MAIN TITLE "HwGui - Child Windows Example"

MENU OF oMainWindow
MENUITEM "&Exit" ACTION EndWindow()
ENDMENU

@10,10 bitmap "ok.bmp"
ACTIVATE WINDOW oMainWindow

return (NIL)

 Отправлено: 06.12.10 22:48. Заголовок: АлексMyr, в этом при..

АлексMyr, в этом примере главное окон не задано как МДИ, поэтому и работает

 Отправлено: 06.12.10 23:42. Заголовок: Да, действительно не..

Да, действительно не работает.

 Отправлено: 07.12.10 11:52. Заголовок: Спасибо, но битмапа..

цитата:

Спасибо, но битмапа никакого я все равно не вижу...

Удивительное рядом .. Но оно запрещено

цитата:

#include "windows.ch" #include "guilib.ch" function Main() Local oMainWindow INIT WINDOW oMainWindow MDI TITLE "Test MDI BMP"; BACKGROUND BITMAP HBitmap():AddFile('hwgui.jpg') MENU OF oMainWindow MENUITEM "&Exit" ACTION EndWindow() ENDMENU ACTIVATE WINDOW oMainWindow return nil

Не надо выводить битмап дополнительно. Просто указать в свойствах окна как BACKGROUND
А вывод в главное окно МДИ приведет к глюкам. Так МДИ устроен . Больше у меня вариантов нет.

 Отправлено: 07.12.10 19:51. Заголовок: Yury, Этот пример ..

Yury,

Этот пример у меня тоже не работает.

 Отправлено: 08.12.10 00:32. Заголовок: #include "window..

#include "windows.ch"
#include "guilib.ch"

function Main()
Local oMainWindow

INIT WINDOW oMainWindow MDI TITLE "Test MDI BMP";
BACKGROUND BITMAP HBitmap():AddFile('setup.jpg')


MENU OF oMainWindow
MENUITEM "&Exit" ACTION EndWindow()
ENDMENU

ACTIVATE WINDOW oMainWindow

return nil

Результат:

 Отправлено: 08.12.10 21:34. Заголовок: AlexMyr пишет: Резу..

AlexMyr пишет:

цитата:

Результат:

У меня такой пример не работает. Очень странно. Может проблема в версиях?

Я имею :

xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 6733)
Copyright 1999-2010, http://www.xharbour.org<\/u><\/a> http://www.harbour-project.org/<\/u><\/a>
и

#define HWG_VERSION "2.17"

А какие у Вас?

 Отправлено: 10.12.10 00:07. Заголовок: Harbour 2.1.0beta2 (..

Harbour 2.1.0beta2 (Rev. 15840)
Copyright (c) 1999-2010, http://harbour-project.org/<\/u><\/a>

Harbour Build Info
---------------------------
Version: Harbour 2.1.0beta2 (Rev. 15840)
Compiler: MinGW GNU C 4.5 (32-bit)
Platform: Windows Vista 6.0.6002 Service Pack 2
PCode version: 0.3
ChangeLog last entry: 2010-11-18 20:15 UTC+0200 Mindaugas Kavaliauskas (dbtopas/
at/dbtopas.lt)
ChangeLog ID: ChangeLog 15840 2010-11-18 18:16:09Z snaiperis
Built on: Nov 18 2010 21:02:20
Build options: (Clipper 5.3b) (Clipper 5.x undoc) (UNICODE)


hwgui
* $Id: Changelog,v 1.1328 2010/12/04 13:35:44 druzus Exp $