Hurrah, ich hab's geschafft!
Mit einer ADOConnection zum
MSSQL-Server und einer ADOQuery, die direkt dem Dataset der DataSource zugewiesen wird, lässt sich das DBAdvGrid dann wunderschön programmgesteuert (hier zum Testen über einen Button) mit Datensätzen aus einer
SQL-Abfrage füllen:
Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
Var Artikel: Array[1..5] of String =
('4500101','3002001','D3552900','CA2540203','1201600');
begin
ADOQuery1.Prepared := True;
SQLStr := 'Select Bemerkung from aplanpos where aplan = ' +
chr(39) + Artikel[i] + Chr(39) +
'Order by position';
ADOQuery1.Active := False;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(SQLStr);
ADOQuery1.Active := True;
If i > 4 then i:= 1 else inc(i)
end;
Zugegeben, ohne die wertvollen Infos hier aus dem Forum wäre ich da nicht so schnell weitergekommen. Das ist eine prima Sache hier, das muss ich schon sagen.
Nochmals vielen Dank und Grüße Jürgen