Código Delphi [-]if DirectoryExists(OpenPictDialCam.InitialDir) then ... else ShowMessage(OpenPictDialCam.InitialDir+' no existe ')
if DirectoryExists(OpenPictDialCam.InitialDir) then ... else ShowMessage(OpenPictDialCam.InitialDir+' no existe ')