Programozás Delphi Lazarus
Gombot. Tulajdonságok és eseményeket. Üzenetküldési funkciók párbeszéd. A Windows rendszert, valamint a Delphi, a sok gomb, ami jellemzi a különböző tulajdonságok és célját. Ebben a leckében úgy a leggyakrabban használt gombokat. Az első - a leggyakoribb - található a Szokásos lap a komponens paletta - Köztudott, hogy a végrehajtás minden program kíséri a különböző üzeneteket, lehet, hogy hibákat, figyelmeztetéseket, információk, stb Üzenetek megjelenítéséhez a képernyőn, több funkciót. Használja a mi esemény megnyomásával a legegyszerűbb üzenet (ShowMessage funkció) - A kijelző mutatja a panel, hogy azt mondja: „nyomja meg az 1”:
eljárás TForm1.Button1Click (Sender: TObject);
kezdődik
nbsp nbsp ShowMessage (gomb megnyomása 1 ');
végén;
.
Ezek az összetevők találhatók a párbeszédablakok lapján komponens palettán. Telepítse ezen elemek formájában sehol. Ezek a termékek nem jelenik meg, ha az alkalmazás futtatásához, és csak az úgynevezett a program végrehajtása közben.
OpenDialog - való hozzáférés a lemezen található fájlokat a nyitáshoz és SaveDialog - ellentétben menteni a fájlokat a lemezen. Párbeszédek kell létrehozni a felhasználás előtt, vagyis a be kell állítania a kiterjesztést a fájlnév keressen nyitás és automatikus hozzáfűzése a nevét, ha a fájl mentése. Válassza ki az első OpenDialog, és a szűrő tulajdon, kis gomb. Egy ablak jelenik meg „File Editor”
Most létre kell hoznunk eseménykezelõkkel. Hozzon létre egy kezelőt OpenButton gomb:
eljárás TForm1.OpenBtnClick (Sender: TObject);
kezdődik
nbsp nbspif opendialog1.execute majd // egy párbeszédpanelen fájlok megnyitását, és ha végre (nyomja meg az „OK”), akkor:
nbsp nbsp memo1.lines.loadfromfile (opendialog1.filename); // Load karakterlánc fájlból általunk készített notebook
végén;
És ne felejtsük el, hogy hozzon létre egy kezelőt SaveBtn gomb:
eljárás TForm1.SaveBtnClick (Sender: TObject);
kezdődik
nbsp nbsp ha SaveDialog1.execute majd // mutat párbeszédablak mentse a fájlokat, és ha ő tette:
nbsp nbsp memo1.lines.savetofile (savedialog1.filename); // mentése Jegyzettömb fájl összhangban
végén;
Alkalmazás futtatásához, és győződjön meg arról, hogy most menteni a szöveges fájlokat általunk készített, valamint letölthető a lemez meglévő szöveges fájlokat. Sőt, már kiderült, meglehetősen kezdetleges, de mégis megállapítja.