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

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

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

Передача файлов [D7, Win95/98, WinXP]

alexa © (2004-06-27 20:26:00)
Как в локальной сети можно передовать файлы?

ORMADA (2004-06-28 11:46:00) [1]
ещё есть вариант через сокеты
но проще юзать вышепреведённый

ORMADA (2004-06-28 11:45:00) [2]
копируя потоком
function FileCopy(const SourceFileName, TargetFileName: string): boolean;
var
S, T: TFileStream;
begin
Result := False;
if not FileExists(SourceFileName) then Exit;
S := TFileStream.Create(SourceFileName, fmOpenRead);
try
T := TFileStream.Create(TargetFileName, fmOpenWrite or fmCreate);
try
T.CopyFrom(S, S.Size);
FileSetDate(T.Handle, FileGetDate(S.Handle));
finally
T.Free;
end;
Result := True;
finally
S.Free;
end;
end;

BillyJeans (2004-06-28 10:15:00) [3]
ну, воспользовавщись проводником например ;)

Ozone (2004-06-28 08:09:00) [4]
FAQ

Наверх

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