استفاده همزمان از چند FTP

[ابوالفضل عباسی]

باسلام خدمت دوستان گرامی.
بنده میخواهم روی یک سیستم کامپیوتری،چند idFtpServer استفاده کنم،یعنی یه برنامه نوشتم که FtpServer هست و میخوام روی این سیستم 3 تا از این برنامه ها باز باشند.
اولین برنامه اجرا میشود ولی برنامه های بعدی اجرا نمیشوند.
پیغام میدهد که از این آدرس و پورت داره استفاده میشه.

تفاوت این 3 برنامه در پورت آنهاست ولی آدرس host یکسان میباشد.

چکار کنم که این مشکل حل شود و 3 تا برنامه ftpServer با host یکسان ولی port متفاوت در یک سیستم اجرا شود؟؟

سپاس گذارم

[Felony]

uses
IdSocketHandle;

var
Binding: TIdSocketHandle;
begin
Binding := IdFTPServer1.Bindings.Add();
Binding.IP := '127.0.0.1';
Binding.Port := Random(100);
IdFTPServer1.Active:= True;
end;