In the new version 1810 i see a dialog to input data if i use SetColsAsRows(). But i will handle as before! What to do to get the behavior as in 1801?
Board index FiveWin for Harbour/xHarbour Question to XBROWSE 1810
How were you invoking edit in your own way earlier?
By assigning a codeblock to bLDClickData or how?
Regards
G. N. Rao.
Hyderabad, India
G. N. Rao.
Hyderabad, India
I do so:
ADD COLUMN TO XBROWSE oList DATA aEin[oList:nArrayat,LG_ARR_POS_FELDER,LG_FELD_PERSON,LG_ARR_POS_SUCH] SIZE 200 ALIGN CENTER EDITABLE ON EDIT ;
{|a,x|lg_stamm_such(x,@aPers,@aGer,@aKont,@aZu,1,oList:nArrayat)} HEADER "Mitarbeiter" ;...…In the method Edit( nKey ) of TXBrwColumn please locate these lines of code:
Comment out all these lines of code.
if !Empty( ::aRows )
uValue := CharRem( CRLF, ::cHeader )
AEval( ::aRows, { |o| If( Empty( o:cHeader ), o:cHeader := "COL-" + LTRIM( Str( o:nCreationOrder ) ), nil ) }, 2 )
AEval( ::aRows, { |o| If( o:lReadOnly, nil, uValue += "," + CharRem( CRLF, o:cHeader ) ) }, 2 )
oRec := TDataRow():New( ::oBrw, uValue, .f. ) //:Edit( nil, .f., StrTran( ::cHeader, CRLF, " " ) )
oRec:oFont := ::DataFont()
oRec:oAnchor := Self
return oRec:Edit( nil, .f., StrTran( ::cHeader, CRLF, " " ) )
endifComment out all these lines of code.
Regards
G. N. Rao.
Hyderabad, India
G. N. Rao.
Hyderabad, India
Thanks!
In the meantime i also found this lines and make a DATA to switch this lines on/off. But for accordance to older versions the code should be inactive for standard and switchable to your new edit!