6. lecke - Egy egyszerű szövegszerkesztő
Share on forma TMemo. és TMainMenu. Mi létre az Align tulajdonság alClient a komponens elnyúlt az összes szabad helyet formákat. Mi létre görgetősávokkal ingatlan ssBoth. és wordwrap False. És távolítsa el a beírt szöveg Memo1 defaul, hogy a szövegből az ingatlan Lines.
Nézzük kattintson MainMenu1 kétszer - egy ablak jelenik meg. Most hozzon létre egy menü „Fájl”. Ebben az elemeket: "Új", "Open", "Save", "mentés másként". Elválasztó csík ( "-" jel) és az "Exit"
Telepíti parancsikonokat az 1. ábrán látható gyorsgombok vannak beállítva, hogy parancsikon tulajdonság
Ábra. 1 - „Fájl” menü
Hasonlóképpen létre az „Edit” menü:
Ábra. 2 - "Edit" menü
Hasonlóképpen, hozza létre a „Format” menü:
Ábra. 3 - menü "Format"
Ábra. 4 - Esemény létrehozása onClick
Megjegyezzük, hogy a listát, és Form1.Close ugyanezt. mert formában a szülő a szülő neve elhagyható.
Most, miután a menüből válassza a „Kilépés” zárja a programot.
Megvalósítás sortörés
A "Format" válassza ki a "Wrap":
Mi meg fogja érteni, amit csinálunk: ha már beállított átviteli mód szerint, hogy távolítsa el, és állítsa be a kullancs az N14. És fordítva.
Végrehajtása „mentés másként”.
Meg kell menteni a dokumentumot párbeszédablak. Az általunk használt alkatrész TSaveDialog a párbeszédablakok fülre. Közzéteszi az űrlapot. Létrehozása szűrő, azaz a a fájlokat, hogy ez a párbeszéd jelenik meg. Meg kell * .txt, azaz szöveges dokumentumokat. Ehhez meg kell találni a Filter tulajdonság, és nyomja meg a gombot. ablak jelenik meg. Töltse ki ábrán látható. 5.
Most változik DefaultExt tulajdonságot * .txt. Ez egy kiterjesztés, amely hozzáadódik a fájl.
Hozzon létre egy eljárást, hogy mentse a fájlt. Írja be ezt a kódot közvetlenül.
Következő vyberaem a menüben a „File” -> „mentés másként”.. Ott írunk:
Mit kell csinálni, és hogyan működik? Nagyon egyszerű! Amikor a felhasználó, hogy kiválassza a menüpont a „Mentés”. Az eljárás az úgynevezett SaveAs, amiről már írtam. Most úgy az eljárás SaveAs. Ha az Execute függvény TSaveDialog mentése párbeszédablak jelenik meg, és ha a felhasználó rákattint a mentés gombra, az Execute függvény visszatérési Igaz mást hamis. Ha az eljárás értéke igaz SaveToFile kerül végrehajtásra. azaz menteni a fájlt. A SaveDialog1.FileName tárolt fájl elérési útvonala, ahol a felhasználó megadja a párbeszédben.
Kidolgoztam egy globális változó FileWork. Ez tárolja a fájl elérési útját, ahova a felhasználó dolgozik. Ennek célja, hogy hajtsák végre a „Fájl” -> „Save”. Ne felejtsük el, hogy állapítsa meg a Var, részben a végrehajtás előtt. Meg kell lenni, mint ez:
Végrehajtása „Mentés”
Vyberaem "File" -> "Save". És írunk:
Ha egy felhasználó ment egy fájlt már FileWork valami tárolt, de semmi esetre sem egy „üres”. Ha egy tárolt „”, azaz a Semmi sem tartotta a hívást SaveAs. Ez csak azt mutatja, a Mentés párbeszédablak. Ha a változó FileWork nem üres, majd mentse a fájlt a meghatározott módon FileWork.
Végre kell hajtani a „Megnyitás”
Ezen kívül van TSaveDialog TOpenDialog. És ha valaha is tud egy kicsit angolul, akkor már felismerték, hogy ez a komponens célja, hogy nyissa meg a fájlokat.
Tedd ezt a komponenst az űrlapon, és változtassa meg a szűrő ingatlan, valamint a SaveDialog1.
Általában alkatrészek TSaveDialog és TOpenDialog nagyon hasonló. Nyílt párbeszéd nevezik - Execute funkciót. amelyek értéke igaz, ha a felhasználó akar nyitni a fájlt.
Kattintson a "Fájl" -> "Open". levelet:
Elindítja a programot és próbálja meg az F9 billentyűt. Ha minden jól végzik-e, meg kell dolgozni.
Végre kell hajtani az „Új”
Kattintson a "Fájl" -> "Create". levelet:
Itt minden világos és magyarázat nélkül. Mégis azt magyarázza: az első sor törli FileWork, azaz A program nem tudja, hogy mi valahogy működik fájlt. A második sor törli Memo1.
Végrehajtása a funkciók a menüben az „Edit”
Ha rákattint a „Cut” menü:
Ha rákattint a „Másolás” menü:
Szerint a „Beszúrás” menüt, kattintson ide:
Végrehajtása a funkciók a menüben „Font”.
Szükségünk lesz még egy összetevő - TFontDialog. Az a függvény ugyanaz, mint a TOpenDialog és TSaveDialog - Execute. Hozz létre egy eseményt, kattintson a menü „Font”..
Ha a felhasználó alkalmazta a változások, a betűtípus ingatlan Memo1 rendelni a kijelölt betűtípus beállítást a felhasználó által. Úgy tárolja a betűtípus ingatlan FontDialog1.
Teljes.
A legfontosabb része a program meg van írva. Nagyon kevés. Meg kell, hogy az aktív formában jelennek meg az Object Inspector az eszközök, hanem azért, mert Memo1 ami feszített a teljes forma lehetetlen megtenni. Számos módja van. Egyszerűen válasszon ki egy űrlapot az Object TreeView. És kiválaszthatjuk Memo1, majd tartsa lenyomva a Shift billentyűt, és kattintson a Memo1 újra.
Tehát, ha már aktiválta a formában. Változás a cím az ablak: a Caption tulajdonság típus „jegyzettömb”. Pozíció ingatlan változás poScreenCenter formákba megjelent a képernyő közepén.
És végül adjunk hozzá XPMan modult a modulok listáját (használja rész). Meg kell kinéznie:
Töltse le a forráskódját a program
7. lecke - Learning komponensek TImage, TGroupBox, TRadioGroup