1 Ανοίξτε την κονσόλα Δελφών πηγαίου κώδικα και κάντε κλικ κάπου σε μορφή κειμένου στη δεξιά πλευρά 2
Πληκτρολογήστε τον ακόλουθο κώδικα στη φόρμα : .
διαδικασία TForm1.Button1Click (Αποστολέας : TObject ) ? vari : Ακέραιος ? beginfor i : = 0 έως FileName1.Items.Count - 1 doDeleteFile ( FileName1.Items [ i ] ) ? FileName1.Update ? τέλος?
Αντικατάσταση κάθε περίπτωση " FileName " στον κώδικα με το πραγματικό όνομα του αρχείου που θέλετε να διαγράψετε .
εικόνων 3
Πατήστε το πλήκτρο "Enter" για να εκτελέσει την εντολή . Το αρχείο σας , μαζί με όλους τους υπο-φακέλους και τα αρχεία , θα διαγραφούν από το σύστημα .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα