Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

CopyFileTo [D6]

vok © (2005-07-22 10:41:00)
Добрый день! Уважаемые мастера, приведите, пожалуйста, пример фнкции CopyFileTo. В хелпе только описание, а как скопировать файл, не получается.
Спасибо!

Джо (2005-07-22 12:23:00) [1]

> [18] vok (22.07.05 12:19)

Тогда еще пару советов.
1. В моем примере идеологически неверный подход. Правильнее будет так:
if CopyFileTo (Src,Dest) then ... else ...
2. Вообще не использовать эту функцию. Лучше - CopyFile. Потому, что функция - всего лишь оболочка, незачем сюда лепить из-за нее целый модуль Инди.

vok (2005-07-22 12:19:00) [2]
Джо © (22.07.05 12:06) [16]
Еще раз спасибо!

vok (2005-07-22 12:16:00) [3]
Джо © (22.07.05 12:06) [16]
Да, извиняюсь, проглядел.

Джо (2005-07-22 12:06:00) [4]

> [15] vok (22.07.05 12:05)
> Именно этого - uses ...,IdGlobal; и нет в справке!

Вот именно это и есть. Причем, самой первой строчкой.

vok (2005-07-22 12:05:00) [5]
Именно этого - uses ...,IdGlobal;и нет в справке!

vok (2005-07-22 11:58:00) [6]
А вот когда будет скучно, вопросов сюда не будет смысла задавать.

dmitry501 (2005-07-22 11:56:00) [7]
Плохиш © (22.07.05 11:52) [10]
Ага, нашел. Сравни с [5] :)
{$IFDEF MSWINDOWS} function CopyFileTo(const Source, Destination: string): Boolean; begin Result := CopyFile(PChar(Source), PChar(Destination), true); end; {$ENDIF}

vok (2005-07-22 11:56:00) [8]
Джо © (22.07.05 11:53) [11]
Спасибо!
Ну когда-то и мне будет скучно, а пока......

Джо (2005-07-22 11:53:00) [9]
uses ...,IdGlobal; ... var Src,Dest: string; begin Src := 'myfile'; Dest := 'tuda_ego_zina'; if not CopyFileTo (Src,Dest) then ... else ... end; ...
Скукота...

Плохиш (2005-07-22 11:52:00) [10]

> dmitry501 © (22.07.05 11:51) [9]

Тебе это правда интересно? Тогда ищи в Indi библиотеке.

dmitry501 (2005-07-22 11:51:00) [11]
Нету. Правда у меня D7.

vok (2005-07-22 11:49:00) [12]
Anatoly Podgoretsky © (22.07.05 11:20) [6]
Так пытаюсь воспользоваться, но не понимаю, а объяснить наверно здесь никто не сможет...

vok (2005-07-22 11:41:00) [13]
dmitry501 © (22.07.05 11:18) [5]
> Где в хелпе ты нашел такую функцию?
Введи в поиске хелпа CopyFileTo и посмотри.

Anatoly Podgoretsky (2005-07-22 11:20:00) [14]
Религия не позволяет воспользоваться справкой?

dmitry501 (2005-07-22 11:18:00) [15]
Где в хелпе ты нашел такую функцию?
Может так?
Result := CopyFile(PChar(Source), PChar(Destination), true);

Плохиш (2005-07-22 11:14:00) [16]
Исправь ошибку в 17й строке.

PS. Скучно-то как :-(

vok (2005-07-22 11:05:00) [17]
Туда и также я и пытаюсь зафигачить, но не пойму все таки ничего.

vok (2005-07-22 11:02:00) [18]
А почему Ошибка - "Undeclared identifier", в var нужно что-то записать?

Плохиш (2005-07-22 10:55:00) [19]
copyfileto('c:\blabla\superpuperfile.ops', 'sudanadosuperpuperfilezafigacit');

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »