Tweet
Hallo,
ich habe folgendes Problem: Ich bin dabei einiges von TIBQuery auf TIBSQL umzustellen. Der Datenzugriff erfolg über ein Object mit dem ich auf verschieden Datenbanken zugreifen kann. Das funktioniert bis auf die Blobfelder sehr gut. Die felder lese ich mit folgender Funktion aus:
<PRE>
function TDM_Main.qryFields(qry: TObject; idx, vartype_: integer): Variant;
begin
case DBType of
dbInterbaseIBX: Result:=TIBQuery(qry).Fields[idx].Value;
dbInterbaseIBXSQL: Result:=TIBSQL(qry).Fields[idx].Value;
... :
end;
</pre>
Bei der Variante TIBQuery wird der Blob sauber ausgelsen und als result übergeben. Bei der Variante TIBSQL steht nur '(Blob)' drin.
Wie kann ich nun bei TIBSQL einen Blob auslesen?
Gruß Bernd
ich habe folgendes Problem: Ich bin dabei einiges von TIBQuery auf TIBSQL umzustellen. Der Datenzugriff erfolg über ein Object mit dem ich auf verschieden Datenbanken zugreifen kann. Das funktioniert bis auf die Blobfelder sehr gut. Die felder lese ich mit folgender Funktion aus:
<PRE>
function TDM_Main.qryFields(qry: TObject; idx, vartype_: integer): Variant;
begin
case DBType of
dbInterbaseIBX: Result:=TIBQuery(qry).Fields[idx].Value;
dbInterbaseIBXSQL: Result:=TIBSQL(qry).Fields[idx].Value;
... :
end;
</pre>
Bei der Variante TIBQuery wird der Blob sauber ausgelsen und als result übergeben. Bei der Variante TIBSQL steht nur '(Blob)' drin.
Wie kann ich nun bei TIBSQL einen Blob auslesen?
Gruß Bernd