Einzelnen Beitrag anzeigen

Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.453 Beiträge
 
Delphi 12 Athens
 
#6

AW: D4: Query.ParamByName('').AsBlob := '' ersetzen

  Alt 13. Feb 2015, 14:13
Aber das AsBlob gibt es doch bereits,
dass soll doch nicht überschrieben werden,
sondern nur für Strings ersetzt werden?
Wenn ich das richtig sehe ändert sich zwischen den beiden Delphi-Versionen der Typ des Blob von String zu TBytes. Mit dem Class-Helper legst du quasi einen Wrapper darüber, der das AsBlob wieder zu einem String macht - zumindest in dem Scope des Class-Helpers. Damit kannst du deinen originalen Code so lassen, wie er in D2007 funktioniert hat:

Query.ParamByName('Param1').AsBlob := 'bla'; Du musst nur dafür sorgen, daß der Class-Helper an dieser Stelle im Scope ist, wenn du unter XE4 compilierst. Das macht natürlich auch nur dann Sinn, wenn in den Blobs immer nur Strings gespeichert werden, aber das scheint ja auch so zu sein.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat