FiveTech Software tech support forums

...    := 115   Local nWidth :=  Max( nRight * DLG_CHARPIX_W, 180 )   Local nHeight := nBottom * DLG_CHARPIX_H   Local oBar,oDlg   Local oBut[10]DEFINE DIALOG oDlg  ;   //OF oParent   TITLE "test"    ;   SIZE nWidth, nHeight TRANSPARENT PIXELoDlg:nStyle    := nOr( ...

Il Pulsante "Invio" a destra del Dialog oDlgb DEFINE BUTTONBAR oBar1 OF oDlgb 2013 SIZE 95,45 BOTTOM DEFINE BUTTON oBut1x OF oBar1 PROMPT " " FONT oFontb GROUP oBut1x:disable() oBut1x:nWidth = (ODLGB:nWidth-250) DEFINE BUTTON oBut OF oBar1 PROMPT "Invio" ...

... the Program errors out. Thanks in advance and best regards, Otto /* XBROWSE( oBrw ) ? EVAL( bNew ) ? lNew ? oBrw:aRow[5] */ @ 115 , 185 BUTTON oBut[3] PROMPT "Delete Record"; OF oDlg SIZE 55,15 PIXEL; WHEN EVAL(bNew) .AND. ( lNew .OR. ! oBrw:aRow[5] ); //arow[5] if .T. this field ...

Marco,

@ 2 , 1 BUTTON oBut ACTION oDlg:SetSize( 300, 500 )

Se podría hacer:

odlg:bkeydown:={|nkey| if(nkey==VK_F3 .and. oWndFromHwnd( GetFocus() ):lValid(),oBut[1]:click(),)}

lo que no entiendo cual es la razón de asignar ese codeblock al diálogo.

Please try it this way:

@ 1, 3 GET oGet VAR cTest picture "@!" valid .f.

odlg:bkeydown:={|nkey| if(nkey==VK_F3 .and. oGet:lValid(),oBut[1]:click(),)}

Sr. Antonio, código abaixo demonstra que é possível ignorar o VALID de um GET pressionando VK_F3. local oDlg, cTest := SPACE(20), oBut[2] DEFINE DIALOG oDlg TITLE "VK_F3 ignore VALID" odlg:bkeydown:={|nkey| if(nkey==VK_F3,oBut[1]:click(),)} @ 1, 3 GET cTest picture "@!" ...

... variable in a lower function - if we have function: FUNCTION One() PRIVATE abc DEFINE DIALOG oDlg @ 1,1 GET oGet VAR abc OF oDlg @ 2,1 BUTTON oBut ACTION checkit() ACTIVATE DIALOG oDlg // We are actually here and returned to the calling function!!!!!!! RETURN(NIL) FUNCTION Checkit() ? abc ...

Hello , lBuild := .F.DEFINE BUTTON oBut[2] OF oBar PROMPT "Edit" RESOURCE "edit32" ;     ACTION ( (cAlias)->(RelBuilder(oBrw,oBrwAct,aInto,@lBuild)),;      ...

... default value a unique filename , temporary is set to .T. IMPORTANT : Program must be executed from a subdirectory from SAMPLES i.e. DEFINE BUTTON oBut[1] OF oBar PROMPT "Add" FILE ".\..\..\bitmaps\32x32\plus.bmp"; // RESOURCE "add" ; Frank Demont #include 'fivewin.ch'#include ...

... is a small example. (Of course i need and i want to use BTNBMP) (EMG suggest ask you) #include "FiveWin.ch" * function Main() local oDlg,obut local pippo:= space(40) DEFINE DIALOG oDlg TITLE "TEST" from 0,0 to 250,350 pixel @10,10 SAY "leave the field empty and click non ...

... sul bottone: Ti ho anche mandato il file EXE (zippato) in mail. *************** * #include "FiveWin.ch" * function Main() local oDlg,obut local pippo:= space(40) DEFINE DIALOG oDlg TITLE "Prova" from 0,0 to 250,350 pixel @10,10 SAY "lasciare vuoto il campo e cliccare ...

... prova ad uscire cliccando su BTNBMP, VEDRAI CHE NON FA NIENTE. grazie Romeo/Zingoni #include "FiveWin.ch" * function Main() local oDlg,obut,obtn local pippo:= space(40) DEFINE DIALOG oDlg TITLE "Prova" from 0,0 to 250,350 pixel @10,10 SAY "Lasciare vuoto il campo e cliccare ...

... i want to change caption of button, the problem is that button caption is "Ok" and then i press it i am change this with oButton:cCaption:="Save" but caption is not changed. Try oButton:SetText("WhatEver") and then oButton:Refresh() You have to use oButton:cTitle( "newtitle" ...

... Hi for all ! I have a problem with Dialog and Browse coordinates .Here is the source code local oBut local oDlg local nHorRes := GetSysMetric( 0 ) local nVerRes := GetSysMetric( 1 ) // Dialog window with coordnates . DEFINE DIALOG oDlg FROM 0, ...