je souhaite copier un fichier dont le chemin est dans un TEdit nommé
EditCheminImage vers un dossier 'Images' qui se crée dans
ExtractFileDir(StaticText1.Caption), où StaticText1.Caption est le
chemin d'un fichier...
J'utilise ce code :
if CreateDir(ExtractFileDir(StaticText1.Caption)+ '\Images') then begin