| 
                          dolphin
                         | 
                        
                          Дата: Понедельник, 23.02.2009, 16:00 | Сообщение # 1
                         | 
                       
                      
                        
                           
                          
                            Администратор
                           
                          
                            Сообщений: 897
                           
                          
                            Статус: Offline
                           
                         | 
                        
                          Удаление файла в корзину 
                           
                          Доступно только для пользователей 
                           
                          Пример вызова функции: 
                          RecycleFile(Filename + #0); 
                           
                          Либо, если изменить строку 
                          pFrom:=PChar(sFileName+#0); 
                          то можно вызывать проще: 
                          RecycleFile(Filename); 
                           
                          Система: Windows 10 x64, Windows XP 
                          Среды программирования: Delphi 7, Delphi 10 Seattle 
                           
                          Я не профессионал, я всего лишь любитель 
                          Я не вредитель, я всего лишь теоретик
                         | 
                       
                      
                        |   | 
                        
                          
                         | 
                       
                     
                   |