[Internetdirect-dev-public] (no subject)

[Ng H. Y. <hy...@tm...>]

Hi!

I'm currently involve in a project where my application has to perform 
ranged FTP download. That's where people can download only certain part of 
the file. Since i don't see any properties or methods in TIdFTP that allow 
this (maybe they do have, just that i can't find), i tried customized it.

However, after i customized it, i have problem when i want to resume the 
file download. In addtional, the application will get idle (or hang) after 
my customization.

I certainly know that i was my problem having this kind of problem because 
i use Indy component for some time and know that it works fine. Thus i'm 
trying to see if you guys have any opinion to solve my problem.

The following is my code snippet:

procedure Get(const ASourceFile: string; ADest: TStream; nPosition: 
Integer;
AResume: Boolean = True); overload;
begin
  AResume := AResume and CanResume;
  InternalGet('RETR ' + ASourceFile, ADest, nPosition, AResume);
  DoAfterGet(ADest);
end;

procedure TCustFTP.InternalGet(const ACommand: string; ADest: TStream;
nPosition: Integer; AResume: Boolean);
.
.
.
    if AResume then begin
        Self.SendCmd('REST ' + IntToStr(ADest.Position + nPosition), [350]) 
;
.
.
.
    if AResume then begin
        Self.SendCmd('REST ' + IntToStr(ADest.Position + nPosition), [350]) 
;

I've posted it on the Borland's winsock newsgroup, but there aren't any 
replies, so i try my luck here.

Really thank you for all who spend their time with my problem. Thanks in 
advance.

From,

Hon Yuen, Ng
hy...@tm...

-- 
Using M2, Opera's revolutionary e-mail client: http://www.opera.com/m2/