Code:
for zeile := 0 to Form1.Query1.FieldCount-1 do
for spalte := 0 to Form1.Query1.FieldCount-1 do
Excel.Cells[Zeile+1].value := Form1.Query1.Fields[Zeile].AsString;
Also ich verwende ein OLEExcelObjekt und eine ExcelApplication, sicherlich muß ich die Zeile angeben, habe ich ja uch getan mit (Zeile+1), da sie in Excel mit 1 beginnt und nicht wie ne
Paradox mit 0. Nun weiß ich aber nicht wie ich ihm das sagen soll, das er dann mal ne Zeile nach unten gehen soll, wenn im
Query auch ne neue Zeile beginnt.