FiveTech Software tech support forums

How can I Refresh() Combobox with function Inv_Nasta2()

Tnx, Darjo

#include "FWCE.ch"

FUNCTION Main()
PRIVATE ocbNah

arrNahaja:={'1a','1b','1c'}
STORE 1 TO cIzbPe,cIzbNah

DEFINE WINDOW owInv
@ 93,0 SAY 'Main:' PIXEL
@ 108,0 COMBOBOX cIzbPe ITEMS {'001 ...

Darjo,

You may do it this way:

ACTIVATE DIALOG oDlg;
ON INIT ( oDlg:SeText( "newTitle" ),;
oDlg:nWidth( 100 ),;
oDlg:nHeight( 100 ),;
WndCenter( oDlg:hWnd ) )


A little mistake: SeText( -> SetText(
This working now.

But what about ...

Hello,

title clause should be declared in resource file, then works ok
eg:


DialogId DIALOG DISCARDABLE 0, 0, 118, 50
STYLE WS_POPUP|DS_MODALFRAME|WS_CAPTION|WS_VISIBLE
CAPTION "Dialog Title"
BEGIN
// dialog control
END


Regards
Pawel

Thank you, PawelU. I know that.
But I need to change ...

I added title to dialog...

DEFINE DIALOG oDlg RESOURCE "msgDaNe" TITLE 'BlaBla'

Without TITLE working OK

I INCLUDE only FWCE.ch now

When compile I get error:
tmp.prg(16) Error E0030 Syntax error: "parse error at 'DIALOG'"

Sorry, it doesn't work yet.
I have exactly this program:


#include "FWCE.ch"
#include "FiveWin.ch"

********************
FUNCTION Main()
********************
DEFINE WINDOW owMain TITLE 'sdsdsd'
ACTIVATE WINDOW owMain ON CLICK m_DaNe('Something...',{'Yes','No'},'Atention !!!')
return nil ...

I have this function:


#include "FWCE.ch"

************************************
FUNCTION m_DaNe(cMsg,aBtn,cTitle)
************************************
LOCAL oDlg

DEFINE DIALOG oDlg RESOURCE "msgDaNe"
REDEFINE SAY ID 3 OF oDlg PROMPT cMsg
REDEFINE BUTTON ID 1 OF oDlg PROMPT aBtn[1] ACTION oDlg:End ...

Antonio, thank you for quick answer. I installed new version. Now is better. But now is black border around picture - the shown picture is greater then original ???

regards, Darjo

When I run this program the error message shown:

Message not found
TBITMAP:DISPBEGIN
stack calls:
__ERRRT_SBASE(0)
......


#include "FWCE.ch"
function Main()
local oWnd
DEFINE WINDOW oWnd TITLE "Bmp-Res"
* @ 10, 20 BITMAP RESOURCE "users" SIZE 60, 60 && working
@ 10, 20 BITMAP filename CURDIR ...