FiveTech Software tech support forums

... oImagem FILENAME cImagem ; SIZE 400, 600 OF ; oDlg PIXEL NO BORDER ADJUST ACTIVATE WINDOW oDlg CENTERED ; ON INIT SobreporImagem( oDlg ) Return NIL *------------------------------------------------------------------------------* Function SobreporImagem( oDlg ) Local oImagem Local cImagem := ...

SetClipboardData me devuelve NIL y por eso me falla la funcion

... la compilo da este .ppo: _HB_CLASS TFactur_1 ; function TFactur_1 ( ... ) ; STATIC s_oClass ; LOCAL nScope, oClass, oInstance ; IF s_oClass == NIL .AND. __clsLockDef( @s_oClass ) ; BEGIN SEQUENCE ; nScope := 1 ; ( ( nScope ) ) ; oClass := iif( .F.,, HBClass():new( "TFactur_1", iif( ...

... the current row" action oBrw:SelectRow( 2 ) MENUITEM "select all" action oBrw:SelectRow( 4 ) MENUITEM "Print " action NIL //PrintBrowse(oParent:cCaption,oBrw,oDbf) .... Before making the selection, I would like to check whether SetMultiSelectCol() is activated in the ...

... .... ENDMENU ACTIVATE POPUP oMenu OF oParent AT oBrw:nTop+nRow, oBrw:nLeft+nCol RETURN (NIL) and another on action Function MenuContextual(oControl,oBrw,oDbf,cIniUser,cSection,lExport,lColConfig,oParent,oCont ) .... ENDMENU return oMenu ...

... 4 ] PROMPT "4" SIZE 100,40 PIXEL OF oDlg CENTER ;      ACTION PoupExec( Self )   ACTIVATE DIALOG oDlg CENTEREDreturn nilfunction PopupObject()   local oPop   MENU oPop POPUP      MENUITEM "One"      MENUITEM "Two"   ENDMENUreturn oPopfunction ...

...  } ) If you use ::ShowPopUp, the function MenuContextual(...) should not return NIL, but should return a PopupMenu object. It looks like this function is returning NIL not a popup menu object. Please check the last line of this ...

hi Nages,
The my FWH version is 23.10 but as already posted the condition under which the space is discarded is

if nKey == 32 .and. ::nMarqueeStyle <= MARQSTYLE_HIGHLROWRC .and. oCol:hChecked .and. oCol:lEditable
...
elseif nKey == 32 .and. !::lFastEdit .and. ::oMultiSelCol != nil

TIA

... oBrw:oSortCbx:hide() oBrw:nTop:=2 oBrw:nHeight:= oBar:ntop-40 Endif for n=1 to Len(aBtn) aBtn[n]:ntop:= oBar:ntop-40 aBtn[n]:refresh() next return nil

Hi Marc To Avoid Memory leaks, within the loop I call an external function each time I read a xml file, close it and turn to nil each class instance. For every 400 files I do a HB_GcAll() and a SysRefresh(), the biggest xml file is just 29 kb Im going to put your code inside the loop, ...

I am try this: Code: aRow := oCn:QueryResult( "select field1,field2 from states where code='WA'" ) if aRow == NIL // not found, then inserts aRow := { "aa","bb" } oCn:Upsert( "states", nil, { aRow } ) endif But insert not work. Table `states` ...

... } } // color del focus oBrw:bKeyDown:={|nKey,nFlag|iif(veo(@nApu,@oBrw,aBotones,nKey),eval(aBotones[nApu,4]),NIL)} oBrw:bLDblClick := { |nRow,nCol,nKeyFlags|EditNeteo(.f.),oBrw:SetFocus(),oBrw:Refresh(.t.)} oBrw:CreateFromCode() cGrad := PadR( GradStr( BrwGrad( ...

Consulto:

Si abro un archivo con

Code: Select all  Expand view

 LOCAL hFile      := FOpen( ::cFile )
 

y luego lo cierro con

Code: Select all  Expand view

fclose(hFile)
sysrefresh()
 

y hago un fwdbg hFile, el valor de "hfile" debe ser "nil"?

porque me sigue devolvieron un valor numérico.

...  next   oPanel:aControls[ nItem ]:End()   HB_ADel( oPanel:aControls, nItem, .t. )   oPanel:Refresh()      return nil Sorry Nages, but not erase the btnbmp on Panelscroll I made //I want erase only from second column of oBrw oCol := oBrw:aCols[ 2 ] oCol:bLDClickData ...

... '+alltrim(cdetalle),'Modifico el Material '+alltrim(cDetalle)) dbcommitall() endif Materia->(dbsetorder(queor)) Materia->(DbGoTop()) return NIL *----------------------------------------------------------------------------------------------------------// //----------------------------------------------------------------------- ...