AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken D4: Query.ParamByName('').AsBlob := '' ersetzen
Thema durchsuchen
Ansicht
Themen-Optionen

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

Ein Thema von hoika · begonnen am 13. Feb 2015 · letzter Beitrag vom 13. Feb 2015
 
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.277 Beiträge
 
Delphi 10.4 Sydney
 
#1

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

  Alt 13. Feb 2015, 08:38
Datenbank: FB • Version: 2 • Zugriff über: IBDAC
Hallo,
ich muss ein grosses Projekt von D2007 auf D4 portieren (jaja ).
Benutzt wird IBDAC.

Der Code

Query.ParamByName('Param1').AsBlob := 'bla';

wird angemeckert

richtig ist
Query.ParamByName('Param1').AsBlob := BytesOf('bla');

Das sind aber leider sehr viele Stellen.
Da wird eine von TIBCQuery abgeleitete eigene Query-Komponente benutzen,
könnte ich die erweitern.
Im Moment sieht da so aus:

Delphi-Quellcode:
procedure TQuery.StringToBlob(const ABlobFeldName, AWert: String);
begin
  {$IFDEF VER250}
  ParamByName(ABlobFeldName).AsBlob := BytesOf(AWert);
  {$ELSE}
  ParamByName(ABlobFeldName).AsBlob := AWert;
  {$ENDIF}
end;
aus
Query.ParamByName('Param1').AsBlob := 'bla';
wird
Query.StringToBlob('Param1', 'bla');

(Der Code soll schrittweise umgestellt werden, soll also mit D2007 und XE4 laufen.)

Das ist aber trotzdem noch viel zu viel Aufwand.
Bekomme ich denn das ParamByName('').AsBlob nicht irgendwie in meine eigene Klasse rein
z.B.
function ParamByName2(Name: String); TDAParam2;
so dass ich einfach nur Query.ParamByName2('Param1').AsBlob := 'bla'; schreiben muss?

Wie bekomme ich aber das ('Param1') in die Klasse rein,
oder nehme ich eine Funktion, dass passt aber auch nicht richtig.

Klappt das überhaupt, dass aus ich sowas
Query.ParamByName2('Param1').AsBlob := 'bla';
mit einer eigenen Klasse hinbekomme?

Ich hoffe, jemand kann mir helfen.

Noch mal der Wunsch: so wenig wie möglich ändern und das so schnell wie möglich

PS:
Ich habe den Quellcode von IBDAC, aber ich werden daraus nicht schlau.

Danke

Heiko


So richtig komme ich hier nicht weiter
Heiko

Geändert von hoika (13. Feb 2015 um 08:54 Uhr)
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 14:33 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz