Добро пожаловать! Это — архивная версия форумов на «Хакер.Ru». Она работает в режиме read-only.
 

delphi + mysql (теперь нормальный топик)

Пользователи, просматривающие топик: none

Зашли как: Guest
Все форумы >> [Прочее] >> delphi + mysql (теперь нормальный топик)
Имя
Сообщение << Старые топики   Новые топики >>
delphi + mysql (теперь нормальный топик) - 2008-08-02 11:45:03.466666   
sublimator

Сообщений: 184
Оценки: 0
Присоединился: 2008-06-18 14:38:11.173333
мне нужно, что бы программа могла работать с sql базами данных. Я знаю, как реализовать это на php (с помошью спец библиотек), а вот как на делфи - не знаю. пожалуйста, помогите.[&o]
Post #: 1
RE: delphi + mysql (теперь нормальный топик) - 2008-08-02 13:01:33.030000   
KentOne

Сообщений: 178
Оценки: 0
Присоединился: 2008-07-15 16:30:46.030000
Тебе именно mysql нужен?
Делал когда-то, но геморно оно.
У меня выглядит так: в корне где программа, лежат две библиотеки dbexpmysql.dll и libmysql.dll, насколько я помню, идут в поставке сервера, но не факт…Бросаеш на форму TSQLConnection и в обжект инспекторе настраиваешь ему параметры для связи с MySQL.
object SQLConnection1: TSQLConnection &nbsp;&nbsp;&nbsp; ConnectionName = 'MySQLConnection' &nbsp;&nbsp;&nbsp; DriverName = 'MySQL' &nbsp;&nbsp;&nbsp; GetDriverFunc = 'getSQLDriverMYSQL' &nbsp;&nbsp;&nbsp; LibraryName = 'dbexpmysql.dll' &nbsp;&nbsp;&nbsp; LoginPrompt = False &nbsp;&nbsp;&nbsp; Params.Strings = ( &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'DriverName=MySQL' &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'HostName=ServerName' &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Database=DBNAME' &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'User_Name=root' &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Password=' &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'BlobSize=-1' &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'ErrorResourceFile=' &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'LocaleCode=0000') &nbsp;&nbsp;&nbsp; VendorLib = 'libmysql.dll' &nbsp;&nbsp;&nbsp; BeforeConnect = SQLConnection1BeforeConnect &nbsp;&nbsp;&nbsp; Left = 528 &nbsp;&nbsp;&nbsp; Top = 144 &nbsp; end Дальше TSQLQuery на форму брось и прилинкуй к TSQLConnection.

А дальше работа выглядит приблизительно так…
Form1.SQLConnection1.Open; &nbsp;&nbsp; Form1.SQLQuery1.Close; &nbsp;&nbsp; Form1.SQLQuery1.SQL.Clear; &nbsp;&nbsp; Form1.SQLQuery1.SQL.Add('SELECT CrossRoadName FROM CrossRoads order by LastChangeTime DESC limit 1');//формирование запроса &nbsp;&nbsp; Form1.SQLQuery1.Open;//выполнение запроса &nbsp;&nbsp; PrkName:=Form1.SQLQuery1.FieldByName('CrossRoadName').AsString;//вычитка ответа Form1.SQLConnection1.Close; Если тебя не одно значение интересует, а много, то:
Form1.SQLQuery1.Open; &nbsp;&nbsp; for i := 1 to Form1.SQLQuery1.RecordCount do &nbsp;&nbsp;&nbsp;&nbsp; begin &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Obj[i].Hight:= Form1.SQLQuery1.FieldByName('Hight').AsInteger; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Obj[i].Width:= Form1.SQLQuery1.FieldByName('Width').AsInteger; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Form1.SQLQuery1.Next; &nbsp;&nbsp;&nbsp;&nbsp; end; Чуть не забыл, если ты выполняешь не запрос выборки, а изменения бызы, то вместо SQLQuery1.Open, следует использовать SQLQuery1.ExecSQL(True), что означает булевский параметр уже не помню, но в коде всюду true стоит….

Post #: 2
RE: delphi + mysql (теперь нормальный топик) - 2008-08-02 14:40:39.623333   
sublimator

Сообщений: 184
Оценки: 0
Присоединился: 2008-06-18 14:38:11.173333
спасибо тебе большое, добрый человек.
+2 (один от себя, др от товарища )
Post #: 3
RE: delphi + mysql (теперь нормальный топик) - 2008-08-03 04:42:08.930000   
sublimator

Сообщений: 184
Оценки: 0
Присоединился: 2008-06-18 14:38:11.173333
слушай, еще один вопрос. все это мне нужно, для того чтобы написать программу для тестирования: Человек создает тест в спец проге                 (указывает сколько вопросов, какие варианты ответов, какие правильные…), создаетсся файл, который передается клиентской программе, которая выдает его испытуемому. после прохождения теста клиентка создает лог файл с ответами и передает его главной программеж.
вторую часть алгоритма я знаю, как осуществить, а вот как сделать создовалку для тестов я не знаю.

Post #: 4
RE: delphi + mysql (теперь нормальный топик) - 2008-08-03 13:43:20.980000   
KentOne

Сообщений: 178
Оценки: 0
Присоединился: 2008-07-15 16:30:46.030000
Посмотри как тут сделали http://www.softholm.com/download-software-free5483.htm, когда-то таких исходников масса была.
Post #: 5
RE: delphi + mysql (теперь нормальный топик) - 2008-08-03 13:50:09.543333   
KentOne

Сообщений: 178
Оценки: 0
Присоединился: 2008-07-15 16:30:46.030000
Вот у себя нашел не плохой экземпляр http://www.rapidshare.ru/746606
Post #: 6
RE: delphi + mysql (теперь нормальный топик) - 2009-02-21 13:56:58.110000   
LoaDырь

Сообщений: 1
Оценки: 0
Присоединился: 2009-02-21 13:46:48.023333
добрый день!
для диплома пишу программу:

на одном компьютере считается функция, данные пишутся в бд в инете.
на другом компьютере, по запросу эти данные читаются.

уже реализовал подсчет функции, сохранение данных локально, но возникают трудности c использованием mysql и соответственно размещением данных в инете.)
помогите пожалуйста, кто чем может
Post #: 7
Страниц:  [1]
Все форумы >> [Прочее] >> delphi + mysql (теперь нормальный топик)







Связаться:
Вопросы по сайту / xakep@glc.ru

Предупреждение: использование полученных знаний в противозаконных целях преследуется по закону.