asked on

Delphi Ftp Server Using Indy Component

Please, i'm looking for a FULL Delphi Ftp Server example, using IdFTPServer.
Any workfull sample will be very appreciate.

ASKER CERTIFIED SOLUTION

Ferruccio Accalai

membership

This solution is only available to members.

To access this solution, you must be a member of Experts Exchange.

Start Free Trial

Ferruccio Accalai

ah...to try it: Account: User - Pwd: 1234

dlengel

There are a large number of demos for Indy here:
http://www.indyproject.org/indy/download/Files/Indy9.html

The file itsef is:
http://www.indyproject.org/indy/demodownloads/I9D6_Demos_24Nov02.zip

Spetson

ASKER

For dlengel:
--------------
I just take a look on the Indy Demos, but I found no Ftp Server Demo on this file:
>> I9D6_Demos_24Nov02.zip
Just a Client example....

For Ferruccio68:
------------------
I'm trying to make your example works, and already put all components in the form (before paste your code) but no success yet...
In the site http://www.delphifr.com/ , where i can find this example?
Sorry, the site is in another language (I'm Brazilian... *lol*)

Thank's in advanced...

Ferruccio Accalai

the file comes from this link http://www.delphifr.com/code.aspx?ID=20247 , but you have to be registered to download it....however registration is free (just like here in ex-ex)
For this i've pasted the code here....you have just to copy it and past it into notepad, saving them as Unit1.pas and unit1.dfm....
Then create a new project from delphi, remove the main unit and add as main this saved unit1.pas....

Spetson

ASKER

sorry, i'm unable to make the sample code works... :(
well, any link for a Indy ftp server sample will be very appreciate from now, guys...
thank's again!

SOLUTION

dlengel

membership

This solution is only available to members.

To access this solution, you must be a member of Experts Exchange.

Start Free Trial

Spetson

ASKER

no...
I can't see the file list when connecting to the Trivial Ftp Server using a Ftp Client (Cute Ftp, etc)...

From now, i'm starting a new Delphi7 Project, using Indy9 components, and trying to build a Indy Ftp Server myself, but this will not be easy...

I'm very confused here :0
=================
I need some function, some help, or anything else!!
For example, when the Ftp Client ask to the server for some new directory (I.e C:\Games , how can i change the ASender.CurrentDir for this new value???

-----------------------------------------------------------------------------------------------------
procedure TForm1.IdFTPServer1ChangeDirectory(ASender: TIdFTPServerThread;
var VDirectory: String);
begin
//Some Code here???
end;
------------------------------------------------------------------------------------------------------------

As i said before, any Indy Ftp Server Demo or Sample, still a very good idea, and very appreciate, but if someone, help me here, with some codes, or good functions to solve my problem, a will accept as a Answer, or Solution!

Thanks AGAIN!

Spetson

ASKER

This is a old question...
But i'm still waiting for a solution ok?
Please don't clean up this question yet!!