FiveTech Support Forums

#include "FiveWin.Ch"
#include "ord.ch"
#include "xbrowse.ch"

REQUEST DBFCDX

//----------------------------------------------------------------------------//

function Main()

   local oWnd, oBrw

   USE CUSTOMER NEW  ALIAS CUSTOMER
   GO TOP

   cAlias := Alias()


   DEFINE WINDOW oWnd

   @ 0,0 XBROWSE oBrw OF oWnd AUTOCOLS ALIAS "CUSTOMER" CELL LINES  FASTEDIT


   oBrw:lFastEdit := .t.

   oBrw:SetRDD()
   oBrw:CreateFromCode()



   oWnd:oClient   := oBrw



   ACTIVATE WINDOW oWnd MAXIMIZED
   DbCloseAll()

return  nil

//----------------------------------------------------------------------------//

   @ 0,0 XBROWSE oBrw OF oWnd AUTOCOLS ALIAS "CUSTOMER" CELL LINES  FASTEDIT

   oBrw:nEditTypes := EDIT_GET  // insert this line
//   oBrw:lFastEdit := .t.              // remove, because it is already set