Thema: Delphi MySQL ohne Komponenten

Einzelnen Beitrag anzeigen

samso

Registriert seit: 29. Mär 2009
439 Beiträge
 
#310

Re: MySQL ohne Komponenten

  Alt 13. Nov 2009, 15:04
Dann vielleicht etwa so:
Delphi-Quellcode:
var
  query: AnsiString;
begin
  ...
  query := 'INSERT INTO testtable(titel, datum , von, bis, text) VALUES (' +
           QuoteString(titel) + ',' +
           QuoteString(datum) + ',' +
           QuoteString(von) + ',' +
           QuoteString(bis) + ',' +
           QuoteString(text) + ')';
  if mysql_real_query(_myCon, PAnsiChar(query), Length(query))<>0
  then
    raise Exception.Create('Schon wieder was falsch - '  + mysql_error(_myCon));
...
end;
Das setzt allerdings voraus, daß in "datum", "von" und "bis" das Datum bereits im korrekten Foramt vorliegt. Ist das nicht der Fall, muss der Datumsstring vorher noch in das richtige Format gebracht werden (yyyy-mm-dd oder yyyymmdd)
N.B. Falls Delphi2009 eingesetzt wird, muss noch die ein oder andere Stringkonvertierung hinzugefügt werden.
  Mit Zitat antworten Zitat