FiveTech Software tech support forums

I have oApp():oGrid:bKeyDown := {|nKey| PrTecla(nKey,oApp():oGrid,oCont,oApp():oDlg) } function PrTecla(nKey,oGrid,oCont,oDlg)Do case   case nKey==VK_RETURN      PrEdita(oGrid,2,oCont,oDlg)  ...

... "CUSTOMER" AUTOCOLS ; CELL LINES NOBORDER FASTEDIT is there another method because I have another configuration please : oApp():oGrid := TXBrowse():New( oApp():oDlg ) oApp():oGrid:nTop := 00 oApp():oGrid:nLeft := nSplit+2 oApp():oGrid:nBottom := 200 oApp():oGrid:nRight := 400

... }, i18n("Da mese"),80, },; { { || Mese(val(CE->STAG2)) }, i18n("A mese"),80, }} FOR i := 1 TO Len(aBrowse) oCol := oApp():oGrid:AddCol() oCol:bEditValue := aBrowse[ i, 1 ] * oCol:bStrData := aBrowse[ i, 1 ] oCol:cHeader := aBrowse[ i, 2 ] oCol:nWidth := aBrowse[ i, 3 ] ...

oApp():oGrid:bKeyDown := {|nKey| Stephan_Tecla(nKey,oApp():oGrid,oCont,oApp():oDlg ) } function Stephan_Tecla(nKey,oGrid,oCont,oDlg) Do case case nKey==VK_RETURN Function for edit record case nKey==VK_INSERT function for add ...

I insert on a xbrowse a background oApp():oGrid:SetBackGround(".\bitmaps\familyb.bmp",2 ) and it run ok only when the user iconize the application the procedure make a strange error I have this strange error Application===========   Path ...

Mr Rao I m trying also with DEFINE FONT oFontGrid NAME "Courier," SIZE 0,GetDefaultFontHeight() WITH OBJECT oApp():oGrid:aCols[ 10 ] :AddResource("cassa16") :nDataStrAlign := AL_RIGHT :cEditPicture := "@ €99,999.99 " :lTotal := .t. :nTotal := 0 :nFootStrAlign ...

I can show the symbol of euro into xbrowse but I have set WITH OBJECT oApp():oGrid:aCols[ 10 ] :nDataStrAlign := AL_RIGHT :cEditPicture := "@ €99,999.99 " :lTotal := .t. :nTotal := 0 :nFootStrAlign := AL_RIGHT END the problem is I can show the symbol ...

thanks Rao, a Question : I use FOR i := 1 TO Len(aBrowse) oCol := oApp():oGrid:AddCol() oCol:bStrData := aBrowse[ i, 1 ] oCol:cHeader := aBrowse[ i, 2 ] oCol:nWidth := aBrowse[ i, 3 ] if !Empty(aBrowse[ i, 4 ]) oCol:cEditPicture:=aBrowse[ i, 4 ] Endif NEXT I ...

http://img24.imageshack.us/img24/8272/ffffffif.jpg I HAVE A XBROWSE and I MADE ACTION (CursorWait(), oApp():oGrid:ToExcel() , CursorArrow()); and it made an error why ????? Application =========== Path and name: C:\Work\Prg2\rux\main.Exe (32 bits) Size: 3,516,416 bytes ...

Are you sure oGrid:nAt does not work. I use it all the time to show a column with the line numbers. It correctly displays each line number.

Code: Select all  Expand view

   ADD COLUMN TO oBrw ;
      DATA { || oBrw:nAt } ;
      HEAD ""      ;
      SIZE 30 PIXELS
 

Gale; Hi. The problem here is that ::oGrid:nAt returns the cursor position in the grid and not as it is painting. Thus not achieving the pijama effect. I tried it. Thank you, but it doesn't work. I realize that not being able to use OrdKeyNo() ...

...     endif   endifreturn Self//------------------------------------------------------------------//  I made oApp():oGrid := TXBrWin7():New( oApp():oDlg ) oApp():oGrid:nTop := 00 oApp():oGrid:nLeft := nSplit+2 oApp():oGrid:nBottom := ::nGridBottom oApp():oGrid:nRight ...

... 60, 0} ,; {'Image' , 'C', 60, 0}}, 'DBFCDX') and I want insert a image directly from xbrowse how can I do it ? And I want create a xbrowse oApp():oGrid := TXBrowse():New( oApp():oDlg ) .... aBrowse := { { { || TT->CODICE }, i18n("Codice"), 80 },; { { || TT->DESCRI }, i18n("Descrizione"),200 ...

... DbCreate(cDir+'TT', {{'Codice' , 'C', 4, 0} ,; {'Descri' , 'C', 60, 0} ,; {'Image' , 'C', 60, 0}}, 'DBFCDX') And I want create a xbrowse oApp():oGrid := TXBrowse():New( oApp():oDlg ) .... aBrowse := { { { || TT->CODICE }, i18n("Codice"), 80 },; { { || TT->DESCRI }, i18n("Descrizione"),200 ...

I have a simply dbf with 3 field concep c 4 descr c 60 tipo n 1 why I cannot converte it on excel from this command directly ? oApp():oGrid:ToExcel() Error description: Error BASE/2022 Error de argumento: ALLTRIM Args: [ 1] = N 3 Stack Calls =========== Called from: => ALLTRIM(0) Called ...