FTP-клиент. Гайсина Л.Ф. - 32 стр.

UptoLike

ВУЗ: 

ОГУ | Оренбург

Составители: 

Рубрика: 

32
Функция удаления файла с FTP – сервера
+
+
ВОЗВРАТ
DeleteFClick(TObject*Sender)
f->Delete(ll->Items-
>Strings[ll>ItemIndex]);
ll->Items->Delete(ll->ItemIndex);
f->Connected
ll->Items-
>Strings[ll-
>ItemIndex]!=""
ShowMessage("Подклю
чения не произошло")
Лист
9
     Функция удаления файла с FTP – сервера


                   DeleteFClick(TObject*Sender)



                           f->Connected
                                                   +
                                                       ShowMessage("Подклю
                                                       чения не произошло")

                        ll->Items-
                        >Strings[ll-
                        >ItemIndex]!=""

                                                   +

               f->Delete(ll->Items-
               >Strings[ll>ItemIndex]);
               ll->Items->Delete(ll->ItemIndex);




                           ВОЗВРАТ




                                                                              Лист

                                                                                9

32

Страницы