Liebe Wissende,
Ich habe da eine
IB-Database Ver. 6.1. Darin gibt es eine Tabelle mit Namen 'Teil2710'.
Ich nutze
RAD-Studio 2007 und mach ne Formularanwendung und füge dann den TDataModule hinzu.
Darin mache ich eine TSQLConnection auf, verbinde die mit Der Datenbank
Treibername: Interbase
Database: Server
:\Programme\Borland\interbase\
DB.GDB
RoleName:RoleName
User_Name: sysdba
Password:masterkey
ServerCharset: WIN1252
SQLDialect:3
LocaleCode:0000
BlobSize:-1
CommitRetain: False
WaitOnLocks: True
InterbaseTransIsolation: ReadCommited
TrimChar: False
Ok, das funktioniert soweit.
Nun füge ich einen TSQLDataSet ein und verbinde den unter SQLConnection auf das obige Objekt.
Unter CommandText schreibe ich: SELECT * FROM TEIL2710 WHERE ART_NR=100600
Jetzt versuche ich das TSQLDataSet.Active auf True zu setzen und bekomme folgenden Fehler:
Token unknown - line 1, char 45 WHEN
Dann kann ich Details öffen und darin steht:
[0FBADF7D]{DbxCommonDriver100.bpl} Dbxcommon.TDBXContext.Error + $51
[0FCC3002]{DbxDynalinkDriver100.bpl} Dbxdynalink.TDBXMethodTable.RaiseError + $10E
[0FCC392F]{DbxDynalinkDriver100.bpl} Dbxdynalink.TDBXDynalinkCommand.CheckResult + $13
[0FCC3CAB]{DbxDynalinkDriver100.bpl} Dbxdynalink.TDBXDynalinkCommand.DerivedPrepare + $47
[0FBABEBD]{DbxCommonDriver100.bpl} Dbxcommon.TDBXCommand.Prepare + $51
[0FBABDEA]{DbxCommonDriver100.bpl} Dbxcommon.TDBXCommand.CommandExecuting + $2E
[0FBABCB3]{DbxCommonDriver100.bpl} Dbxcommon.TDBXCommand.ExecuteQuery + $4F
[0FBB218F]{DbxCommonDriver100.bpl} Dbxdelegate.TDBXMorphicCommand.ExecuteQuery + $F
[0FC82931]{DbxReadOnlyMetaData100.bpl} Dbxmetadatacommandfactory.TDBXDataExpressProviderC ontext.ExecuteQuery + $4D
[0FC22B46]{DbxReadOnlyMetaData100.bpl} Dbxmetadatareader.TDBXBaseMetaDataReader.FetchInde xes + $132
[0FC216D8]{DbxReadOnlyMetaData100.bpl} Dbxmetadatareader.TDBXBaseMetaDataReader.FetchColl ection + $2F8
[0FC814B9]{DbxReadOnlyMetaData100.bpl} Dbxmetadatacommand.TDBXMetaDataCommand.DerivedExec uteQuery + $29
[0FBABCBC]{DbxCommonDriver100.bpl} Dbxcommon.TDBXCommand.ExecuteQuery + $58
[0FBB218F]{DbxCommonDriver100.bpl} Dbxdelegate.TDBXMorphicCommand.ExecuteQuery + $F
[0FB818C9]{dbexpress4100.bpl} SqlExpr.TCustomSQLDataSet.OpenSchema (Line 6142, "..\..\..\..\..\src\
pas\dbx\
vcl\SqlExpr.pas" + 122) + $B
[0FB7F9F3]{dbexpress4100.bpl} SqlExpr.TCustomSQLDataSet.ExecuteStatement (Line 5473, "..\..\..\..\..\src\
pas\dbx\
vcl\SqlExpr.pas" + 51) + $5
[0FB7C366]{dbexpress4100.bpl} SqlExpr.TCustomSQLDataSet.InternalOpen (Line 4020, "..\..\..\..\..\src\
pas\dbx\
vcl\SqlExpr.pas" + 1) + $2
[203AF4FD]{dbrtl100.bpl}
DB.TDataSet.DoInternalOpen (Line 9262, "
DB.pas" + 1) + $A
[203AF5B6]{dbrtl100.bpl}
DB.TDataSet.OpenCursor (Line 9290, "
DB.pas" + 2) + $B
[0FB7C4B0]{dbexpress4100.bpl} SqlExpr.TCustomSQLDataSet.OpenCursor (Line 4052, "..\..\..\..\..\src\
pas\dbx\
vcl\SqlExpr.pas" + 10) + $4
[203AF471]{dbrtl100.bpl}
DB.TDataSet.SetActive (Line 9244, "
DB.pas" + 11) + $9
[0FB7909E]{dbexpress4100.bpl} SqlExpr.TSQLConnection.OpenSchemaTable (Line 2813, "..\..\..\..\..\src\
pas\dbx\
vcl\SqlExpr.pas" + 9) + $7
[0FB807AD]{dbexpress4100.bpl} SqlExpr.TCustomSQLDataSet.AddIndexDefs (Line 5808, "..\..\..\..\..\src\
pas\dbx\
vcl\SqlExpr.pas" + 9) + $1F
[0FB81F18]{dbexpress4100.bpl} SqlExpr.TCustomSQLDataSet.PSGetKeyFieldsW (Line 6315, "..\..\..\..\..\src\
pas\dbx\
vcl\SqlExpr.pas" + 7) + $6
[203AFA73]{dbrtl100.bpl}
DB.SetKeyFields (Line 9443, "
DB.pas" + 1) + $16
[203AFC58]{dbrtl100.bpl}
DB.TDataSet.CreateFields (Line 9474, "
DB.pas" + 14) + $1C
[0FB7C3BB]{dbexpress4100.bpl} SqlExpr.TCustomSQLDataSet.InternalOpen (Line 4030, "..\..\..\..\..\src\
pas\dbx\
vcl\SqlExpr.pas" + 11) + $D
[203AF4FD]{dbrtl100.bpl}
DB.TDataSet.DoInternalOpen (Line 9262, "
DB.pas" + 1) + $A
[203AF5B6]{dbrtl100.bpl}
DB.TDataSet.OpenCursor (Line 9290, "
DB.pas" + 2) + $B
[0FB7C4B0]{dbexpress4100.bpl} SqlExpr.TCustomSQLDataSet.OpenCursor (Line 4052, "..\..\..\..\..\src\
pas\dbx\
vcl\SqlExpr.pas" + 10) + $4
[203AF471]{dbrtl100.bpl}
DB.TDataSet.SetActive (Line 9244, "
DB.pas" + 11) + $9
[2002AE7E]{rtl100.bpl } TypInfo.SetOrdProp (Line 1316, "common\TypInfo.pas" + 27) + $0
[20D29FD6]{designide100.bpl} DesignEditors.TPropertyEditor.SetOrdValue (Line 841, "DesignEditors.pas" + 2) + $E
[20D2B073]{designide100.bpl} DesignEditors.TEnumProperty.SetValue (Line 1401, "DesignEditors.pas" + 5) + $4
[20E0F480]{vclide100.bpl} IDEInspListBox.TInspListBox.SetPropValue (Line 1131, "ideinsplistbox.pas" + 40) + $24
[20E10AB0]{vclide100.bpl} IDEInspListBox.TInspListBox.ListAccept (Line 1640, "ideinsplistbox.pas" + 6) + $7
[20E0C402]{vclide100.bpl} IDEListBtns.TListButton.CloseUp (Line 757, "IDEListBtns.pas" + 14) + $12
[20E0B074]{vclide100.bpl} IDEListBtns.TPopupListBox.WMLButtonUp (Line 173, "IDEListBtns.pas" + 2) + $2D
[2013C527]{vcl100.bpl } Controls.TControl.WndProc (Line 5146, "Controls.pas" + 83) + $6
[20040E4C]{rtl100.bpl } Classes.StdWndProc (Line 11583, "common\Classes.pas" + 8) + $0
[2000A332]{rtl100.bpl } System.TInterfacedObject._AddRef (Line 17972, "sys\system.pas" + 1) + $4
[20006894]{rtl100.bpl } System.TObject.GetInterface (Line 9003, "sys\system.pas" + 8) + $A
[200068C6]{rtl100.bpl } System.TObject.GetInterface (Line 9009, "sys\system.pas" + 14) + $10
[2014010B]{vcl100.bpl } Controls.TWinControl.IsControlMouseMsg (Line 7168, "Controls.pas" + 1) + $9
[2000A30F]{rtl100.bpl } System.TInterfacedObject.QueryInterface (Line 17964, "sys\system.pas" + 1) + $8
[20A616CA]{coreide100.bpl} DocModul.TCodeIDocModule.QueryInterface (Line 2559, "DocModul.pas" + 8) + $9
[201406A7]{vcl100.bpl } Controls.TWinControl.WndProc (Line 7304, "Controls.pas" + 111) + $6
[2004199A]{rtl100.bpl } SyncObjs.TCriticalSection.Leave (Line 366, "common\SyncObjs.pas" + 0) + $2
[20A6179C]{coreide100.bpl} DocModul.TCodeIDocModule.QueryInterface (Line 2583, "DocModul.pas" + 32) + $0
[20A617B9]{coreide100.bpl} DocModul.TCodeIDocModule.QueryInterface (Line 2585, "DocModul.pas" + 34) + $10
[52051A73]{idectrls100.bpl} IDEWideStdCtrls.TWideCustomListBox.WndProc (Line 4644, "IDEWideStdCtrls.pas" + 43) + $6
[2013FDD0]{vcl100.bpl } Controls.TWinControl.MainWndProc (Line 7073, "Controls.pas" + 3) + $6
[20040E4C]{rtl100.bpl } Classes.StdWndProc (Line 11583, "common\Classes.pas" + 8) + $0
[20163691]{vcl100.bpl } Forms.TApplication.StopHintTimer (Line 8673, "Forms.pas" + 3) + $6
[201625E8]{vcl100.bpl } Forms.TApplication.ProcessMessage (Line 8103, "Forms.pas" + 21) + $1
[2016262A]{vcl100.bpl } Forms.TApplication.HandleMessage (Line 8124, "Forms.pas" + 1) + $4
[2016291F]{vcl100.bpl } Forms.TApplication.Run (Line 8223, "Forms.pas" + 20) + $3
[0042297A]{
bds.exe }
bds.bds (Line 195, "" + 7) + $7
Was mache ich hier falsch?
Ich freue mich auf jede Antwort.