Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi FIBplus, Fehler "Field size too small" bei pFIBquery (https://www.delphipraxis.net/128819-fibplus-fehler-field-size-too-small-bei-pfibquery.html)

Warp 6. Feb 2009 20:47

Datenbank: Firebird • Version: V2.1.1 • Zugriff über: FIBplus V7.0.1076

FIBplus, Fehler "Field size too small" bei pFIBque
 
Hallo zusammen,

ich probiere gerade den Zugriff auf eine Firebeird DB über FIBplus aus. Die Datenbank ist unter Firebird V2.1.1 erstellt und der Zugriff erfolgt mit den FIBplus-Komponenten (Devrace Download "fibplus_6_9_5_for_2009_basic.Zip und zugehörige PAS Dateien für D2009-BCB2009).
Hinweis: Die Komponenten weisen in ihren Verison Properties 7.0.1078 Tiburon beta aus, der Download ist jedoch ""fibplus_6_9_5_for_2009_basic.Zip, ff." aus.

Der Connect über pFIBDatabase klappt noch. Jedoch bekomme ich eine Fehlermeldung "Field size too small. qryAllTable.Names" sobald ich einen Rechtsklick auf die zugeordnete pIFBQuery - Komponente ausführe und dann im Popup den Punkt "Edit SQL Text" klicke. Im Forum von Devrace habe ich diesbezüglich nichts gefunden.


Die DB hat nur eine einzige, einfache, Tabelle, die nur zu Testzwecken gebaut ist:


CREATE TABLE MASTER (
LANGUAGE INTEGER,
LANGUAGE_NAME VARCHAR(25)
);



Ich habe das dann auch noch mit einer Firebid V1 (V6.0.2) Datenbank (andere DB mit ca. 30 Tabellen) probiert und auch dort ist es das gleiche Problem.

Über IBExpert komme ich an beide Datenbanken problemlos ran und mein D2009pro hat den aktuellen Update-Level.

Um Fragen zuvor zu kommen: Es laufen zwei Firebird Server auf dem System (V1 (6.02, Port 3050) und V2 (V2.1.1, Port 3052)

Delphi bringt die folgende Debug-Liste in der Fehlermeldung :
Zitat:

[098B3B79]{FIBPlus2009.bpl} Fib.FIBError + $51
[0988BF7D]{FIBPlus2009.bpl} Fibdataset.TFIBCustomDataSet.GetFieldData + $2D1
[50494F29]{dbrtl120.bpl} DB.TDataSet.GetFieldData (Line 10974, "DB.pas" + 2) + $9
[501D5397]{vcl120.bpl } Controls.TWinControl.DefaultHandler (Line 9377, "Controls.pas" + 30) + $17
[501D0C0E]{vcl120.bpl } Controls.TControl.WndProc (Line 6642, "Controls.pas" + 91) + $6
[20B89C5E]{designide120.bpl} DeskUtil.SetFocusHook (Line 435, "DeskUtil.pas" + 4) + $C
[501D529B]{vcl120.bpl } Controls.TWinControl.WndProc (Line 9336, "Controls.pas" + 136) + $6
[211D8B83]{vclactnband120.bpl} ActnMenus.CallWindowHook (Line 741, "ActnMenus.pas" + 20) + $F
[500477CC]{rtl120.bpl } Classes.TThreadList.UnlockList (Line 3781, "Classes.pas" + 0) + $4
[5012C8FC]{vcl120.bpl } Graphics.FreeMemoryContexts (Line 6830, "Graphics.pas" + 12) + $5
[501D49B4]{vcl120.bpl } Controls.TWinControl.MainWndProc (Line 9065, "Controls.pas" + 3) + $6
[501D49C9]{vcl120.bpl } Controls.TWinControl.MainWndProc (Line 9068, "Controls.pas" + 6) + $0
[50058938]{rtl120.bpl } Classes.StdWndProc (Line 12723, "Classes.pas" + 8) + $0
[20B89C5E]{designide120.bpl} DeskUtil.SetFocusHook (Line 435, "DeskUtil.pas" + 4) + $C
[211D8B83]{vclactnband120.bpl} ActnMenus.CallWindowHook (Line 741, "ActnMenus.pas" + 20) + $F
[20B89C5E]{designide120.bpl} DeskUtil.SetFocusHook (Line 435, "DeskUtil.pas" + 4) + $C
[501D529B]{vcl120.bpl } Controls.TWinControl.WndProc (Line 9336, "Controls.pas" + 136) + $6
[501D0834]{vcl120.bpl } Controls.TControl.Perform (Line 6420, "Controls.pas" + 10) + $8
[501D7FBD]{vcl120.bpl } Controls.TWinControl.CMInvalidate (Line 11247, "Controls.pas" + 3) + $13
[501D0C0E]{vcl120.bpl } Controls.TControl.WndProc (Line 6642, "Controls.pas" + 91) + $6
[501D529B]{vcl120.bpl } Controls.TWinControl.WndProc (Line 9336, "Controls.pas" + 136) + $6
[501D5397]{vcl120.bpl } Controls.TWinControl.DefaultHandler (Line 9377, "Controls.pas" + 30) + $17
[50889D9E]{vcldb120.bpl} DBGrids.TCustomDBGrid.DefaultHandler (Line 2498, "dbgrids.pas" + 1) + $4
[501D0C0E]{vcl120.bpl } Controls.TControl.WndProc (Line 6642, "Controls.pas" + 91) + $6
[501D7FA1]{vcl120.bpl } Controls.TWinControl.CMInvalidate (Line 11245, "Controls.pas" + 1) + $2
[501D0C0E]{vcl120.bpl } Controls.TControl.WndProc (Line 6642, "Controls.pas" + 91) + $6
[501D529B]{vcl120.bpl } Controls.TWinControl.WndProc (Line 9336, "Controls.pas" + 136) + $6
[501D0834]{vcl120.bpl } Controls.TControl.Perform (Line 6420, "Controls.pas" + 10) + $8
[501D53EB]{vcl120.bpl } Controls.DoControlMsg (Line 9405, "Controls.pas" + 12) + $11
[501D7144]{vcl120.bpl } Controls.TWinControl.WMParentNotify (Line 10543, "Controls.pas" + 1) + $15
[501D0C0E]{vcl120.bpl } Controls.TControl.WndProc (Line 6642, "Controls.pas" + 91) + $6
[501D529B]{vcl120.bpl } Controls.TWinControl.WndProc (Line 9336, "Controls.pas" + 136) + $6
[20B89C5E]{designide120.bpl} DeskUtil.SetFocusHook (Line 435, "DeskUtil.pas" + 4) + $C
[501F0FA4]{vcl120.bpl } Forms.TCustomForm.WndProc (Line 3902, "Forms.pas" + 191) + $5
[501D0834]{vcl120.bpl } Controls.TControl.Perform (Line 6420, "Controls.pas" + 10) + $8
[501D7FBD]{vcl120.bpl } Controls.TWinControl.CMInvalidate (Line 11247, "Controls.pas" + 3) + $13
[501D0C0E]{vcl120.bpl } Controls.TControl.WndProc (Line 6642, "Controls.pas" + 91) + $6
[501D529B]{vcl120.bpl } Controls.TWinControl.WndProc (Line 9336, "Controls.pas" + 136) + $6
[211D8B83]{vclactnband120.bpl} ActnMenus.CallWindowHook (Line 741, "ActnMenus.pas" + 20) + $F
[500477CC]{rtl120.bpl } Classes.TThreadList.UnlockList (Line 3781, "Classes.pas" + 0) + $4
[5012C8FC]{vcl120.bpl } Graphics.FreeMemoryContexts (Line 6830, "Graphics.pas" + 12) + $5
[501D49B4]{vcl120.bpl } Controls.TWinControl.MainWndProc (Line 9065, "Controls.pas" + 3) + $6
[501D49C9]{vcl120.bpl } Controls.TWinControl.MainWndProc (Line 9068, "Controls.pas" + 6) + $0
[50058938]{rtl120.bpl } Classes.StdWndProc (Line 12723, "Classes.pas" + 8) + $0
[501D529B]{vcl120.bpl } Controls.TWinControl.WndProc (Line 9336, "Controls.pas" + 136) + $6
[501D0834]{vcl120.bpl } Controls.TControl.Perform (Line 6420, "Controls.pas" + 10) + $8
[501D7FBD]{vcl120.bpl } Controls.TWinControl.CMInvalidate (Line 11247, "Controls.pas" + 3) + $13
[501D0C0E]{vcl120.bpl } Controls.TControl.WndProc (Line 6642, "Controls.pas" + 91) + $6
[501D529B]{vcl120.bpl } Controls.TWinControl.WndProc (Line 9336, "Controls.pas" + 136) + $6
[501D0834]{vcl120.bpl } Controls.TControl.Perform (Line 6420, "Controls.pas" + 10) + $8
[501D7FBD]{vcl120.bpl } Controls.TWinControl.CMInvalidate (Line 11247, "Controls.pas" + 3) + $13
[501D0C0E]{vcl120.bpl } Controls.TControl.WndProc (Line 6642, "Controls.pas" + 91) + $6
[501D82D7]{vcl120.bpl } Controls.TWinControl.GetClientRect (Line 11382, "Controls.pas" + 1) + $9
[501D529B]{vcl120.bpl } Controls.TWinControl.WndProc (Line 9336, "Controls.pas" + 136) + $6
[501D0834]{vcl120.bpl } Controls.TControl.Perform (Line 6420, "Controls.pas" + 10) + $8
[501D7FBD]{vcl120.bpl } Controls.TWinControl.CMInvalidate (Line 11247, "Controls.pas" + 3) + $13
[501D0C0E]{vcl120.bpl } Controls.TControl.WndProc (Line 6642, "Controls.pas" + 91) + $6
[501D529B]{vcl120.bpl } Controls.TWinControl.WndProc (Line 9336, "Controls.pas" + 136) + $6
[501D5397]{vcl120.bpl } Controls.TWinControl.DefaultHandler (Line 9377, "Controls.pas" + 30) + $17
[501D0834]{vcl120.bpl } Controls.TControl.Perform (Line 6420, "Controls.pas" + 10) + $8
[501D7FDF]{vcl120.bpl } Controls.TWinControl.CMInvalidate (Line 11250, "Controls.pas" + 6) + $17
[501D7FF4]{vcl120.bpl } Controls.TWinControl.CMInvalidate (Line 11253, "Controls.pas" + 9) + $2
[501D0C0E]{vcl120.bpl } Controls.TControl.WndProc (Line 6642, "Controls.pas" + 91) + $6
[50006F53]{rtl120.bpl } System.TObject.Dispatch (Line 10314, "System.pas" + 8) + $0
[501D0C0E]{vcl120.bpl } Controls.TControl.WndProc (Line 6642, "Controls.pas" + 91) + $6
[501D82D7]{vcl120.bpl } Controls.TWinControl.GetClientRect (Line 11382, "Controls.pas" + 1) + $9
[502062D0]{vcl120.bpl } Grids.TCustomGrid.UpdateScrollRange (Line 3416, "Grids.pas" + 1) + $13
[501D529B]{vcl120.bpl } Controls.TWinControl.WndProc (Line 9336, "Controls.pas" + 136) + $6
[501D8659]{vcl120.bpl } Controls.TWinControl.UpdateBounds (Line 11553, "Controls.pas" + 29) + $2
[501D529B]{vcl120.bpl } Controls.TWinControl.WndProc (Line 9336, "Controls.pas" + 136) + $6
[50201FD6]{vcl120.bpl } Grids.ModifyExtents (Line 1005, "Grids.pas" + 41) + $15
[501D0834]{vcl120.bpl } Controls.TControl.Perform (Line 6420, "Controls.pas" + 10) + $8
[50006EA8]{rtl120.bpl } System.@CallDynaInst (Line 10189, "System.pas" + 3) + $0
[50204AA4]{vcl120.bpl } Grids.DoChange (Line 2628, "Grids.pas" + 34) + $12
[5001A730]{rtl120.bpl } SysUtils.Trim (Line 5372, "SysUtils.pas" + 9) + $10
[5048628D]{dbrtl120.bpl} DB.TField.GetData (Line 4346, "DB.pas" + 8) + $A
[0987AAFC]{FIBPlus2009.bpl} Fibdataset.TFIBStringField.IsDBKey + $38
[0987AD90]{FIBPlus2009.bpl} Fibdataset.TFIBStringField.GetValue + $7C
[0987ABF7]{FIBPlus2009.bpl} Fibdataset.TFIBStringField.GetAsString + $1F
[50487A89]{dbrtl120.bpl} DB.TStringField.GetText (Line 5093, "DB.pas" + 3) + $7
[50486392]{dbrtl120.bpl} DB.TField.GetEditText (Line 4391, "DB.pas" + 4) + $8
[5088D5C6]{vcldb120.bpl} DBGrids.TCustomDBGrid.UpdateActive (Line 3946, "dbgrids.pas" + 11) + $9
[5088D72E]{vcldb120.bpl} DBGrids.TCustomDBGrid.UpdateRowCount (Line 3976, "dbgrids.pas" + 13) + $2
[50889D01]{vcldb120.bpl} DBGrids.TCustomDBGrid.CreateWnd (Line 2475, "dbgrids.pas" + 7) + $3
[501D43FE]{vcl120.bpl } Controls.TWinControl.CreateHandle (Line 8853, "Controls.pas" + 3) + $4
[501D46C4]{vcl120.bpl } Controls.TWinControl.UpdateShowing (Line 8976, "Controls.pas" + 7) + $11
[501D46F2]{vcl120.bpl } Controls.TWinControl.UpdateShowing (Line 8979, "Controls.pas" + 10) + $10
[501D486C]{vcl120.bpl } Controls.TWinControl.UpdateControlState (Line 9023, "Controls.pas" + 21) + $3
[501D744E]{vcl120.bpl } Controls.TWinControl.CMVisibleChanged (Line 10730, "Controls.pas" + 3) + $2
[501D0C0E]{vcl120.bpl } Controls.TControl.WndProc (Line 6642, "Controls.pas" + 91) + $6
[501F6FB7]{vcl120.bpl } Forms.TScreen.GetCustomForms (Line 7520, "Forms.pas" + 1) + $5
[501F7BF6]{vcl120.bpl } Forms.AlignWork (Line 8124, "Forms.pas" + 3) + $8
[501F7C3C]{vcl120.bpl } Forms.TScreen.AlignForms (Line 8131, "Forms.pas" + 1) + $1
[501F7D07]{vcl120.bpl } Forms.TScreen.AlignForm (Line 8157, "Forms.pas" + 8) + $8
[501F7D27]{vcl120.bpl } Forms.TScreen.AlignForm (Line 8160, "Forms.pas" + 11) + $3
[501D529B]{vcl120.bpl } Controls.TWinControl.WndProc (Line 9336, "Controls.pas" + 136) + $6
[501F5B0D]{vcl120.bpl } Forms.TCustomForm.RequestAlign (Line 6640, "Forms.pas" + 1) + $7
[501D7A9A]{vcl120.bpl } Controls.TWinControl.SetBounds (Line 11048, "Controls.pas" + 23) + $4
[501F6B33]{vcl120.bpl } Forms.TMonitor.GetWorkareaRect (Line 7297, "Forms.pas" + 6) + $C
[501F0FA4]{vcl120.bpl } Forms.TCustomForm.WndProc (Line 3902, "Forms.pas" + 191) + $5
[501F2640]{vcl120.bpl } Forms.TCustomForm.SetWindowToMonitor (Line 4701, "Forms.pas" + 50) + $3D
[501D0834]{vcl120.bpl } Controls.TControl.Perform (Line 6420, "Controls.pas" + 10) + $8
[501CF26E]{vcl120.bpl } Controls.TControl.SetVisible (Line 5473, "Controls.pas" + 5) + $C
[501F089A]{vcl120.bpl } Forms.TCustomForm.SetVisible (Line 3637, "Forms.pas" + 8) + $4
[501F55D3]{vcl120.bpl } Forms.TCustomForm.Show (Line 6488, "Forms.pas" + 1) + $4
[501F5809]{vcl120.bpl } Forms.TCustomForm.ShowModal (Line 6553, "Forms.pas" + 24) + $3
[09A4011F]{FIBPlusEditors2009.bpl} Fibsqleditor.ShowSQLEdit + $EB
[09A49BA9]{FIBPlusEditors2009.bpl} Regfibpluseditors.TpFIBQueryEditor.ExecuteVerb + $35
[514A931E]{vcldesigner120.bpl} VCLSurface.TVclDesignSurface.ComponentVerb (Line 2477, "VCLSurface.pas" + 3) + $B
[501C3CEF]{vcl120.bpl } Menus.TMenuItem.Click (Line 2515, "Menus.pas" + 19) + $8
[501C5343]{vcl120.bpl } Menus.TMenu.DispatchCommand (Line 3378, "Menus.pas" + 5) + $2
[501C659A]{vcl120.bpl } Menus.TPopupList.WndProc (Line 4484, "Menus.pas" + 4) + $E
[501C64E9]{vcl120.bpl } Menus.TPopupList.MainWndProc (Line 4459, "Menus.pas" + 2) + $5
[50058938]{rtl120.bpl } Classes.StdWndProc (Line 12723, "Classes.pas" + 8) + $0
[501F9EC7]{vcl120.bpl } Forms.TApplication.ProcessMessage (Line 9613, "Forms.pas" + 23) + $1
[501F9F0A]{vcl120.bpl } Forms.TApplication.HandleMessage (Line 9643, "Forms.pas" + 1) + $4
[501FA235]{vcl120.bpl } Forms.TApplication.Run (Line 9780, "Forms.pas" + 26) + $3
[004259D2]{bds.exe } bds.bds (Line 196, "" + 7) + $7
Hat jemand eine Ahnung was der Grund hierfür sein kann?

Chemiker 6. Feb 2009 21:51

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Hallo Warp,

bekommst Du den mit pFIBDataset eine Verbindung zur Deiner Datenbank?

Mit diesem kleinen DEMO-Prg kann man eine Verbindung zur Datenbank herzustellen.

FIBPlus-Demo
Bis bald Chemiker

Warp 7. Feb 2009 08:56

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Hallo Chemiker,

habe gerade Deine DEMO ausprobiert.

Die Verbindung funktioniert damit für beide Firebird Server. Heisst: Firebird V1 (6.0.2) Datenbank connected und lässt sich per in Memo1 eingegebenen SQL - Befehlen steuern, wie auch die Firebird V2 (2.1.1) Datenbank.

Also liegt es wohl nicht an Installationsproblemen, sondern an irgend etwas innerhalb der FIBplus Komponenten.

Jedenfalls habe ich das mit dem SQL Text editieren auch noch bei einer auf der Form platzierten pIFBDataset-Komponente ausprobiert (SQL-Anweisungen im Designer bearbeiten). Auch hier kommt die gleiche Fehlermeldung wie bei der pFIBQuery-Komponente.

Heisst das jetzt, dass man die SQL's in pIFBplus nur coden kann (oder zur Laufzeit lädt; flexibler wäre man damit ja eigentlich sowieso...)? Nur wenn eine solche Design Time Funktionalität eingebaut ist sollte sie meiner Meinung nach auch funktionieren... :gruebel:

Gruss,

Warp

Chemiker 7. Feb 2009 14:51

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Hallo Warp,

also normalerweise kann man auch direkt von der Komponenten aus einen SQL-Befehl absetzen.
Was steht zum Beispiel bei Deiner pFIBDataSet-Komponente unter SQLs ?
Sind die SQLs schon vorbelegt?
Alles was man ins Memo-Feld als Select-Befehle eingibt kann auch per Quell-Code eingeben werden.

Bis bald Chemiker

Warp 7. Feb 2009 18:04

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Hallo Chemiker,

ja das ist schon klar, deswegen ja auch mein Kommentar zu der Design Time-Funktionalität.
An die SQL's komme ich gar nicht ran. Auch hier kommt sofort die bekannte Fehlermeldung, wenn im Objekinspektor der Klick auf die SQL's erfolgt.
Soweit ich die Fehlermeldung zurück verfolgen kann, liegt es wohl in der FIBplus Unit fraSQLEdit. Ob es jetzt dann ein Bug ist oder ein Property, was noch angepasst werden muss, weiss ich nicht.

Danke und Gruss,

Warp

Hansa 7. Feb 2009 19:24

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Sieht so aus, als ob das fibplus-editors package noch nicht installiert wurde. Eventuell auch falsche reihenfolge bei der installation

Warp 7. Feb 2009 19:42

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Das Package "FIBplusEditors2009" ist installiert. Jedenfalls funktioniert auch der "Connection properties" Editor der Komponente "pFIBDatabase".

Bei der Installation habe ich mich da an die Anweisungen in der "Install.rtf" von FIBplus gehalten:

Zitat:

3. Delphi/C++ Builder 2009 installation / upgrade.

a) Unzip fibplus_6_9_5_for_2009_basic.zip to your FIBPlus Sources directory (for example, “c:\fibplus”).

b) Place downloaded FIBDatabase.pas, FIBDataset.pas, FIBQuery.pas and FIBSQLMonitor.pas to “\sources” sub-directory (for example, “c:\ Documents and Settings/User/My Documents/Borland Studio Projects/FIBPlus/”).

c) Select "Tools" | "Options…" | "Environment Options" | "Delphi Options" on the menu bar. Go to "Library – Win 32" menu item and add the full path of your FIBPlus Sources directory to the Library Path if you have not already done so. The Library Path field should then look similar to this:

