По поводу Delphi и Access

[damuriders]

Вопрос такой.
Есть таблица типа:
id|тип|название|
0|1|один|
1|1|два|
2|2|три|
3|1|четыре|

ListBox1.Items.addObject(ADOQuery1.Fields[3].AsString, TObject(ADOQuery1.Fields[0].AsInteger));

И есть два листбокса. Как сделать чтоб в первый листбокс выводились строки с типом 1 а во второй с типом 2.

[Serge_Bliznykov]

либо сделать два запроса (первый для одного типа, второй - для другого),
либо там, где Вы добавляете записи в ListBox, просто дописать условие:

if ADOQuery1.FieldByName('тип').AsInteger = 1 then
   ListBox1.Items.addObject(ADOQuery1.Fields[3].AsString, 
         TObject(ADOQuery1.Fields[0].AsInteger))
else
  if ADOQuery1.FieldByName('тип').AsInteger = 2 then
   ListBox2.Items.addObject(ADOQuery1.Fields[3].AsString, 
         TObject(ADOQuery1.Fields[0].AsInteger));