1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie. Узнать больше.

Delphi

Тема в разделе "Софт", создана пользователем RUS, 10.02.04.

  1. RUS

    RUS Активный участник

    12.666
    2
    Не запускается командная строка из Delphi. Пытаюсь запустить с помощью WinExec команду удаления папки, но она не выполняется. Что посоветуете?
     
  2. RUS

    RUS Активный участник

    12.666
    2
    И еще один вопрос:
    Как осуществить перекодировку файла в формате ASCII в ANSI с помощью средств Delphi/Pascal?
     
  3. Гость

    Гость Гость

    Посмотреть результат который вернула функция WinExec
     
  4. Fl@sh

    Fl@sh Активный участник

    681
    6
    RUS
    1. А ты что выполняешь-то? erase/del? оно работает только для файлов... Используй deltree если 9х или rmdir /S /Q для WinXP
    Или безо всяких WinExec() попробуй RmDir() /*но оно тоже только пустые папки удаляет... предется рекурсивно всё удалять*/
    2. CharToOem(), OEMToChar()
     
  5. pegas

    pegas Участник

    311
    0
    в дополнение к предыдущему ответу
    непустую папку можно удалить через функции ShellАpi примерно таким образом
    var fstrct:TSHFileOpStruct;
    ...
    fstrct.wFunc:=FO_DELETE;
    fstrct.fFlags:=FOF_NOCONFIRMATION or FOF_SILENT or FOF_NOERRORUI;
    fstrct.pFrom:='c:\Windows'; :D
    fstrct.pTo:=nil;
    ...
    if SHFileOperation(fstrct)<>0 then //ошибка!!

    в uses надо прописать shellapi
     
  6. Hermes

    Hermes Активный участник

    11.635
    2
    RUS, спроси у Степана.