Csatlakozás mysql-hez a lazarus alkalmazásból
Próbáljuk meg a kérdést megválaszolni, hogyan kapcsolhatjuk be a Lazarust a MySQL adatbázisba, és hogyan lehet egyszerű lekérdezéseket végrehajtani a Lazarus alkalmazás fő összetevőivel. Nem fogjuk használni az adat-leképezési összetevőt, csak az adatbázisok közötti kölcsönhatás elvét fogjuk megmutatni. És szeretném felhívni a figyelmet arra a tényre, hogy a Lazarus és a Delphi programozás lényegében hasonló, és kódjuk nem sok más.
A Delphihoz hasonlóan a Lazarus a RAD környezet (gyors alkalmazásfejlesztés), amely lehetővé teszi a felhasználói felület gyors létrehozását. A Delphi-tól eltérően a Lazarus egy cross-platform környezet. Támogatott operációs rendszerek, mint például a GNU / Linux, a Microsoft Windows, a Mac OS X, a FreeBSD, a WinCE. Talán a Delphi átalakítása Lazarus projektekké alakul.
Példa egy Lazarus alkalmazás összekapcsolására MySQL adatbázisra:
Új projektet kell létrehoznod a Lazarusban:
Automatikusan új űrlap keletkezik.
Letöltés - MySQL telepítési szabályok a Lazarusban (20,17 MB) = 4,55 perc.
Próbálja meg nyújtani (1. ábra), és nevezze át a címet "TryMySQL" -ra.
1. ábra: Ez az, ami történnie kell
Helyezzen három darabot a formanyomtatványon (lásd az 1. ábrát) a Standard lapról, és tegye a TLabel komponenseket mindegyik fölé. Kérd meg őket, fejlécek 'Host' (és HostLLabel nevek, HostEdit), 'username' (UserLabel, UserEdit) és a 'Password' (PasswdLabel és PasswdEdit). Alternatív megoldásként a TLabelledEdit összetevőt is használhatja a További lapon.
Keresse meg a PasswdEdit összetevő PasswordChar tulajdonságát, és változtassa meg "*" -ra, így a jelszó beírásakor ezek a karakterek lesznek megjelenítve ("************"). Győződjön meg róla, hogy az összetevő Szöveg tulajdonsága nem tartalmaz szöveget.
A formanyomtatvány jobb felső sarkában még egy Tedit és TLabel komponenst kell elhelyezni (1. ábra). Módosítsa a címet "SQL parancs beadására", és nevezze át az összetevőt a CommandEdit programba.
Helyezzen három nyomógombot a formanyomtatványra, kettőt balra a TEdit komponensek alatt, és egy a jobb oldalon a komponens alatt a parancsok számára.
Módosítsa a bal oldali gombok címke tulajdonságait a "Csatlakozás az adatbázisba" (ConnectButton) és az "Exit" (ExitButton) és a jobb gombbal a "QueryButton" -ra.
Helyezzen egy nagyméretű TMemo-t az "Eredmények" címre (ResultMemo) a bal alsó részen úgy, hogy a tér többi része megtelt legyen. Keresse meg a ScrollBars tulajdonságot, és állítsa be az ssAutoBoth értékét úgy, hogy az összetevő függőlegesen és vízszintesen gördítse a szöveget. Állítsa a WordWrap tulajdonságot True értékre.
Helyezze az állapotjelző sort (TStatusBar a Közös ellenőrzések fülön) az űrlap alján található űrlapon, és írja be a "TryMySQL" sort a SimpleText tulajdonságba:
Most meg kell írni néhány kezelőt.
Az űrlap bal oldalán három TEdit összetevő található a gazdanév, a felhasználónév és a jelszó megadásához. Miután megadta a kívánt adatokat, kattintson a Csatlakozás gombra. A gomb OnClick kezelője részben az FPC modulra épül, amelyet fent említettünk.
Az adatbázisban található lekérdezések eredményei nem láthatók azonnal a Pascal író vagy író utasítások használatával. először a stringeket és a kimenetet a TMemo összetevőhöz kell konvertálni.
Bár Pascal levelet szereplők és writeln és képesek átalakítani a fajta „on the fly”, ebben az esetben a használata TMemo komponens kimeneti szöveges igényel közvetlen átalakítása típusú string formájában, illetve változók, mint Pchar kell alakítani húrok segítségével StrPas, és a számok az IntToStr funkcióval konvertálni.
Ehhez vonalakat kell hozzáadni a TMemo használatához:
Így a ConnectButton kezelő így fog kinézni:
És a jobb oldali beviteli mező lehetővé teszi számunkra, hogy az SQL parancsokat vesszük a pontosvessző nélkül "; ”. amint megadja a lekérdezés szintaxisát - kattintson a SendQuery gombra - a lekérdezés végrehajtásra kerül és az eredmény megjelenik a ResultsMemo összetevőben.
A SendQuery kezelő újra az FPC verzióján alapul, kivéve a típus átalakítását a következő karakterek megjelenítéséhez.
Az FPC program és a program közötti különbség az, hogy ha hiba történik, a Free Pascal program kilép, de a MySQL munkamenet nyitva marad. A második programban a vezérlő visszatér a fő űrlaphoz, és próbálkozhat újra beírni. Végül az alkalmazás a második esetben általában befejezi a munkáját (miközben bezárja a MySQL munkamenetet), amikor megnyomja a Kilépés gombot.
Ismét megismétlem, a Lazarus és a Delphi programozás lényegében hasonló, és a programkód nem sok más. Nem lesz nehéz megérteni és megérteni a jelentéktelen különbségeket az írásprogramokban.
Az alábbiakban a SendQuery gomb kezelőjének kódja található:
A következő cikkben megnézzük: - "Példa az adatbázis táblának létrehozására a lazarusban".