$(BDS)\Lib; c:\ Documents and Settings/User/My Documents/Borland Studio Projects/fibplus/sources; c:\ Documents and Settings/User/My Documents/Borland Studio Projects/fibplus/sources/Editors

Click OK.

d) Select "File" | "Open..." on the menu bar. Set "Type of files" to Delphi package source, locate and select the FIBPlus2009.dpk package source file in your FIBPlus Sources directory, and click "Open".

e) A package editor window will appear. Click "Compile", then click "Install".

f) Close the package editor window. If you are asked if you want to save changes to the package, answer "No".

j) Repeat steps d) through f) with the FIBPlusEditors2009.dpk package.

h) Repeat steps d) through f) with the FIBDBMidas2009.dpk package.
Gruss,

Warp

Hansa 7. Feb 2009 20:01

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Installiere besser alles in ein Verzeichnis. Hierzu auch den entpackten Editor krempel auch da rein kopieren.

Warp 7. Feb 2009 20:03

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Ich habe das ganze jetzt als Ticket bei Devrace eingelastet. Mal sehen, was die dazu sagen.

Gruss,

Warp

Hansa 7. Feb 2009 20:15

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Kopiere besserdie paar dateien und fertig

DeddyH 7. Feb 2009 20:25

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Ist FIBPlus evtl. dich nicht so das Wahre? :P

