Передача файлов

← →
alexa (2004-06-27 20:26) [0]

Как в локальной сети можно передовать файлы?

← →
Ozone © (2004-06-28 08:09) [1]

FAQ

← →
BillyJeans (2004-06-28 10:15) [2]

ну, воспользовавщись проводником например ;)

← →
ORMADA © (2004-06-28 11:45) [3]

копируя потоком
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;

ещё есть вариант через сокеты
но проще юзать вышепреведённый

Передача файлов Найти похожие ветки