Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Grid & Memo and other problems...
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00227549
Message ID:
00227618
Vues:
25
Hi Bruce,

>> First of all, I display Memo field "Notes", but I can not see it's content - dblClick, Ctrl+Home - nothing works. How can I solve this problem?


>You may want to use an edit box for the memo...

I put this code in Grid's Init method, but don't succeed :(
FOR i=1 TO ALEN(lafieldlist,1)
	This.addcolumn(This.columncount+1)				&& Add column to the end
	lcCaption=Proper(SUBSTR(lafieldlist[i],AT(".",lafieldlist[i])+1))
	if TYPE(lcCaption)="M" && Memo
	       This.columns(i).AddObject('edtMemo','editbox')  && Add editbox
*!*		   This.columns(i).chkADC.Caption=""
		   This.columns(i).edtMemo.Visible=.T.	   
		   This.columns(i).CurrentControl="edtMemo"
	endif   

	
	if left(lcCaption,3)="Adc"
	   lcCaption="ADC"+Proper(substr(lcCaption,4))
*!*		   This.columns(i).AddObject('chkADC','checkbox')  && Add checkbox
*!*		   This.columns(i).chkADC.Caption=""
*!*		   This.columns(i).chkADC.Visible=.T.	   
*!*		   This.columns(i).CurrentControl="chkADC"
	endif   

	
	This.columns(i).header1.caption = lcCaption		&& Add header
    lnWidth=fsize(lcCaption)
    lnWidth=iif(lnWidth>30,lnWidth-20,lnWidth)
    This.columns(i).width= MAX(lnWidth,len(lcCaption) ) * THIS.FONTSIZE
	This.columns(i).controlsource = lafieldlist[i]	&& Assign controlsource
ENDFOR
>> Second, I have 3 logical fields - I want to show Yes/No instead of T or F and I want these fields are editable.
>
>Is there a reason you can't use a char field instead? Or if you used a view,

It's a table with predefined structure, I can not change it. I have logical fields and from user point of view T or F looks a little strange. Yes or Now will be more convenient.


you could display a char with an added view field, and then update the logical in cell code, maybe...

Sorry, I didn't catch your idea. Could it be simple solution?
If it's not broken, fix it until it is.


My Blog
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform