![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Копирование файла
Lonix © (2007-02-28 00:35:00)У меня есть компонент Memo в нем написан путь файла, я хочу скопировать этот файл в другую папку но выдается ошибка, текст проги:
var
kname: String;
begin
kname:=Memo.Text;
CopyFile(kname, 'c:\Windows\',true);
end;
end;
Ошибка такая: [Error] Unit6.pas(170): Incompatible types: 'String' and 'PAnsiChar'
koha (2007-02-28 04:13:00) [1]Удалено модератором
Примечание: offtop
ASoft (2007-02-28 03:25:00) [2]Удалено модератором
Примечание: offtop
RASkov (2007-02-28 02:33:00) [3]Удалено модератором
Примечание: offtop
RASkov (2007-02-28 02:22:00) [4]> [16] Lonix (28.02.07 02:12)
Попробуй завтра.... сегодня магнитные бури недают копироваться файлам...
Вот напоследок проверь, если нескопируется -
> [16] Lonix (28.02.07 02:12)
то точно магнитные бури.
Файл - 123.txt должен быть в корне диска С:
procedure TForm1.Button1Click(Sender: TObject);
var
s,k: String;
begin
s:='C:\123.txt';
k:='C:\123\123.txt';
if not DirectoryExists('C:\123') then MkDir('C:\123');
copyfile(PChar(s), PChar(k), true);
end;
Германн (2007-02-28 02:15:00) [5]
> Lonix (28.02.07 02:12) [16]
>
> есть
>
Достал.
Другого ответа у меня нет. :(
Lonix (2007-02-28 02:12:00) [6]есть
Lonix (2007-02-28 01:55:00) [7]я не знал что так можно заменить text на lines, все равно не копируется
RASkov (2007-02-28 01:53:00) [8]> [5] Lonix (28.02.07 01:27)
И как все-таки у тебя с каталогом "C:\123\" - есть он у тебя аль нет?
RASkov (2007-02-28 01:46:00) [9]> [12] Lonix (28.02.07 01:43)
А почему Memo? И ответь на [11]
RASkov (2007-02-28 01:43:00) [10]> [9] Lonix (28.02.07 01:37)
А кто сказал, что нельзя? Просто скажи - чем отличается Memo1.Text от Momo1.Lines[n]?
Lonix (2007-02-28 01:43:00) [11]а как же тогда сделать, чтобы одна строка была?
Германн (2007-02-28 01:41:00) [12]
> Lonix (28.02.07 01:37) [9]
>
> а почему Text нельзя? с ним работает
>
Если TMemo, то много строк, если Text, то одна строка. А что нужно непонятно :(
Lonix (2007-02-28 01:37:00) [13]а почему Text нельзя? с ним работает
RASkov (2007-02-28 01:36:00) [14]> [5] Lonix (28.02.07 01:27)
Каталога "123" нет.
Германн (2007-02-28 01:35:00) [15]
> Lonix (28.02.07 01:27) [5]
>
> var
> s,k: string;
> begin
> s:=memo1.Text;
> k:='c:\123\123.txt';
> copyfile(Pchar(s),pchar(k),true);
> end;
> (в Memo1 написано c:\123.txt)
> Ошибки теперь нету но зато файл не копируется. Почему?
А зачем тут TMemo? А уж если TMemo, то почему пользуешь свойство Text?
Германн (2007-02-28 01:30:00) [16]
> RASkov (28.02.07 01:21) [3]
>Я прочитал первую и последнюю строчку из [0]... перед этим читал такую же >ветку из [1] и машинально запостил сюда ссылку.
Ты правильно прочитал и правильно запостил.
Lonix (2007-02-28 01:27:00) [17]var
s,k: string;
begin
s:=memo1.Text;
k:='c:\123\123.txt';
copyfile(Pchar(s),pchar(k),true);
end;
(в Memo1 написано c:\123.txt)
Ошибки теперь нету но зато файл не копируется. Почему?
RASkov (2007-02-28 01:23:00) [18]> отсутствия файла
имеется ввиду - имя файла куда копировать....
RASkov (2007-02-28 01:21:00) [19]Я прочитал первую и последнюю строчку из [0]... перед этим читал такую же ветку из [1] и машинально запостил сюда ссылку.
Лентяи...
> Лично я на своём компе проверять не хочу!
Пусть автор на своем проверит :) уроком будет.
Я тоже проверять не хочу, но думаю страшного ничего не будет... Вылетит ошибка отсутствия файла, или чтонить в этом духе....
Германн (2007-02-28 01:06:00) [20]
> RASkov (28.02.07 00:46) [1]
Но что будет если автор скопирует пример по твоей ссылке, одному богу известно :) Он же в [0] вторым параметром поставил имя каталога, а не файла! Лично я на своём компе проверять не хочу! :)