Hansa 8. Feb 2009 00:32

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Probieren geht über studieren. :mrgreen: Wieso geht das mit FIBPlus gemachte IBExpert ?

Wunni 8. Feb 2009 08:45

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Das Problem ist kein Fehler des Anwenders sondern ein Bug in FIBPlus für D2009. Es tritt auch bei mr auf und wurde auch schon auf russischen Websites gemeldet. IBExpert ist ein schlechter Vergleich und läuft deswegen, weil es eine uralte Version von FIBPlus benutzt und mit Delphi 5 compiliert wird. Wenn der Bug behoben ist wäre es nett, wenn Ihr das auch hier bekannt geben könntet. Das Support-Center von FIBPlus ist sehr umständlich. Danke.

Warp 8. Feb 2009 09:03

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Hallo zusammen,

der Support von Devrace hat bereits geantwortet. Original Wortlaut:

Zitat:

Thanks for Your report. It is known bug already.

Workaround:



Comment line

{$DEFINE UNICODE_TO_STRING_FIELDS}

in file FibPlus.inc
Gruss,

Warp

Warp 8. Feb 2009 09:34

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Hier noch etwas zu FIBplus 2009 und dem Grund, warum das Problem unter Delphi 5 so nicht auftaucht:


Zitat:

FIBPlus version for Delphi/C++ Builder 2009 is in fact a separate product fork, as because
of internal VCL changes we cannot use compiler directives and thus cannot solve
compatibility problems with previous IDE versions. That's why this FIBPlus version is
compatible with Delphi/C++ Builder 2009 only.
Besides code changes for compatibility with Delphi/C++ Builder 2009 there were made
some internal changes and bug fixes.
A conditional compiler directive {$DEFINE UNICODE_TO_STRING_FIELDS}has been added to
fibplus.inc. If this option is active, string fields in the Unicode coding are processed by the
TFIBStringField instances, not by TFIBWideStringField.

Finden kann man das auf der Devrace Site unter FIBPlus -> Articles -> FIBPlus 6.9.5 for Delphi/C++ Builder 2009 Release Notes

Gruss,

Warp

Chemiker 8. Feb 2009 09:50

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Hallo Warp

funktioniert FIBPlus nach der Änderung des Compiler-Schalters?

Bis bald Chemiker

Warp 8. Feb 2009 10:00

Re: FIBplus, Fehler "Field size too small" bei pFI
 
Hallo Chemiker,

bin gerade mit dem Testen fertig geworden.

1. Workaround in FIBplus.inc eingebaut
2. Alle drei installierten FIBplus Packages neu erzeugt
3. Delphi 2009 Testprojekt geöffnet -> "Edit SQL text" im Kontextmenü für pFIBQuery und pFIPDataset ausgeführt

Ergebnis: Funktioniert !

Gruss,

Warp


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:48 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz