Keine Ahnung, ob ich jetzt eventuell auf 'nem total falschen Dampfer unterwegs bin. Hätte es so gemacht:
Delphi-Quellcode:
function GetColumnCount(ForTable: PAnsiChar; InDatabase: PAnsiChar):integer;
var
Query:
String;
begin
Query := '
SELECT * FROM COLUMNS WHERE TABLE_SCHEMA = ''
'+InDatabase+'
''
AND TABLE_NAME = ''
'+ForTable+'
';
//Query := 'SELECT * FROM COLUMNS WHERE TABLE_SCHEMA = ''mydata'' AND TABLE_NAME = ''mytable''';
// Damit es keine Hochkomma(verzähl)orgien gibt:
Query := Format('
SELECT * FROM COLUMNS WHERE TABLE_SCHEMA = %s AND TABLE_NAME = %s', [QuotedStr(InDatabase),QuotedStr(ForTable)]);
mysql_real_query(dbCon,PAnsiChar(
Query),Length(
Query));
end;