Форум: "Сети";
Текущий архив: 2003.09.22;
Скачать: [xml.tar.bz2];
ВнизПрервать передачу файла по FTP Найти похожие ветки
← →
Ренат (2003-07-24 11:43) [0]Использую NMTFP c FastNet
Как прервать передачу файла? Перепробовал методы все выдают "Access Violation"
← →
Digitman (2003-07-24 11:48) [1]
> Перепробовал методы все выдают "Access Violation"
каким же образом ты их "пробовал" ? код-то приведи !
← →
Ренат (2003-07-24 14:09) [2]
procedure TForm1.NMFTP1PacketRecvd(Sender: TObject);
begin
if .. then
begin
NMFTP1.Abort;
NMFTP1.Disconnect;
end else ..
end;
Также Cancel, RequestCloseSocket.
← →
Digitman (2003-07-24 14:56) [3]на какой строчке получаешь AV ?
← →
Ренат (2003-07-24 15:26) [4]на строчке
NMFTP1.Download(File1,File2);
← →
Reindeer Moss Eater (2003-07-24 15:29) [5]1)Как прервать передачу файла? Перепробовал методы все выдают "Access Violation"
2)код-то приведи !
3)procedure TForm1.NMFTP1PacketRecvd(Sender: TObject);
begin
if .. then
begin
NMFTP1.Abort;
( File1,File2) 1)Как прервать передачу файла? Перепробовал методы все выдают "Access Violation"
2)код-то приведи !
3)procedure TForm1.NMFTP1PacketRecvd(Sender: TObject);
begin
if .. then
begin
NMFTP1.Abort;
NMFTP1.Disconnect;
end else ..
end;
4)на какой строчке получаешь AV ?
5)NMFTP1. Download(File1,File2);
Блеск!!! :)
← →
Ренат (2003-07-24 15:31) [6]
> Блеск!!! :)
?????????
обоснуй дорогой
← →
Reindeer Moss Eater (2003-07-24 15:37) [7]Юноша, я тебе не дорогой!
А самому трудно понять?
Сначала ты рассказываешь, что при попытке прерывания получаешь AV, приводишь код прерывающий закачку.
А после выясняется, что AV вызывается при Download.
← →
Ренат (2003-07-24 15:44) [8]Ладно хорошо не так написал
Abort прерывает закачку и на выходе из NMFTP1PacketRecvd
на строке Download получаю AV.
← →
Digitman (2003-07-24 16:08) [9]
> на выходе из NMFTP1PacketRecvd
> на строке Download получаю AV.
не вижу никаких Download ни на входе ни на выходе процедуры-обработчика
ты в состоянии ее целиком привести ?
это раз.
второе.
какой смысл вообще в получении методом Download управления, если перед этим выполнен метод Abort ?
← →
Ренат (2003-07-24 16:21) [10]procedure TForm1.Button1Click(Sender: TObject);
begin
with NMFTP1 do
begin
Connect;
try
Download(File1,File2);
except
Showmessage("Сообщение прервано");
( Sender: TObject) procedure TForm1.Button1Click(Sender: TObject);
begin
with NMFTP1 do
begin
Connect;
try
Download(File1,File2);
except
Showmessage("Сообщение прервано");
end;
end;
end;
procedure TWaitcopy.Button2Click(Sender: TObject);
begin
cancelTransmit:=true;
end;
procedure TForm1.NMFTP1PacketRecvd(Sender: TObject);
begin
if cancelTransmit then NMFTP1.Abort;
end;
После нажатия на Button2 выполняется NMFTP1.Abort и возникает
сначала все-таки Exception "Socket send aborted" а потом
AV на Download(File1,File2). Это в дебаггере.
Призапуске exe программа закрывается безо вских сообщений.
← →
Ренат (2003-07-24 16:41) [11]откат сам разобрался
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2003.09.22;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.012 c