Alkalmazása egy komponens bemenet emlékeztető tömb
Jellemző tulajdonságai a szülő formájában öröklési font
Ha Memo komponens adja meg az értéket az egyes tömb elem a tömb kell beadni egy sorban, és mindegyik után tömb elem nyomni. Hozzáférés a területen található, a Memo sor szöveget, akkor a tulajdonságait a vonalak. meghatározva zárójelben a kívánt sor számát (vonal számozása 0). Az alábbi program, amelynek szövege listán látható 5.5 használatát mutatja be a Memo komponens bemenet egy karakter tömb. A fő hurok bemeneti karakter tömb eljárások Memo komponens néz ki, mint: i: = 1 méretű a [i]: = Memo1.Lines [i];
ahol: méret - nevű konstans, amely meghatározza a méret a tömb; és - egy tömböt; Memo1 - Memo-komponens neve; Lines - Memo komponens tulajdonság, hogy egy tömb minden eleme, amely egy sor található a jegyzet szövegét. A forma a program ábrán látható. 5.4. Memo mező kívül tartalmaz parancs gombot (Button1), ha rákattintunk, amelyen a bemeneti értékeket eleme a tömb területén Memo.
Ábra. 5.4. A dialógus ablak a kérelem bejegyzés tömb
Listing 5.5. Bemeneti vonalak a tömb alkatrész Memo
Ablakok, üzenetek, SysUtils, osztályok, grafika, vezérlők, Forms, ablakokat, menüket, StdCtrls;
eljárás Button1Click (Sender: TObject);
eljárás TForm1.Button1Click (Sender: TObject);
SIZE = 5; // a tömb méretét
egy: array [1..SIZE] string [30]; // tömb
n: egész szám; // a sorok számát be Memo mező
i: integer; // index a tömbelem
ShowMessage (eredetileg adatok kerüljenek be! ');
Kilépés; // kilép az esemény eljárás
// a Memo mező szövege
ha n> méret, akkor
ShowMessage ( „meghaladja a sorok számát a tömb.”);
n: = méret; // belépünk csak az első sor SIZE
a [i]: = Form1.Memo1.Lines [i-1]; // Memo vonalak számozása nullától
// nyomtatni a tömb egy üzenet doboz
végén. A fő munkát TForm1.Button1Click eljárást. amely először ellenőrzi, hogy Memo1 mezőjében. Ha a szöveg (ebben az esetben a tulajdonságai zna Lines.Count nullánál nagyobb), az eljárás összehasonlítja az aktuális sorok száma és mérete a tömb. Ha ez az összeg meghaladja a méret a tömb, a program módosítja a n. ezáltal előállítva az első bemenet csak mérete sorokban. Ábra. 5.5 ábra egy párbeszédablak Írja be az alkalmazás tömb. Miután rákattintott a parancs gombra beviteli ablak jelenik meg (ábra. 5.6), amely tartalmazza az értékek a tömb elemeinek származó feljegyzés -field.
Ábra. 5.5. Alkalmazás ablak bevitele tömb
Ábra. 5.6. Array bemenet Memo -field