How convert BROWSE to Grid & Column Objects? .... please helpMe

[alfonsovega]

I have many screen development in fpd26 with browse command as the code atachement, please i need convert this command to used GRID and Column Object.

Example the source to convert:

*environment
close data
use adm001 order codigo
selec 0
use adm004
set relation to usrap into adm001

*define window
DEFINE WINDOW _0uw0srskd ;
FROM INT((SROW()-16)/2),INT((SCOL()-55)/2) ;
TO INT((SROW()-16)/2)+15,INT((SCOL()-55)/2)+54 ;
TITLE "xxxxxxxxxx" ;
NOFLOAT ;
NOCLOSE ;
NOMINIMIZE ;
COLOR SCHEME 10
*Browse clauses
BROWSE FIELD ;
_0uw0srsqo=adm004.aplic ;
:20 :R ;
:H= 'Aplicacion' ,;
adm004.admon ;
:10 ;
= "@!K" ;
:W= _0uw0srsqp() ;
:V= _0uw0srsqq() :F ;
:H= '_' ,;
_0uw0srsqu=adm001.nomusr ;
:22 :R ;
:H= 'Administrador' ;
WINDOW _0uw0srskd ;
NOFOLL NOMENU SAVE


*functions to valid field

FUNCTION _0uw0srsqp && adm004.admon WHEN
#REGION 1
WADMON=adm004.admon
return .t.

FUNCTION _0uw0srsqq && adm004.admon VALID
*valid for column admon

 

[torturedmind]

to start with, FPD26 is very much diffrent from VFP in the sense that almost all aspects in VFP is object-oriented. you have to learn the basics of VFP OOP first so you can fully understand how things could be done in VFP way.

now for your problem - FAQ184-449 will surely help you.

kilroy