Thema: Delphi Problem mir QRBand

Einzelnen Beitrag anzeigen

MARGERSCH

Registriert seit: 6. Dez 2004
Ort: Pfalzgrafenweiler
38 Beiträge
 
Delphi 2010 Professional
 
#5

Re: Problem mir QRBand

  Alt 6. Dez 2004, 16:36
Hallo raik,

ich schicke mal den vom Objektinspektor
automatisch erzeugten Text für die
Datenmenge (Inzwischen habe ich mal
die TIBQuery durch eine TIBDataset
ersetzt, in der Hoffnung das es vielleicht hilft
was aber nicht der Fall ist) :

object ibdsCoeffTmp: TIBDataSet
Database = dmCalibration.ibdbLDU
Transaction = dmCalibration.ibtaLDU
BufferChunks = 1000
CachedUpdates = False
DeleteSQL.Strings = (
'delete from CALIBRCOEFFTMP_DAT'
'where'
' COEFFNR = :OLD_COEFFNR')
InsertSQL.Strings = (
'insert into CALIBRCOEFFTMP_DAT'
' (COEFFNR, COEFFNAME, COEFFVALUE, COEFFACTIVE, COEFFDESCR)'
'values'
' (:COEFFNR, :COEFFNAME, :COEFFVALUE, :COEFFACTIVE, :COEFFDESCR)')
RefreshSQL.Strings = (
'Select '
' COEFFNR,'
' COEFFNAME,'
' COEFFVALUE,'
' COEFFACTIVE,'
' COEFFDESCR'
'from CALIBRCOEFFTMP_DAT '
'where'
' COEFFNR = :COEFFNR')
SelectSQL.Strings = (
'select * from CALIBRCOEFFTMP_DAT')
ModifySQL.Strings = (
'update CALIBRCOEFFTMP_DAT'
'set'
' COEFFNR = :COEFFNR,'
' COEFFNAME = :COEFFNAME,'
' COEFFVALUE = :COEFFVALUE,'
' COEFFACTIVE = :COEFFACTIVE,'
' COEFFDESCR = :COEFFDESCR'
'where'
' COEFFNR = :OLD_COEFFNR')
Active = True
Left = 840
Top = 344
object ibdsCoeffTmpCOEFFNR: TIntegerField
FieldName = 'COEFFNR'
Origin = 'CALIBRCOEFFTMP_DAT.COEFFNR'
Required = True
end
object ibdsCoeffTmpCOEFFNAME: TIBStringField
FieldName = 'COEFFNAME'
Origin = 'CALIBRCOEFFTMP_DAT.COEFFNAME'
Size = 15
end
object ibdsCoeffTmpCOEFFVALUE: TFloatField
FieldName = 'COEFFVALUE'
Origin = 'CALIBRCOEFFTMP_DAT.COEFFVALUE'
end
object ibdsCoeffTmpCOEFFACTIVE: TIBStringField
FieldName = 'COEFFACTIVE'
Origin = 'CALIBRCOEFFTMP_DAT.COEFFACTIVE'
Size = 1
end
object ibdsCoeffTmpCOEFFDESCR: TIBStringField
FieldName = 'COEFFDESCR'
Origin = 'CALIBRCOEFFTMP_DAT.COEFFDESCR'
Size = 25
end
end
Martin
  Mit Zitat antworten Zitat