Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
WordWrap
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
00464198
Message ID:
00465541
Views:
15
>I need to be able to disable WordWrap in an edit box. Anyone know how?

Here's an idea you could probably use. You'll want to add code to figure out how tall and wide to make it depending on teh size of the file. ALso, in the KeyPress(), track the Edit Boxes "scrolled position" and make it in synch with the forms.
oFOrm = createobject('form1')
oFOrm.Show(1)
**************************************************
*-- Form:         form1 (c:\vfptest\nowwedit.scx)
*-- ParentClass:  form
*-- BaseClass:    form
*-- Time Stamp:   01/18/01 08:43:05 PM
*
DEFINE CLASS form1 AS form


	Top = 0
	Left = 0
	Height = 201
	Width = 260
	ScrollBars = 3
	DoCreate = .T.
	Caption = "Form1"
	Name = "Form1"


	ADD OBJECT edit1 AS editbox WITH ;
		Height = 181, ;
		Left = 0, ;
		ScrollBars = 0, ;
		Top = 0, ;
		Width = 241, ;
		Name = "Edit1"


	PROCEDURE edit1.Init
		this.value = filetostr(home() + 'vfp6faq.txt')
		this.width = 1000
		this.height = 1000
	ENDPROC


ENDDEFINE
*
*-- EndDefine: form1
**************************************************
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform