Topic: ОТЧЕТ (SQL) - данные из связанной таблицы, подскажите по скрипту.
Есть скрипт для вывода выбранных строк в отчёт.
procedure frmDeviceBase_bSQLReport_OnClick (Sender: TObject; var Cancel: boolean);
var
i,c: integer;
s: string;
begin
s := '';
frmDeviceBase.bSQLReport.dbSQL := 'SELECT clientName, numberRMA, serialdevice, serialcomponent, DeviceFullName FROM devicebase';
c := frmDeviceBase.GridDevice.RowCount-1;
for i := 0 to c do
begin
if frmDeviceBase.GridDevice.Selected[i] then s := s + 'devicebase.id='+IntToStr(frmDeviceBase.GridDevice.dbIndexToID(i)) + ' OR ';
end;
if s <> '' then
begin
SetLength(s, Length(s)-4);
frmDeviceBase.bSQLReport.dbSQL := frmDeviceBase.bSQLReport.dbSQL + ' WHERE ' + s;
end;
end;
и всё вроде нормально, только вот мне в этот отчёт надо впихнуть данные "CompanyNameLite" из связанной таблицы "CompanyInformation", Может кто подскажет?
Заранее благодарю!