Ich habe es so bis jetzt gehabt:
Delphi-Quellcode:
customer_info: array [0..10, 0..40] of string;
QueryCustomer.SQL.Text:='SELECT * FROM `'+Table_Info[5,1]+'` WHERE customer_company_name='''+FormMain.StringGridKunden.Cells[0,selectedRow]+'''';
QueryCustomer.Open;
for i := 0 to StrToInt(Table_Info[5,2]) - 1 do
Customer_Info[1,i, 1] := QueryCustomer.Fields[i].Asstring;
QueryCustomer.Close;
Wobei im Array
[a,b]
a = Die verschiedenen Tabellen Daten 1: Customer
b = verschiedenen Einträge der Tabellen
Habe es wieder in 2 Dimensional geändert, da 3 Dimensional überflüssig wurde und ich vergessen hatte es zu ändern.