На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Поиск Участники Календарь Избранное RSS
msm.ru
! ПРАВИЛА РАЗДЕЛА · FAQ раздела Delphi · Книги по Delphi
Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.
Следующие вопросы задаются очень часто, подробно разобраны в FAQ и, поэтому, будут безжалостно удаляться:
1. Преобразовать переменную типа String в тип PChar (PAnsiChar)
2. Как "свернуть" программу в трей.
3. Как "скрыться" от Ctrl + Alt + Del (заблокировать их и т.п.)
4. Как прочитать список файлов, поддиректорий в директории?
5. Как запустить программу/файл?
... (продолжение следует) ...
Вопросы, подробно описанные во встроенной справочной системе Delphi, не несут полезной тематической нагрузки, поэтому будут удаляться.
Запрещается создавать темы с просьбой выполнить какую-то работу за автора темы. Форум является средством общения и общего поиска решения. Вашу работу за Вас никто выполнять не будет.
Внимание
Попытки открытия обсуждений реализации вредоносного ПО, включая различные интерпретации спам-ботов, наказывается предупреждением на 30 дней.
Повторная попытка - 60 дней. Последующие попытки бан.
Мат в разделе - бан на три месяца...
Модераторы: jack128, D[u]fa, Shaggy, Rouse_
  
> Код ошибки при копировании файла - 3 , Delphi (чайник)
Profi uborshik
   Сообщ. #1 ,

    Profi
    *****
    Профиль · PM
    Поощрения: 1 Dgm
    Рейтинг (т): 35
    Здрасте!
    Я пытаюсь скопировать файл (.bmp)
    ExpandedWrap disabled
      var copyringDirSrName,copySaveDir:string;
      begin
      copyingDirSrName:='F:\1.bmp';
      copySaveDir:='C:\';
       
       if (copyFile(pChar(copyringDirSrName),pChar(copySaveDir),true)) then
         begin
          showMessage('OK!FileCopy!');
         end
         else
         begin
          showMessage('NO!File Not Copy!Код ошибки ='+inttostr(getlasterror));
         end;
      end;

    выдает сообщение
    Цитата

    NO!File Not Copy!Код ошибки = 3

    Я немогу найти код ошибки =3.Не подскажите,что это значит.
    И вообще,я чувствую,что делаю,что-то не так.
    А как правильно копировать файлы?
    Guru volvo877
    Сообщ. #2 ,

      Guru
      *******
      Профиль · PM
      Поощрения: 7 Dgm
      Рейтинг (т): 878
      Цитата uborshik @
      Я немогу найти код ошибки =3

      Здесь смотрел:
      System Error Codes (0-499)?

      Цитата uborshik @
      я чувствую,что делаю,что-то не так.

      ExpandedWrap disabled
        ...
        copySaveDir:='C:\1.bmp';
        ...
      чувствуешь разницу?
      Profi uborshik
      Сообщ. #3 ,

        Profi
        *****
        Профиль · PM
        Поощрения: 1 Dgm
        Рейтинг (т): 35
        Цитата volvo877 @
        чувствуешь разницу?

        Гм... :unsure:
        Чувствую...
        P.O.D
        Сообщ. #4 ,

          Guru
          *******
          Профиль · PM
          Поощрения: 1 Dgm
          Рейтинг (т): 274
          Цитата uborshik @
          Я немогу найти код ошибки =3.Не подскажите,что это значит.

          ExpandedWrap disabled
            ShowMessage('NO!File Not Copy! '+SysErrorMessage(GetLastError));

          ;)
          Profi uborshik
          Сообщ. #5 ,

            Profi
            *****
            Профиль · PM
            Поощрения: 1 Dgm
            Рейтинг (т): 35
            P.O.D,volvo877
            Спасибо за помощь!
            Все получилось благодаря вашим советам.
            .......................................
            З.Ы. Я делал утилитку которая делает txt-список имен файлов в определенной директории (ну,типа,для распечатки на принтере того,что имеется на жестком диске)и подумал,что неплохо было-бы,заодно(раз уж проходим каталоги) иметь возможность копировать определенные файлы с диска на внешние носители,типа,флешки или сотового телефона(в моем случае).
            Я раньше делал "проход файлов"(рекурсивный,описанный в учебниках).Я уже забыл как я это делал.
            А тут срочно понадобилось эта "фенька".
            Пришлось вспоминать...Не смог.
            Пришлось все заново учить(все боялся ,что придется опять на наши Исходники.ру задавать вопросы - ведь "заклюют",типа,вопрос "изъежженый" до мозга костей).
            Но уж про копирование,я этот вопрос ни разу не задавал здесь!
            (Кстати список имен файлов в директории имеющей 50 папок вмещающих около 2600 файлов делфи-программа составила менее чем за три секунды(комп=1700мг память 1024мб)!
            (Копирование с составлением списка копируемых файлов(100 файлов каждый не более 50кб) составило около 20 секунд).
            Сообщение отредактировано: uborshik -
            0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
            0 пользователей:


            Рейтинг@Mail.ru
            [ Script execution time: 0,0239 ]   [ 16 queries used ]   [ Generated: 27.07.25, 18:20 GMT ]  
            Powered by Invision Power Board(U) v1.2 © 2003  IPS, Inc.