Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
ListView ActiveX Example Anyone?
Message
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00098932
Message ID:
00099043
Views:
15
Hi Fred,

Here's one that I played around with when I was figuring out the ListView control. It creates a "report view" of a couple of fields from the customer table in tastrade. Just drop a ListView object onto a form and paste this code in the init method.

USE HOME() + "SAMPLES\TASTRADE\DATA\CUSTOMER.DBF"
WITH This
.ColumnHeaders.Add(,,"Company Name", This.Width/2)
.ColumnHeaders.Add(,,"City", This.Width/2)
.HideColumnHeaders = .F.
.View = 3 && Report View
ENDWITH
WITH This.ListItems
SCAN
loItem = .Add(,,Company_Name)
loItem.SubItems(1) = City
ENDSCAN
ENDWITH
Mike Feltman

F1 Technologies
Previous
Reply
Map
View

Click here to load this message in the networking platform