Lucrul cu directoare (foldere) în Delphi

În acest articol vă va prezenta la unele dintre caracteristicile standard pentru lucrul cu directoare. Și aici sunt câteva funcții definite de utilizator și exemple de utilizare a acestora. De asemenea, ia în considerare apelarea unui dialog de selecție director.

Pentru a începe, începe cu o funcție simplă de a crea un nou dosar. Forma generală a unei astfel funcții:

Aceasta este, în cazul în care dosarul este creat cu succes functia returneaza true. Imediat un exemplu simplu de utilizarea acestuia:

Când faceți clic pe un program încearcă să creeze un folder numit TestDir pe C: unitatea, iar dacă încercarea a fost de succes, este afișat mesajul. Trebuie remarcat faptul că, dacă nu specificați litera de unitate pe care doriți să creați un dosar, funcția va crea un folder în același director ca și programul în sine.

conduc la același rezultat.

Imediat Vreau să vă avertizez că această funcție poate elimina numai foldere goale, și dacă există ceva, atunci există o eroare! Dar există o soluție. Aici am ajuns la ajutorul funcției definite de utilizator cu un nume simplu MyRemoveDir. Aici este descrierea funcției:

Copiați totul în programul tău, atunci această funcție poate fi numit ca aceasta:

Acum, un pic pas înapoi de la munca imediat cu dosare și să ia în considerare problema de interes pentru mulți. Cum de a apela caseta de dialog pentru a selecta un dosar (cum ar fi atunci când instalați software-ul). JUST.

Conectarea la modulul foloseste Filectrl.pas (de exemplu, folosește FileCtrl;). Acum, a pus pe formularul are un buton (a nu se confunda :) și scrie următorul cod:

Când selectați un director în forma antetul afișa numele său!

Un exemplu de utilizare a acestuia (ca întotdeauna am pus pe forma butonului nou, și apoi în scris)

Și, în cele din urmă aduce funcție pentru a verifica dacă există sau nu directorul. Forma sa generală este după cum urmează:

În cazul în care un director este specificat în parametrul Numele există - atunci funcția returnează true.

Sper că te-a ajutat o descriere a acestor funcții și proceduri. Vreau doar să dea sfaturi de multe ori uita la HELP, există o mulțime de informații interesante și utile!

articole similare