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

[hoika]

Hallo,

hmmmmmm.
Aber das AsBlob gibt es doch bereits,
dass soll doch nicht überschrieben werden,
sondern nur für Strings ersetzt werden?

class helper kannte ich zwar (schon eine Weile her, seit ich darüber gelesen habe),
aber ich könnte ein AsBlobS machen.

Probiere ich mal aus, danke!

Warum erschrecken ???

Das erste Projekt (~500.000 Zeilen) ist bereits erledigt,
jetzt kommt das große dran (~2.000.0000 Zeilen).

Für das leidige FormatSettings habe ich mir jetzt auch was gebastelt


Heiko

[Jumpy]

Zitat von hoika:

Warum erschrecken ???

Weil du zuerst von D4 geschrieben hast (was erschreckt, da Rückschritt zu D2007) und dann erst später von XE4, was du tatsächlich meintest.

[Uwe Raabe]

Zitat von hoika:

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.

[hoika]

Hallo,

das meinte ich nicht, ich benutze das AsBlob auch mit binären Daten, z.B. direkt aus einem Data-Pointer,
dort meckert der Compiler auch nicht.
Er meckert nur, wenn ich einen String übergebe.


Heiko