PATH.Make

new-path = PATH.Make( drive     AS STRING = "", 

                      directory AS STRING = "", 

                      filename  AS STRING = "", 

                      extension AS STRING = "" ) AS STRING

Creates a valid Windows file specification

Example:

DIM s AS STRING

$INCLUDE "MyBASIC2_ExtLib.bas"

$LIBRARY "MyBASIC2_ExtLib.dll"

s = FILE.GETOPENFILENAME( "AVI Files (*.avi)|*.avi|All Files (*.*)|*.*||", 2, "Hello", 0 )

PRINT "GetOpenFileName=";s,

PRINT "Drive =";PATH.Split( s, EL_Drive ),

PRINT "Folder=";PATH.Split( s, EL_Directory ),

PRINT "Name  =";PATH.Split( s, EL_Filename ),

PRINT "Ext   =";PATH.Split( s, EL_Extension ),

PRINT "Make Path: ";PATH.Make( PATH.Split( s, EL_Drive ),_

                              PATH.Split( s, EL_Directory ),_

                              PATH.Split( s, EL_Filename ),_

                              PATH.Split( s, EL_Extension ) ),

PRINT "Make Path: ";PATH.Make( PATH.Split( s, EL_Drive ),_

                              PATH.Split( s, EL_Directory ) ),

END