استفاده همزمان از چند 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;