Eljárások Delphi, Delphi, Delphi komponens, Delphi forrás

Eljárások a Delphi

Eljárás - egyfajta rutin. Általában végrehajtott rutin eljárásként két esetben:

• ha a szubrutin visszatér a fő program az adatokat. Például rajzol táblázatot a párbeszédablakban;
• ha a szubrutin visszatér a hívó programba annak több értelme. Például egy rutin, hogy megoldja a másodfokú egyenlet, várhatóan visszatér a hívó program a maga két tört számok - a gyökerek az egyenlet.

1. eljárás neve

5. // ez az eljárás utasítások

eljárás paramétereket használnak az adatok továbbítására az eljárást, és az adatok a hívó eljárást programját. Példaként, a 6.5 példa azt az eljárást mutatja másodfokú egyenlet megoldása (amelyet általában írva, mint AX2 + bx + c-O).

A hat paraméter az eljárás: az első három célja közvetíteni, hogy az eljárás kezdeti adatok - az együtthatók az egyenlet; paraméterek X1 és X2 jelentése használni, hogy visszatérjen az eredmény - a gyökerek az egyenlet; ok paramétert használják az információ továbbítására, hogy a megoldás létezik.

Listing 6.5. eljárás SqRoot

01. // megoldani másodfokú egyenletek

02. eljárás SqRoot (a, b, c valós ;. Var XL, X2 valós; .. Var OK logikai);

03. / a, ib, c - az együtthatók az egyenlet

04. XL, X2 - gyökerek

Ha az eljárás leírását, mielőtt a paraméter neve a szó var, akkor, ha hívja a beavatkozáshoz helyett a megfelelő paraméter egy változó, a főprogram. A kifejezés használata, vagy ez egy hiba, és a fordító ebben az esetben egy üzenetet jelenít meg: típusok tényleges és formális var paraméter azonosnak kell lennie (az aktuális paraméter típusát meg kell egyeznie a típus a formális paraméter).

Listing 6.6 ábra a szoftver megoldások a másodfokú egyenlet, amely SqRoot eljárást alkalmazzák. A program ablak ábrán látható. 6.2.

Listing 6.6. A megoldás a másodfokú egyenlet (a használata az eljárást)