VALID Clause For WINDOW

[GWard]

Antonio,

I am getting a "parse error at WINDOW" if I include the VALID clause.

I have a WINDOW/MENU interface that requires validation before I close the WINDOW

How may I prevent exit from a WINDOW.

[Antonio Linares]

GWard,

VALID is currently available just for dialogboxes, not for windows.

[GWard]

GWard,

VALID is currently available just for dialogboxes, not for windows.

Antonio,

Any idea how long until implementation?

I have a WINDOW with a data BROWSE that receives tags to various records.

Before the user leaves the screen they are required to either clear or write the selection away to an order.

If they click OK and there are unprocessed tags I need to intercept.

I have used a WINDOW due to the extra screen space I require and a very comprehensive MENU.

[Antonio Linares]

GWard,

We can not say when we may get it. In the meantime you may use a dialog if you need a VALID for it.

[Otto]

Hello Antonio,

when will be VALID ready for WINDOWS?

If I change to DIALOG SIZE is not the same as on WINDOWS.

Regards
Otto

[Antonio Linares]

Otto,

We can not say a date. We will offer it as soon as possible.

[Raymond Fischbach]

Hello Antonio,

Any idea on when this feature will be available in windows?
A question of days, weeks, months?

If it takes too long, is it possible to implement the "NOSYSMENU" style?
Or to disable the "X"?

Many thanks,
Raymond

[Maurizio]

This is a sample for disable "X"




#include "FWCE.ch"

#DEFINE TRUE .T.
#DEFINE FALSE .F.

#define SHFS_SHOWTASKBAR 1 // 0x0001
#define SHFS_HIDETASKBAR 2 // 0x0002 //2
#define SHFS_SHOWSIPBUTTON 4 // 0x0004
#define SHFS_HIDESIPBUTTON 8 // 0x0008 //8
#define SHFS_SHOWSTARTICON 16 // 0x0010
#define SHFS_HIDESTARTICON 20 // 0x0020 //32


//----------------------------------------------------------------------------//
function Main()

Local oSay ,oBmp ,oWnd
DEFINE WINDOW oWnd //TITLE "Risto 2000"

@ 14.6,28.5 BUTTON oBmp PROMPT "EXIT" ;
ACTION oWnd:End() SIZE 60, 20

@ 0, 0 BTNBMP FILE CurDir() + "\RistoCe.bmp" SIZE 240,320

ShFullScreen(oWnd:hwnd,SHFS_HIDESTARTICON )
ShFullScreen(oWnd:hwnd,SHFS_HIDETASKBAR )
ShFullScreen(oWnd:hwnd,SHFS_HIDESIPBUTTON )

ACTIVATE WINDOW oWnd ON INIT MoveWindow(oWnd:hWnd,0,0,240,320)

return .T.

[Raymond Fischbach]

Thank you Maurizio,