Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Edit box in grid only shows first 40 chars
Message
De
15/02/2006 18:48:36
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Versions des environnements
Visual FoxPro:
VFP 9 SP1
Database:
Visual FoxPro
Divers
Thread ID:
01096588
Message ID:
01096619
Vues:
20
Have you made the Container visible in the grid? How did you add your Container class to the grid, at design time or in code? In code, you need to make sure you set the .Visible property.


>My editbox is a subclass, but I haven't changed any of the default settings.
>Like I said it works fine on this test form I created. (I did try using the baseclass directly too though).
>I even deleted the whole container and created a new one only with some basic settings.
>Again it does the same thing. It will not run on my production form.
>Funny thing. I decided to enter 6 lines of text in the memo, hitting enter after each one.
>The first line in the edit box shows correct, until it is longer than 40 characters.
>the second line only show 15 characters after which the line is cut off.
>the third line doesn't show at all. (I just noticed that if first line is 40 chars then it doesn't display other lines at all)
>
>Yet again, in my testform it displays correctly.
>
>Here is the code in setNotes()in the ctnrNotes Container:
>
>WITH this.grdNotes
>	.AllowCellSelection = .T.
>	.RecordSourceType = 1
>	.RecordSource = SPACE(0)
>
>	
>	SELECT cnotes.note_date, cnotes.name, cnotes.note_type, cnotes.note, cnotes.note_key ;
>		FROM cnotes ;
>		WITH (buffering = .t.) ;
>		INTO CURSOR grdNotes
>	
>		
>	.RecordSource = 'grdNotes'
>	.column1.controlsource = 'grdNotes.note_date'
>	.column2.controlsource = 'grdnotes.name'
>	.column3.controlsource = 'grdnotes.note_type'
>	.column4.controlsource = '(grdnotes.note)'
>ENDWITH
>scan
>messagebox(MEMLINES(grdNotes.note)) &&gives 1 line if line is 40 chars, 2 if 1st line < 40 chars
>MESSAGEBOX(ALINES(atest,grdNotes.note)) &&gives 6 lines
>ENDSCAN
>
>
>
>
>I just don't get it.
Fred
Microsoft Visual FoxPro MVP

foxcentral.net
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform