Használata stringgrid alkatrész
Példaként egy komponens a bemeneti stringGrid tömb, úgy egy programot, amely kiszámítja a számtani középértéke az elemek a tömb. Program párbeszédablak ábrán látható. 5.3. stringGrid komponens lehet belépni a tömb, és alkatrészek Label1 Label2 - megjelenítéséhez magyarázó szöveget és a számítás eredményeként Buttoni - indítására a számítási folyamat.
Ábra. 5.3. Egy párbeszéd ablak bemeneti és array
StringGrid komponenst formájában adjuk hozzá, pontosan ugyanaz, mint a többi komponens. Hozzáadása után komponensek kialakításához szükséges, konfigurációs táblázat szerint. 5.2. Az értékek a szélesség és magasság tulajdonságokat kell használni az egeret, hogy állítsa be úgy, hogy a méret a komponens azonos volt vonal méretben.
A szöveg a program listán látható 5.2.
5.2 táblázat. Ingatlan értékének StringGrid1 alkatrész
Listing 5.2. Bevitele és feldolgozása egy sor egészek
Ablakok, üzenetek, SysUtils, variánsok
Osztályba tartozó, Graphics, Controls, Forms, Dialogs, rácsok, StdCtrls;
eljárás ButtonlClick (Sender: TObject); magán
eljárás TForml.ButtonlClick (Sender: TObject); var
a. array [1..5] egész szám; // tömb
summ: integer; // elemek összege
sr: real; // számtani átlaga
i: integer; // index
// úgy vélik, hogy ha a cella üres, a megfelelő
// tömb elemet s értéke nulla
Ha a length (StringGridl.Cells [i-1, 0]) <>0
majd a [i]: = StrToInt (StringGridl.Cells [i-1,0])
summ: = summ + a [i]; sr: = summ / 5;
Összefoglalva eredmények Label2.Caption: =
'Sum elemek:' + IntToStr (summ)
+ # 13 + „számtani átlag:„+ FloatToStr (SR);
A tárgyalás után fut a program van egy vágy, hogy módosítsa a tömb input folyamat. Tehát, nem lenne jó, ha a kurzor automatikusan a következő cellája, például eredményeként egy gombnyomás
Event text onkeypress feldolgozási eljárás listán látható 5.3. Megjegyzés: a Col tulajdonsága, hogy miközben a program tartalmaz egy táblázatot oszlop számát, ahol a kurzor található. Ez a funkció is használható, hogy a kurzort a kívánt táblázatcellába. Ugyanakkor szem előtt tartani, hogy az oszlop a táblázatban, de mivel a vonalak számozása nullától.
Listing 5.3. Esemény feldolgozási eljárás onkeypress
eljárás TForm1.StringGridlKeyPress (Sender: TObject;
# 8, '0' .. '9'. ; // számok és a legfontosabb
# 13: // a kulcs
ha StringGridl.Col
majd StringGridl.Col: = StringGridl.Col + 1;
mást kulcs: = Chr (0); // többi karakter nem engedélyezettek
Ha azt szeretnénk, hogy vezessenek be egy sor lebegőpontos számok (a: array [1 5] valós), akkor onkeypress esemény eljárás bonyolultabb, így amellett, hogy a számok megengedett karakterek elválasztó karaktert (vessző vagy pont - attól függ, hogy a Windows-beállítások) és .. mínusz. Annak érdekében, hogy egy program barát tekintetében a felhasználó kérheti trükk helyettesítő helytelen behelyezés határoló igaz felhasználó. Határozza meg, mely elválasztó karaktert engedélyezett a jelenlegi beállítás Windows, akkor vegye fel a kapcsolatot egy globális változót Decimaiseparator.
Listing 5.4 mutatja a szöveg beviteli modul alkalmazását és feldolgozásának egy sor tört számok. A feldolgozási eljárás onkeypress biztosít bemeneti eseményeket egy táblázat cella csak megengedett, ha a felvétel egy frakcionális szimbólumok száma.
Listing 5.4. Bevitele és feldolgozása a tömb a tört számok
Ablakok, üzenetek, SysUtils, Változatok, osztályok,
Graphics, Controls, Forms, Dialogs, rácsok, StdCtrls;
Hírek Fórum
Knights-éter elmélet
Ez Kornilov írta az oldalán a szociális háló.
Szerint Kornilov, majd az üzenetet találkozott hitetlenség.
Most Vladimir Kornilov döntött, hogy visszatér erre a témára, amelyek kapcsán tesz közzé a facebook képek titokzatos izraeliek, akik részt vettek az odesszai mészárlást.
A sok kérdés, hogy Kornilov, azt mondta, szeretne választ kapni, például a következők:
„Miért véletlenül sétált Odesszában az orvosi berendezések, gumikesztyű, ahol már előre tudták, hogy lesz sérült és megölte? Vagy miért ez a harcos hirtelen elfelejtett angolul, amikor rájött, hogy a rekordját?”.
Víz tavak, tengerek, óceánok északi --------- lushariya forgatni az óramutató járásával ellentétes Lc m - p-in-k-i, és a víz a déli polushariya - RA - vezetőképes-oldott -sya- PO- h ász nyíl - Obra-zuya- -Oral-hangya-ski-e-ovo vízmű.
Ennek fő oka a forgatás örvények helyi szél.
Minél nagyobb a szélsebesség nagyobb forgási sebességének pezsgőfürdők és ennek következtében nagyobb centrifugális erő pezsgőfürdők, ezzel is növelve a víz szintje a tengerek és óceánok.
És minél kisebb a centrifugális erő pezsgőfürdők, annál alacsonyabb a vízszint a tengerek és óceánok.
Az áramlási sebesség a kerületét a tengerek és óceánok nem mindenütt egyforma, és függ a mélység a parttól. A sekély részben a tengeri áramlatok sebessége megnő, és a mély része a tenger csökken.
Szezonális ingadozások vízszint karóra tsya nem az egész part a tengerek és az óceánok-s, de csak azokban az partjain, ahol -nagy szögsebessége az áramlások, és következésképpen nagy centrifugális erő a víz. (A centrifugális erő F = v / r).
Az egyenes partok, ahol áram nincs szögsebesség vízszint nem emelkedik.