PRB: ListBox/ComboBox Picture Won't Display If Defined in Class

• Microsoft Visual FoxPro for Windows, versions 5.0, 5.0a

SYMPTOMS

A class based on either a ListBox or ComboBox that sets the Picture property in the class does not display the picture either in the Form Designer when the class is added to a form, or when the form is run.

RESOLUTION

This article includes two workarounds. The first adds a new property to the class that sets the Picture property to the new property. The second sets the Picture property in the form after the class is added. Both methods assume that the class has been created following steps 1-3 in the Steps to Reproduce Behavior section below.

Method 1

1. Open the class in the Visual Class Designer. Either by selecting Open from the File menu and then clicking Visual Class Library as the file type or enter the following command in the Command window:

         MODIFY CLASS list OF test.vcx
   

2. Create a new property for the class by selecting New Property from the Class menu. Enter the property name; cPicture, for example. Click Close.

3. Locate the Picture property on the Property Sheet. Copy the path to the graphic and file name from the Picture property and paste it to the new cPicture property.

4. In the Init of the class, add the following code:

         This.Picture = This.cPicture
   

5. Close and save the class.

6. Run the form. The picture should appear next to each row in the list.

      the form, add the DODEFAULT() statement to the Init of List1 to
      ensure that the parent class Init code is also executed.

Method 2

1. Create a form. Using the Form Controls Toolbar, click the View Classes button and select Add. Add the test class library. Click the list class

       and drop it onto the form.
   

2. In the Init of the form, enter code similar to the following:

   Thisform.List1.Picture = ; "c:\vfp5\samples\graphics\bmps\assorted\bell.bmp"

3. Save and run the form.

STATUS

Microsoft is researching this problem and will post new information here in the Microsoft Knowledge Base as it becomes available.

MORE INFORMATION

Steps to Reproduce Behavior

1. Create a new class by either selecting New from File menu then selecting Class or enter the following code in the Command window:

         CREATE CLASS list AS listbox OF test.vcx
   

2. Set the Picture property of the ListBox to a graphic:

         c:\vfp5\samples\graphics\bmps\assorted\bell.bmp
   

   NOTE: The picture is visible in the Visual Class Designer.

3. Save and close the class.

4. Create a form. Using the Form Controls toolbar, click the View Classes button and select Add. Add test.vcx. Click the list class and drop it onto the form.

   NOTE: The picture is not visible in the list class on the form.

5. Right-click on the form to display the short-cut menu, and select Data Environment.

6. Add the customer table from the \VFP5\Samples\Data directory, then click Close.

7. Change the RowSource property of List1 to customer.contact and the RowSourceType property to 6 - Fields.

8. Save and run the form.

REFERENCES

Visual FoxPro Online Help file.

(c) Microsoft Corporation 1997, All Rights Reserved. Contributions by Dean Christopher, Microsoft Corporation