Delphi і mysql

Я вважаю, що у вас вже встановлений Delphi і все працює чудово. Щоб база MySQL була доступна з Delphi, я рекомендую скачати і встановити об'єкти, які спростять роботу з цією базою. Насправді, в пакеті Delphi 7 вже є деякі компоненти, в закладці Internet, але ті, які я використовую - набагато зручніше.

Щоб встановити ці компоненти, вам потрібно буде розархівувати ZIP файл в директорію / lib /.
Щоб використовувати ці компоненти, додайте інтерфейсні коди:

uMySqlVio, uMysqlCT, uMysqlClient, uMysqlHelpers

Ось і все, що потрібно для установки.

Содіненіе з базою

Сподіваюся, у вас не виникло проблем з установкою і все працює відмінно. Далі я покажу вам, як під'єднуватися до бази, як виконувати SQL запити і як отримувати дані.

Для початку запустіть Delphi і створіть новий додаток. Підключіть інтерфейси uMySqlVio, uMysqlCT, uMysqlClient, uMysqlHelpers і збережіть проект.
Нам потрібно використовувати об'єкт доступу до MySQL, тому в загальній області на головній формі додамо наступне:

Аргументи цієї функції розташовуються в такому порядку:

host, username, password, db, port, socket, try, sockets, client, flag

Сам запит нічим не відрізняється від такого ж, написаного на PhP.
Результат виконання запиту присвоюється змінної MySQLResult, а для виконання використовується об'єкт MySQLClient. Функція виконання запиту приймає три аргументи: сам SQL запит, прапор - зберігати чи результат і змінну, куди буде записаний прапор виконання (true, false).

Таким чином, рядок коду, яку ви бачите вище, привласнює результат виконання запиту змінної MySQLResult. У запиті витягується запис з таблиці admin_users. У логічної змінної OK збережений прапор виконання, тобто, значення true свідчить про успішне виконання, а false означає помилку.

Тепер можна отримати значення поля:

Як можна було здогадатися, це скрипт перевірки імені користувача і пароля. Залишилося тільки зробити перевірку.

Я вирішив зробити це таким чином, що все перевіряється в одному операторі IF, і конкретна причина не видається:

Тут ми перевірили жорстко закодоване ім'я користувача dummy_username з тим, яке повернув запит. Пароль перевіряється таким же чином.

Це не кращий приклад програмування, до того ж рекомендується шифрувати дані за допомогою функції MD5. До речі, для роботи з нею, вам допоможе ресурс www.torry.net. Це був всього лише приклад використання Delphi!

Схожі статті