Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.11;
Скачать: CL | DM;

Вниз

Как вывести SQL запрос в DBComboBox?   Найти похожие ветки 

 
Liona   (2004-04-12 15:37) [0]

Как вывести SQL запрос в DBComboBox? Вот сам запрос, а как вывести данные?

var DB:PMySQL;
   Qry:String;
   QryASCIIZ:PChar;
   result:PMYSQL_RES;
   row:PMySQL_Row;
begin
   DB:=mysql_init(nil);                    {init database handler}
   mysql_real_connect(DB,"progr.tsi.com","test","testuser","temp",0,nil,0); {connect}
   qry:="select a,b,c from abc where b>10 order by a"; {make query}
   GetMem(QryASCIIZ,length(qry)+1);        {Get memory for ASCIIZ string}
   StrPCopy(QryASCIIZ,qry);                {Copy qry to ASCIIZ string}
   mysql_real_query(DB,QryASCIIZ,length(qry));        {Execute query}
   result:=mysql_use_result(DB);           {Get result}
   row:=mysql_fetch_row(result);           {Get current row of result}
   while mysql_eof(result)=0 do
       begin
          ShowMessage(row[0]+":"+row[1]);  {Result output}
          row:=mysql_fetch_row(result);    {Get current row of result}
       end;
   FreeMem(QryASCIIZ);                     {Free memory of result}
   mysql_close(DB)                         {disconnect}
end;


 
Liona   (2004-04-12 16:04) [1]

Ну неужели никто незнает?


 
Курдль ©   (2004-04-12 16:06) [2]


> Вот сам запрос...

Вы считаете, что это запрос? Это целый транспорт какой-то...


 
Liona   (2004-04-12 16:16) [3]


> Вы считаете, что это запрос? Это целый транспорт какой-то...

Это конечно не сам запрос, это Event по нажатию на кнопку в Delphi. Но все коннектится. А как это выложить в DBComboBox?
Ну так покажите и научите, а за одно ответьте на опррос.


 
Курдль ©   (2004-04-12 16:22) [4]


> Ну так покажите и научите, а за одно ответьте на опррос.

Трудновато, т.к. многие классы "за кадром". Например, не могу себе представить, что такое PMySQL...
Корректно вывести результат запроса в DBComboBox можно только одним способом - передав набор данных через DataSource. А как грузануть его прямо из памяти я не знаю...
Думаю, что Вам лучше всего спросить у того, кто это писал :)


 
clickmaker ©   (2004-04-12 16:26) [5]

А зачем именно DBComboBox?

while mysql_eof(result)=0 do
      begin
         ComboBox.Items.Add(row[0]+":"+row[1]);
         row:=mysql_fetch_row(result);    {Get current row of result}
      end;


 
Liona   (2004-04-12 16:29) [6]

А как через DataSource? Учитывая что соудинение уже есть.


 
clickmaker ©   (2004-04-12 16:37) [7]


> Liona   (12.04.04 16:29) [6]

Для DataSource нужен DataSet. А в данном примере, наскоко я понял, результат получен напрямую из объекта DB. Поэтому зачем наворачивать с DataSourcами?


 
Liona   (2004-04-12 16:45) [8]

clickmaker - ну и ладно, спасибо большое. :)



Страницы: 1 вся ветка

Текущий архив: 2004.04.11;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.029 c
14-1081877815
Zacho
2004-04-13 21:36
2004.04.11
Новосибирск


3-1079523655
ligor
2004-03-17 14:40
2004.04.11
подключение к DB2 через DBExpress


14-1082046598
BRT
2004-04-15 20:29
2004.04.11
написание FLASH PLAYERа для моб.тел. Symbian ?


6-1075395092
Alexis
2004-01-29 19:51
2004.04.11
ошибка при отправке почты


1-1079886759
новичок_из_сыктывкара
2004-03-21 19:32
2004.04.11
Всплывающая подсказка