SQL Syntax Error? Was ist falsch?

[Gollum]

Hallo,

das einzige was mit jetzt noch einfällt ist, dass Probleme mit dem Feld Name bestehen. Da die ADOQuery auch eine Eigenschaft gleichen Namens besitzt, kann es zu Namenskonflikten kommen.

Hilft folgendes:

Delphi-Quellcode:

...
Parameters.ParamByName('p3').Value:=StrPas(ARDRecord.Name); 
...

[EvilCodein]

aber die beiden fehler treten doch schon hier auf (beim debuggen).

Hier schau mal...

[Gollum]

Hallo,

in Deinem Postin schreibts Du, Du hättest es jetzt so gemacht:

Delphi-Quellcode:

  ...
  Parameters.ParamByName('p1').Value:=StrPas(ID); 
  ...

In Deiner Debug-Übersicht sieht der Code aber so aus:

Delphi-Quellcode:

  ...
  Parameters.ParamByName('p1').Value:=ID; 
  ...

Was ist jetzt richtig? Da Du die ID auch als Array[1..13] of Char deklariert hast, musst Du diese ebenfalls mit StrPas(ID) umwandeln.

[EvilCodein]

Ich wollte dir damit sagen, das beides zu einem Fehler führt:

Zitat:

Das Problem ist jetzt bekomme ich diese Fehlermeldung:
[Error] EDMUnit.pas(354): Incompatible types: 'Array' and 'PAnsiChar'

Wenn ich die Funktion StrPas(Record) weglasse bekomme ich diese:
[Error] EDMUnit.pas(354): Incompatible types: 'Variant' and 'Array'

Die erste Fehlermeldung mit StrPas() die zweite ohne StrPas().

[EvilCodein]

Hat keiner mehr eine Idee? ich brauche das unbedingt...

[mschaefer]

Moin, moin,

Delphi-Quellcode:

Clients.SQL.Add(  'INSERT INTO Clients 
                   ( ID, 
                     ClientNumber, 
                     Anrede, 
                     Name, 
                     Street, 
                     PLZ, 
                     City, 
                     HomePhone, 
                     MobilePhone )
                     VALUES 
                     ( "",
                       " '+ ARDRecord.ID      +' " ,
                       " '+ ARDRecord.Name    +' " ,
                       " '+ ARDRecord.Strasse +' " ,
                       " '+ ARDRecord.PLZ     +' " ,
                       " '+ ARDRecord.Ort     +' " ,
                       " '+ ARDRecord.Tel     +' " ,
                       " '+ ARDRecord.Mobil   +' " );'
               
                 );

Erstmal so probieren, die überflüssigen Leerzeichen kannst Du später dann entfernen, so sieht man es aber besser.
Über größere Neuerungen kann man sich immernoch unterhalten, aber funktionieren sollte das schon.

Grüße // Martin

[Sharky]

Hai Du,

wäre es möglich auch noch zu sagen welcher Fehler gemeldet wird?

[Edit]Sorry. Ich war zu schnell Ich habe nur dein Posting gesehen und nicht die erste Seite des Threas beachtet! *Noch einmal "Tschuldigung" sagt[/EDIT]

[shmia]

Dein TARDRecord ist Technik von gestern.
So speichert man heutzutage keine Daten. (Alternativen sind z.B. CSV-Format, XML, ...)
Aber sei's drum.

Du musst deine Daten in TARDRecord erstmal in "anständige" AnsiStrings übersetzen:

Delphi-Quellcode:

// Konvertierungsfunktion
function Get_ID(const r:TARDRecord):AnsiString;
begin
   SetString(Result, PChar(@r.ID[1]), sizeof(r.ID));
end;

Query1.Parameters.ParamByName('p1').Value:= Get_ID(ARDRecord);

[EvilCodein]

Danke für eure antworten... ich werds mal ausprobeiren.

@mschaefer: So hab ich das schon mehrmals probiert und immer nur den SQL Syntax Error bekommen.
--> Der steht schon auf der 1. Seite irgendwo.

Zu der Veralteten Technick: Ich weiß das das schon Schnee von Gestern ist, ich habe aber auch keine andere Idee, wie ich die Fremddatenbank sonst auslesen könnte. Das Ding ist nunmal, das ich sie schon auslesen kann und das ist schonmal viel wert. Ich muss den Scheiß jetzt halt nur noch in die Access DB rein bekommen...

vielen Dank erstma

codein

[mschaefer]

Moin,

schone das Vokabular. Also vom SQL-Syntax ist das in Ordnung. Allerdings hat diese Verfahrensweise einen Haken: Das System bricht zusammen wenn Du Anführungszeichen >"< in einem der Stringwerte hast.
Die müstest Du dann per Pos raussuchen und eben durch Blanks ersetzten, im BeforeInsert.

Grüße // Martin