How to Get the Full Path from a List Box

• Microsoft Visual FoxPro for Windows, versions 3.0 and 3.0b

SUMMARY

The ListBox control can display directories and file names from physical drives if the RowSourceType property is set to Files. The value property of the list box returns only the currently selected file or directory but not the full path. This article shows by example how to return the full path from a list box.

MORE INFORMATION

The following sample code creates a form that contains a list box and a label that display the entire path to the selected file.

Sample Code

**** Start of ListPath Program

frmListPath = CREATEOBJECT("ListPath") frmListPath.Show READ EVENTS

DEFINE CLASS ListPath AS Form

     AutoCenter=.T.
     Width = 600
     DoCreate = .T.
     Caption = "ListPath"
     Name = "Form1"

     ADD OBJECT List1 AS ListBox WITH ;
             RowSourceType = 7, ;
             Height = 193, ;
             Left = 24, ;
             Top = 24, ;
             Width = 169, ;
             Name = "List1"

     ADD OBJECT Label1 AS Label WITH ;
             AutoSize = .T., ;
             Caption = "", ;
             Height = 18, ;
             Left = 216, ;
             Top = 24, ;
             Width = 0, ;
             Name = "Label1"

     PROCEDURE List1.InteractiveChange
             ThisForm.Label1.Caption = This.List(2)+This.Value
     ENDPROC

     PROCEDURE list1.click
            ThisForm.Label1.Caption = This.List(2)+This.Value
     ENDPROC