Zunächst mal finde ich die Sequenz
ini.Readstring('Server','Datenabnk','')
verdächtig. Hier müßte es ja wohl 'Datenbank' heißen. Außerdem sollten alle PChar in PAnsiChar geändert werden, um halbwegs die Kompatibilität zu Delphi2009 herzustellen. Sie schreiben "Problem ist, dass nichts übergeben wird". Hmm, soll vermutlich soviel heißen, wie "Der Eintrag wird nicht vorgenommen, aber ich erhalte auch keine Fehlermeldung".
Ich würde sagen, das liegt an der nicht initialisierten Variable "
query". Richtig müßte es heißen:
Delphi-Quellcode:
var
query: AnsiString;
begin
...
query := '
INSERT INTO testtable(titel, datum , von, bis, text) VALUES (titel, datum, von, bis, text)';
if mysql_real_query(_myCon, PAnsiChar(
query), Length(
query))<>0
then
raise Exception.Create('
Schon wieder was falsch - ' + mysql_error(_myCon));
...
end;