Hi,
Where can I find out more about this lEditCol.
Thanks
Hi,
Where can I find out more about this lEditCol.
Thanks
Acwoo,
Please review samples\fwBrow.prg
Thanks for the reply
(FwBrow.prg)
function EditRecord( oLbx )
local i
local cVar
local cAlias := oLbx:cAlias
for i := 1 to 4
cVar = ( cAlias )->( FieldGet( i ) )
if ! oLbx:lEditCol( i + 1, @cVar,, { || Validate() } )
exit
endif
( cAlias )->( FieldPut( i , cVar ) )
next
return nil
In FWH2.4, if cVar is an numeric field, it is accepted by @cVar, but in FWH7.11, I have to change cVar to a string before it is accepted by @cVar.
How do I solve this problem.
Thanks
Acwoo,
> I have to change cVar to a string before it is accepted by @cVar.
Do you get an error if you don't do it ?
Thanks for the help
> I have to change cVar to a string before it is accepted by @cVar.
>Do you get an error if you don't do it ?
Yes. Error description: Error BASE/1099 Argument error: STR
Thanks
Acwoo,
Please post the error calls stack, thanks
Thanks for your help
Path and name: C:\abc\test.exe (32 bits)
Size: *** bytes
Time from start: 0 hours 0 mins 13 secs
Error occurred at: 09/12/07, 09:14:44
Error description: Error BASE/1099 Argument error: STR
Args:
[ 1] = U
Called from: => STR(0)
Called from: => TCLIPGET:_PICTURE(1345)
Called from: => TWBROWSE:LEDITCOL(0)
Called from: .\test1.prg => EDITOPENBAL(3439)
Called from: .\test1.prg => (b)GLPRLYBA(3320)
Called from: => TWINDOW:KEYDOWN(0)
Called from: => TCONTROL:KEYDOWN(0)
Called from: => TWBROWSE:KEYDOWN(0)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: => TWBROWSE:HANDLEEVENT(0)
Called from: .\source\classes\WINDOW.PRG => _FWH(0)
Called from: => DIALOGBOXINDIRECT(0)
Called from: => TDIALOG:ACTIVATE(0)
Called from: .\test1.prg => GLPRLYBA(3377)
Called from: .\ec.prg => (b)BUILDMENU2(2582)
Called from: => TMENU:COMMAND(0)
Called from: => TWINDOW:COMMAND(0)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: .\source\classes\WINDOW.PRG => _FWH(0)
Called from: => WINRUN(0)
Called from: => TWINDOW:ACTIVATE(0)
Called from: .\test.prg => MAIN(146)
Thanks
if ! Empty( cPicture )
oGet:oGet:Picture = cPicture
endifThanks a lot. It Works!
Thanks