Problem bei Insertbefehl

[Chrissi91]

Hi,

erstmal: Mit was ich auf die DB zugreife, kann ich nicht so genau sagen. Die Komponente hab ich mal aus meinen alten CDs hervorgekramt. :D Aber ich bin mir sicher, ihr werdet sie wiedererkennen. :mrgreen:

Ich binde die 2 angehängten Dateien ein. Eine Pas und eine DLL (wird in der Pas eingebunden). Ich hoffe ihr könnt damit was anfangen. :D

Jetzt habe ich folgenden funktionierenden Code:

Delphi-Quellcode:

var
  frmMain: TfrmMain;
  Query: String;
  _myCon: PMySQL;

begin
  _myCon := MySQL_Init(nil);
  MySQL_Real_Connect(_myCon, 'www.*********.de', 'root', '******', '******', 3306, nil, 0);
  mysql_select_db(_myCon, '*******');
  query := 'SELECT * FROM shop_kategorien ORDER BY id';
  mysql_real_query(_myCon, PChar(query), Length(query));

Soweit so gut. Daraus habe ich jetzt Folgendes abgeleitet:

Delphi-Quellcode:

mmoBeschreibung.Text := StringReplace(mmoBeschreibung.Text, #13#10, '
', [rfReplaceAll]);
query := 'INSERT INTO shop_artikel(id, michel, name, beschreibung, kategorie, ppreis, mpreis) VALUES (' + edtID.Text + ', ' + edtMichel.Text + ', ' + edtName.Text + ', ' + mmoBeschreibung.Text + ', ' + IntToStr(Number) + ', ' + edtPPreis.Text + ', ' + edtMPreis.Text + ')';
ShowMessage(query);
mysql_real_query(_myCon, PChar(query), Length(PChar(query)));

Er gibt den Befehl als ShowMessage zwar richtig aus, führt ihn aber nicht aus. D.h. in der MySQL-DB wird nichts eingetragen, obwohl eine Verbindung besteht, die Tabelle existiert mit den jeweiligen Spalten.

Jemand eine Idee?

[DeddyH]

Eine Idee habe ich: schließe doch mal alle Werte, die alphanumerische Felder befüllen sollen, in QuotedStr ein (Name und Beschreibung könnten da Kandidaten sein).

Delphi-Quellcode:

query := 'INSERT INTO shop_artikel(id, michel, name, beschreibung, kategorie, ppreis, mpreis) VALUES (' + edtID.Text + ', ' + edtMichel.Text + ', ' + QuotedStr(edtName.Text) + ', ' + QuotedStr(mmoBeschreibung.Text) + ', ' + IntToStr(Number) + ', ' + edtPPreis.Text + ', ' + edtMPreis.Text + ')';

[marabu]

Hi,

auch die beiden Preis-Felder verursachen Probleme - wenn die Beträge ein Komma enthalten.

Grüße vom marabu