Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Super column headings
Message
From
05/05/2008 11:10:27
 
 
To
05/05/2008 10:43:08
General information
Forum:
Visual FoxPro
Category:
Other
Environment versions
Visual FoxPro:
VFP 9 SP1
Miscellaneous
Thread ID:
01315101
Message ID:
01315124
Views:
24
Thomas --

Hey, that's an interesting suggestion. Unfortunately, though, it won't fit in my case, as I still need the columns to be kept separate ... I just need headers than span multiple columns, leaving the columns as is.

In any case, my hope was to find somebody else who had done work on this so I didn't have to!

Thanks,



>Hi James,
>
>I'd create a container class with all those fields, that you need to display in one single column. Then I'd remove the default textbox and use the before defined container control.
>
>You can try this out by creating a new form with a grid that contains two columns. Within form.load just create a cursor with three field like this:
>
>
>CREATE CURSOR crsTest (cfield1 c(30), ifield2 i, dfield3 d)
>INSERT INTO crsTest(cfield1, ifield2, dfield3) VALUES ([lots of aaaaaaaaaaaaaaaaaa],1,DATE() + 1)
>INSERT INTO crsTest(cfield1, ifield2, dfield3) VALUES ([lots of bbbbbbbbbbbbbbbbbb],2,DATE() + 2)
>GO TOP
>
>
>Now exchange the textbox for a container. Within container.init put this code:
>
>
>This.AddObject([text1],[Textbox])
>This.AddObject([text2],[Textbox])
>This.Text1.Width = 200
>This.Text2.Top = This.Text1.Top
>This.Text2.Left = This.Text1.Left + This.Text1.Width + 10
>This.Text1.ControlSource = [crsTest.cField1]
>This.Text2.ControlSource = [crsTest.iField2]
>This.Text1.Visible = .T.
>This.Text2.Visible = .T.
>
>
>Set Grid.RowHeight to 22 and Grid.Column1.Sparse to .F.
>
>Last but not the least, in Grid.Column2.Text1.init put this line of code
>
>This.ControlSource = [crsTest.dField3]
>
>
>This should give you a rough impression.
Jim Nelson
Newbury Park, CA
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform