pt 

CreateDialog (TShortPathEdit)

pl 

RunDialog (TShortPathEdit)