+ Un proiect este o colecție de fișiere sursă pentru
a întregii aplicații.
Fereastra managerului de proiecte Delphi vă permite să gestionați selecția fișierelor sursă și a formularelor utilizate în proiectul dvs. Vă puteți imagina un proiect ca un obiect de cel mai înalt nivel din aplicația dvs., constând din obiecte mai mici, cum ar fi formele și obiectele sursă cu cod sursă. Desigur, aplicația poate utiliza numai fișiere și module, dar această vizualizare vă va permite să treceți la dezvoltarea aplicațiilor de o scară mai largă.
Pentru a înțelege mai bine ce este un proiect Delphi, sunați managerul de proiect selectând opțiunea Manager proiect. Managerul de proiect conține o listă a diferitelor fișiere incluse în proiectul Delphi. Există trei tipuri de fișiere.
1. Singurul fișier proiect care conține secțiunea principală a programului care gestionează aplicațiile Windows create în Delphi. Acest fișier are extensia .DPR. Accesul la acesta se poate face folosind comanda Source Source. Fișierul proiectului nu este nici un formular, nici un modul, este un fișier de valoare generală, care este lansat în momentul încărcării aplicației.
2. Unul sau mai multe fișiere de formular (cu module corespunzătoare). Aceste fișiere conțin informații despre modul în care sunt gestionate formularele. Fișierele formate au, de obicei, o extensie .DPM. În aplicația Delphi, există cel puțin o formă.
Proceduri și funcții
Pe lângă modelul obiect, mediul vizual Delphi vă oferă un model de gestionare a evenimentelor; Modelul existențial vă permite să conectați programul și diverse procese cu componente și forme în conformitate cu ordinea excitării anumitor evenimente. Procesul de dezvoltare folosind aceste două modele este foarte rapid
și oferă dezvoltatorului posibilitatea de a scrie programe previzibile. Acest lucru elimină practic necesitatea unui design procedural de modă veche. Cu toate acestea, poate fi necesar să se utilizeze stilul procedural zdrobire metode sau evenimente foarte mari Obra-handler în succesiune efectuat-TION blocuri sau proceduri de funcții mai mici de software. Această caracteristică a fost disponibilă în Pascal, este disponibilă și în Delphi, deoarece Delphi mai suportă un model procedural.
Există mai multe moduri de a face procedura sau
funcția accesibilă în cadrul software-ului principal
La. Cea mai ușoară cale este de a determina titlul
procedurile și corpul programului la începutul implementării -
blocul TION. Deoarece acestea sunt plasate la început, compilatorul-
Se cunoaște deja existența lor
acestea vor fi chemați din orice parte a programului. distribuite
Ne uităm la plăcerea secțiunii de implementare.
punerea în aplicare
MessageDIg ("Da", mtWaming, [mbOk], 0);
procedura Tforml.Button 1click (Expeditor: TObjact);
În acest exemplu, codul pentru evenimentul OnClick de la butonul standard solicită procedura MyProc. Compilatorul nu va emite un avertisment, deoarece a trecut deja la operatorul MyProc la începutul secțiunii de implementare.
Cea de-a doua modalitate de a face procedura disponibilă este să o plasați ca o procedură locală în cadrul procedurii de tratare a evenimentului OnClick: implementare
procedura TForml.ButtonlCllcMSender; TObject);
MessageDIg ("Da", mtWarning, [mbOk], 0);
Dacă codul programului are următoarea formă: implementare
procedura TForml.ButtonlCllcMSender; TObject); începe
procedura MyProc; începe
MessageDIg ("Da", mtWarning, [mbOk], 0); se încheie; end.
procedura MyProc; transmite;
procedura TForml.ButtonlCllcMSender; TObject);
procedura MyProc; începe
MessageDIg ("Da", mtWarning,
Antetul procedurii este declarat, iar numele și parolele acceptate sunt vizibile din orice parte a programului, aflată sub antet. Schimbarea constă în aceea că cuvântul cheie de la început informează programul referitor că codul procedurii executabile trebuie căutat mai departe.
Există o altă modalitate de a face această procedură disponibilă în modulul dvs. După cum știți, totul a fost declarat
numai în secțiunea de implementare a modulului, este disponibilă numai în cadrul acestui modul. Rețineți că în exemplele anterioare, secțiunea de interfață a modulului nu este utilizată. Procedura MyProc, prin urmare, este locală pentru modul. Dacă se presupune că modulul va fi folosit în alt modul, MyProc va fi indisponibil, ceea ce ne va conduce la a treia metodă de includere a procedurii în modul: Interfață
procedura Tforml.Button 1Click (expeditor: TObject);
procedura Tforml.Button 1Click (expeditor: TObject);
MessageDIg ("Da", mtWarning, [mbOk], 0);
Extensiile de limbă PascaI
Luați în considerare adăugările la limba Pascal, făcute pentru Delphi. Unele dintre aceste extensii extind nucleul limbajului Pascal, în timp ce altele simplifică foarte mult programarea reală în Delphi. 1. Declarația cazului.
Delphi oferă optimizarea instrucțiunii Case efectuând două modificări ale funcționării acestui operator: * Intervalele din instrucțiunea Case nu trebuie să se suprapună. De exemplu, de acum înainte, operatorul Casei nu este valid: Case MyChar din
'A', T, 'O', 'U', 'B': Writeln ("Vowel"); 'A'. 'Z'. Writeln ("Capital"); End;
• raționalizarea constantele în declarația de caz, în conformitate cu ordinea de sortare de tipul de sus în jos (de la stânga la dreapta) permite Campiglio-torusului Case optimiza performanța operatorului sub forma tranziției în loc să calculeze de fiecare dată când CME-schenie. Aici este un exemplu al operatorului de caz, care oferă un set de tranziții optimizate: MyChar Cazul „O“ .. „9“: writeln ( „Digital“); 'A'. "Z": Writeln ("Capital"); - "a". "x": Writeln ("Minuscule"); Else Writeln ("Alte simboluri"); End;
Borland Pascal 7.0 a introdus matrice deschise, permițându-vă să dezvoltați proceduri de utilizare generală pentru lucrul cu machete statice de mărime variabilă. De exemplu, puteți declara funcția CalcMean () după cum urmează:
Funcția CalcMaan (X: Array of Real): Real; Parametrul x este o matrice deschisă a tipului de bază Real. Poate fi utilizat CalcMean () pentru ob matrici rabotki de diferite dimensiuni, așa cum se arată în următorul fragment de program: [. 10 ianuarie] Tip ArraylO = „Array Real; Array20 = Array [1..20] Real; Var X1: Array10 ; X2: Array20;
Funcția CalcMean (X: Array of Real): Real; începe
(operatori care definesc); End; începe
Writeln ("Valoarea medie a matricei XI =", CalcMean (XI)); 1
Writeln ("Valoarea medie a matricei X2 = ', CalcMean (X2)); Sfârșit.
Delphi face ca parametrii tipului de rețele deschise să fie și mai utile, permițând construirea unei matrice și trecerea acesteia ca parametru. Pentru a face acest lucru, trebuie să introduceți în paranteze pătrate o listă separată de virgule a valorilor elementelor de matrice. Aici este un fragment al programului, care folosește funcția CallMessain () pentru a crea arhitecturi deschise:
Funcția CalcMean (X: Array of Real): Real;
(operatori care definesc o funcție);
Writeln ("Valoarea medie a matricei 1 =", CalcMean
([1.2,3.4,5.6,7.8]); Writeln ('Valoarea CpeflHee a matricei 2 =', CalcMean ([55,67,6,41,2,48,4]);
3. Rezultatul este variabil în funcție.
Cube: = X * X * X; Rezultat: = X * X * X;
Sarcină. Încercați să creați un proiect pentru calcularea rădăcinii pătrate a ecuației.
Editl va fi folosit pentru a introduce coeficientul A, Edit2 - coeficientul B, Edit3 - coeficientul C.
Creați două butoane: "Găsiți rădăcini" și "Ieșiți".
Articole similare
Trimiteți-le prietenilor: