ADOStoredProcedure in Delphi 5 mit TaoADO

[Vis]

Hat jemand Erfahrung mit ADOStoredprocedures in Delphi 5 mit dem AddIn TaoADO?

Bei dem Aufruf einer einfacher Stored Procedure auf einem SQL Server 2008 bekomme ich immer die Fehlermeldung:

"Unable to open ADO RecordSet: Die Argument sind vom falschen Typ, liegen außerhalb des Gültigkeitsbereiches oder sind miteinander unvereinbar."

Interessanterweise klappt der Aufruf im Embarcadero XE3 mit genau den gleichen Einstellungen ohne Probleme.

Die SP:

Delphi-Quellcode:

ALTER PROCEDURE [dbo].[sp_test]
   @out bit OUTPUT
AS
BEGIN
   
   SET NOCOUNT ON;
   
   SET @out = 1
   Return 1
END

Die Params der Stored Procedure in Delphi werden ja automatisch angezeigt.
Hab schon zig Einstellungen der Params mit ptResult, ptOutput usw. ausprobiert, leider kein Erfolg.

Kann mir jemand helfen?

Grüße

[Union]

Gab es da nicht Probleme mit ADO, die erst mit einem der Updates von Delphi7 behoben wurden?

[Bernhard Geyer]

Ich Tipp darauf das der Typ "Bit" in D5 mit TaoADO einfach nicht unterstützt wird.

Wieso wird denn nicht gleich mit XE2 gearbeitet wenn es dort geht?

[Vis]

Hmm, ok. Also sind die Stored Procedures mit TaoADO und Delphi5 nur eingeschränkt nutzbar.

Wäre schön gewesen. Jetzt rufe ich die Stored Procedure mit ADOQuery auf. Das funktioniert gut, allerdings müssen alle Parameter als Strings übergeben werden.
sqlstr := Format('exec %s %s, %s, %s, %s', ['sp_test', .............


XE3 wird nicht verwendet, da es ein älteres Projekt ist, wo nur ein paar Kleinigkeiten hinzukommen. Wollte jetzt nicht das ganze Projekt upgraden.

Danke mal soweit für die Informationen.

Grüße

[arnof]

Also StoredProcedures gehen in D5 einwandfrei (auch BIT), mache es einfach via TADOCommand, dann klappt es auch mit den D5:cyclops:


z.B.:

ADOTable1.Close;
ADOTable1.Recordset:=ADOCommand1.Execute;
if ADOTable1.Active then begin
// in ADOTable steht das Ergebenis drin
end;


oder aber

Ergebins:=VarAsInteger(ADOCommand1.Execute.Fields[0].Value);

[Vis]

Hmm, bei dem TaoADO AddIn finde ich leider kein TaoADOCommand.

Was verwendest du für ADO Komponenten?

[Robotiker]

Gab es die Borland ADO-Komponenten zur Zeit der Version 5 nicht erst ab der Enterprise Version ?
War jedenfalls beim C++ Builder so, das könnte der Grund sein, warum in dem Projekt andere Komponenten verwendet werden.

[Vis]

Wikipedia sagt:
"Mit Delphi 5 konnte erstmals über ADO auf Datenbanken zugegriffen werden. Diese Erweiterung musste in der Professional-Version allerdings als ADO Express zugekauft werden."

Ich nutze aber das TaoADO von http://www.alohaoi.com/Software

[p80286]

Zitat:

TaoADODataSet Component Suite

....
TaoADODataSet Component Suite is FREEWARE! Source is included in the download package and it should compile under Delphi 3, Delphi 4, Delphi 5 (main design compiler), and possible C++ Builder 3.0 and C++ Builder 4.0 (again both untested by myself). Since the initial release, several people have contributed either testing, code, or new features, so this is no longer just my project. If you would like to contribute to the project, please feel free to send me the code and I'll distribute it. TaoADODataSet will remain free and available as an open source project.

Liest sich für mich wie, "dies ist eine Billigversion" aber Du hast ja Zugriff auf die Sourcen, damit könnte man vielleicht weiter kommen?

Gruß
K-H