в delphi надо сделать отображение полей из бд

[Proxx]

проблема в том что у меня есть 3 таблицы которые взамодейсвуют друг с другом это fizlica(Физ.лицо) ,yrlica(юридическое лицо), zakaz(заказ). вот мне надо чтобы в dbgrid-e отображалось поле в зависимости от того с кем заказ подписан если с физ.лицом тогда поле fam , если юредическое лицо тогда поле naimorg


я пробую через переменные...

if ADOQuery1.FieldByName('kodfiz').Value='null' then
 begin
  fiokln:=' naimorg ,';
  tablkln:=' yrlica y, ';
  uslkln:=' and y.kodyr=z.kodyr ';
  end else begin
  fiokln1:=' fam ,';
  tablkln1:=' fizlica f, ';
 uslkln1:=' and f.kodfiz=z.kodfiz ';
End;

.......................

ADOQueryinfo.Close;
ADOQueryinfo.SQL.Text:='select nzak,data_pr,srok_v_zak,'+fiokln+''+fiokln1+' statuszak,naimiz,sernomer,tiprem,b_u,carap_skol,sumka,zaradnoe,korobka,diski,shnuri,naimotd'+Xfio+
' from '+tablkln+''+tablkln1+' zakaz z,otdel o,izdeliya e'+Xinz+' where e.kodiz=z.kodiz '
+den+xkod+Xkodinz+uslkln+uslkln1;
ADOQueryinfo.Open;

ну он не отображает тогда ничяго.......

[evg_m]

реш первое чисто SQL
по условию заполнено только одно из полей fiz.FIO или ur.naimorg
делаем слияние дтих двух полей с заменой пустого поля (=NULL) на пустую строчку.

ВНИМАНИЕ! запись следующей строки зависит от используемой СУБД.
select IIF(fiz.fio=NULL,'') + IIF(ur.naimorg=NULL,ur.namimorg) as naim, 
... // остальные поля
from zakaz // берем основную таблицу 
// и присоединяем к ней две другие (fiz ur )
left join fiz ON zakaz.fiz =fiz.id //условие связи строк таблиц zakaz и fiz
left join ur  ON zakaz.ur  =ur.id  //условие связи строк таблиц zakaz и ur

вариант второй самый простой (опять SQL)
делаем отдельно для fiz и ur и потом объединяем (union)

select ...., fiz.FIO as naim
from zakaz inner join zakaz.fiz = fiz.id
union
select ...., ur.naimorg as naim
from zakaz inner join zakaz.ur  =ur.id

вар три. использовать вычислимые поля Delphi TcalcField

select fiz.fio, ur.naimorg, // далее из двух полей "вычислить программно" нужное
... // остальные поля
from zakaz // берем основную таблицу 
// и присоединяем к ней две другие (fiz ur )
left join fiz ON zakaz.fiz =fiz.id //условие связи строк таблиц zakaz и fiz
left join ur  ON zakaz.ur  =ur.id  //условие связи строк таблиц zakaz и ur

[Proxx]

спасибо большое)))))

[Proxx]

подскажите как сделать чтобы при 2-ом нажатии мышки по dbgrid столбец записывался в listbox и если еще нажал то к тобу что было прибавилось через ; например))))

[evg_m]

чтобы при 2-ом нажатии мышки по dbgrid

DbgridX.Ondblclick оно?

столбец

DBgrid F1 SelectedIndex Columns SeeAlso

записывался

и что сразу весь (все строки из данного столбца)?
1. найти (узнать из свойств) нужное поле (field) набора данных
2. пройти по всем записям нужного набора данных
3. записать полученные значения (string) в ListBox. (отредактировать/добавить строку)

F1 ListBox Items
Properties (исправить, изменить строку)
Methods (найти нужную, добавить строку)

что было прибавилось через ;

[Proxx]

спс но решил по другому))))))
FinzPriem.ListBox1.Items.Add(ADOQue ryrab.FieldByName('naimrab').AsStri ng+' цена:'+ADOQueryrab.FieldByName('cen a').AsString) ;