Datenbank-Einsteiger-Tutorial für mySQL-Datenbanken

[Luckie]

Der Fehler wäre relativ einfach zu beheben gewesen:

Delphi-Quellcode:

if ExecQuery(DBNAME, query, Cols, Rows) then // <- if eingefügt
      begin
        for i := 0 to length(Cols) - 1 do
        begin
          s := s + Cols[i];
        end;
        for i := 0 to length(Rows[0]) - 1 do
        begin
          s := s + ' ' + Rows[0, i];
        end;
      end;

Wenn man dann die DB und die Tabelle erzeugt, geht alles wunderbar.