FiveTech Software tech support forums

... } } // color del focus // quitar barra horizontal //oBrw:lHScroll := .F. oBrw:bKeyDown:={|nKey,nFlag|iif(veo(@nApu,@oBrw,aBotones,nKey),eval(aBotones[nApu,4]),NIL)} oBrw:CreateFromCode() cGrad := PadR( GradStr( BrwGrad( oBrw ) ), 128 ) Activate ...

... amigos.. les consulto, tengo la siguiente funcionalidad en mi xbrowse: oBrw:aCols[19]:nEditType :=EDIT_GET oBrw:aCols[19]:bOnPostEdit:={|oCol,xVal,nKey,f| If(nKey==VK_RETURN,MsgStop("alerta"),)} Cuando pulso 2click sobre la columna 19 de mi browse, me aparece get de tipo memo, escribo ...

... ),; aDim[ 3 ] - aDim[ 1 ] OF oDlg ; FONT oFont COLOR nClrFore, nClrBack oGet:oFont := oBrw:oFont oGet:oGet:Picture := cPicture oGet:bKeyDown := {|nKey| If(nKey=115,; ( uVar := If(DispDesc,(DispDesc(aDArray,tRtn)),cVar),; oGet:Refresh(),oGet:SetFocus(.T.)), ; If(iHelp,If(nKey=114,(uVar:=W_21A1(uVar,WHlp), ...

... ( oBrw:aAppend := nil, oBrw:Delete(), 0 ), nil ) } END WITH OBJECT oBrw:aCols[ 1 ] :nEditType = EDIT_BUTTON :bEditBlock = { | nRow, nCol, oCol, nKey | TableLookUp( nRow, nCol, oCol, nKey, "ITEMS" ) } :bOnChange = { || oBrw:aAppend := nil, ReadItemInfo( oBrw:aRow, oBrw ), oBrw:RefreshCurrent(), ...

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:bclrSel := {|| { iif(!empty(Neteo->FechaPago),CLR_GREEN,CLR_RED),CLR_WHITE } } // 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.)} ...

METHODS: RecCount(), LastRec(), KeyCount(),RecNo(), KeyNo() GoTop(),GoBottom(),GoTo(nRec),KeyGoTo(nKey),Skip(n) FCount(),FieldPos(c),FieldName(),FieldLen(),FieldDec(),FieldType() FieldGet(),FieldPut() SetOrder(cSort,,lDescend) Save() Close() or End() --------------- NOT ...

... , ; "UM", , "Ult.Modif" ; LINES CELL font ofont ON dblCLICK ( lsavek := .t., oDlgSTK:End() ) obrw:bKeyDown = { | nKey, nCol, nFlags | iif( nKey = K_ENTER, ( lsavek := .t., oDlgSTK:End() ), ) } oBrw:nRowHeight := 35 REDEFINE BTNBMP 2007 prompt HB_UTF8CHR( 57611 ...

... the METHOD KeyChar function in TGet.prg, and when I ran the program and pressed the Ğ character while on a get field, I got the value 208 in the nKey variable as follows. METHOD KeyChar( nKey, nFlags ) CLASS TGet   local nHi, nLo   local lAccept   local bKeyAction := SetKey( nKey ...

Ok, I'll try that, thanks Antonio. Trying to implement Alt+... support:   while ! ::lEnd      nKey = InKey( 0, INKEY_ALL + HB_INKEY_GTEVENT )      if nKey >= K_ALT_Q .and. nKey <= K_ALT_M         ::oMenu:ProcessKey( __dbgAltToKey( nKey ) ) ...

Trying to implement Alt+... support:   while ! ::lEnd      nKey = InKey( 0, INKEY_ALL + HB_INKEY_GTEVENT )      if nKey >= K_ALT_Q .and. nKey <= K_ALT_M         ::oMenu:ProcessKey( __dbgAltToKey( nKey ) )        endif   It ...

... } oBrw:bRClicked := {|| Stock_Producto(.F.,oBrw, cTab_Art, cEmpresa, cTab_Art:cod_art), cTab_Art:Refresh() } oBrw:bKeyDown := { | nKey | TeclasProducto(nKey, oBrw, cTab_Art, cEmpresa) } oBrw:oFont := oFont2 oBrw:SetDolphin(cTab_Art,.T.,.T.) oBrw:aCols[1]:SetCheck( { "BOTONSI", ...

... "RApertur" ), ofld1:aDialogs[ 2 ]:update(), oRApertur:gotop(), oRApertur:update(), oRApertur:refresh() ) } oRApertur:bKeyDown := { | nKey | VeoReg(, 1, oRApertur, nkey, "RApertur" ) } redefine say oObjetivo var xObjetivo memo id 4001 of ofld1:aDialogs[ 2 ] update redefine ...

... AUTOCOLS FOOTERS LINES CELL OF oDlg oBrw:aFilter :=aDataFilter oBrw:aCols[ 3]:nEditType :=EDIT_GET oBrw:aCols[ 3]:bOnPostEdit :={|oCol,xVal,nKey| If(nKey==VK_RETURN,(COMPONENTES[oBrw:nArrayAt][ 3]:=xVal,oBrw:Refresh(),oBrw:MakeTotals()),)} oBrw:aCols[ 3]:nFooterType :=AGGR_SUM oBrw:aCols[ ...

... := .f. // quitar barra horizontal oBrw:lHScroll := .F. oBrw:aCols[ 4 ]:cDataType := "F" oBrw:aCols[ 2 ]:nWidth := 20 oBrw:bKeyDown:={|nKey,nFlag|iif(veo(@nApu,@oBrw,aBotones,nKey),eval(aBotones[nApu,4]),NIL)} oBrw:bLDblClick := { |nRow,nCol,nKeyFlags|/*EditCorrijo(.f.),*/oBrw:Refresh()} ...