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(1)
REDEFINE BUTTON ID 2 OF oDlg PROMPT aBtn[2] ACTION oDlg:End(2)
ACTIVATE DIALOG oDlg
RETURN (oDlg:nResult)

1. how can I use (start) debuger ?
2. how can I change the caption (title) and background color of DIALOG ?
3. how can I change the background color of REDEFINE SAY
4. it is posible to redefine the size (width,height) of DIALOG after (before) it's activated ?

Thank you!

remecd wrote: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(1)
REDEFINE BUTTON ID 2 OF oDlg PROMPT aBtn[2] ACTION oDlg:End(2)
ACTIVATE DIALOG oDlg
RETURN (oDlg:nResult)



1. how can I use (start) debuger ?
2. how can I change the caption (title) and background color of DIALOG ?
3. how can I change the background color of REDEFINE SAY
4. it is posible to redefine the size (width,height) of DIALOG after (before) it's activated ?


Thank you!

1. Debugger : i don't know maybe Antonio can answer this one.

2 . Caption and color

DEFINE DIALOG oDlg RESOURCE "msgDaNe" title "xxxxx" color clr1,clr2

Clr1 and clr2 can be nrgb(.....) or CLR_WHITE, CLR_BLUE etc...

3. Same for Redefine say just add color xx,xx at the end

4. You can always change dialog size at activation time. Use the on init clause for this

ACTIVATE DIALOG ODLG ON INIT odlg:move(xx,xx) or anyother function



Richard

> 1. Debugger : i don't know maybe Antonio can answer this one.

Windows for Pocket PC doesn't have a console window (text mode), so we can't use Harbour's own debugger.

We do recommend to use MsgInfo() calls to trace certain values, set breakpoints, etc.

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

---

FUNCTION m_DaNe(cMsg,aBtn,cTitle)

---

LOCAL oDlg

DEFINE DIALOG oDlg RESOURCE "msgDaNe" TITLE 'BlaBla'
REDEFINE SAY ID 3 OF oDlg PROMPT cMsg
REDEFINE BUTTON ID 1 OF oDlg PROMPT aBtn[1] ACTION oDlg:End(1)
REDEFINE BUTTON ID 2 OF oDlg PROMPT aBtn[2] ACTION oDlg:End(2)
ACTIVATE DIALOG oDlg
RETURN (oDlg:nResult)

If I don't INCLUDE "FiveWin.ch", compiler shown error in "DEFINE DIALOG" row.
If I INCLUDE "FiveWin.ch", then when I start exe, error shows:

Message not found.
TWINDOW:BMOVED

One stupid question: which INCLUDE file is for programing in PPC - I'm beginner in PPC

Thank you, Richard & Antonio

include "Fwce.ch"

of course.

EMG

include "Fwce.ch" should be enough to compile your PRG without errors.

Please try it and it you still get an error please tell us on what line you get the error.

I INCLUDE only FWCE.ch now

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

The following sample compiles fine for me:



EMG

I added title to dialog...

DEFINE DIALOG oDlg RESOURCE "msgDaNe" TITLE 'BlaBla'

Without TITLE working OK

Ok, I confirm the problem.

EMG

Hello,

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



Regards
Pawel

It should work from code only.

EMG

pawelu wrote:Hello,

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

Code: Select all Collapse

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 caption, backcolor and size of dialog later in my code, not in .RC file.


I need a modal window with caption, backcolor and size(width,height). All this parameters are declared and known before I build the window. Is this possible in PPC?

Regards, Darjo

Darjo,

You may do it this way:

Antonio Linares wrote:Darjo,

You may do it this way:

Code: Select all Collapse

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 BACKGROUND color of DIALOG ?

In which help file can i find all propertis and method for classes?
I look in FiveWinClass but the most number does't work (or i don't know how to use them ???).

Darjo