![]() |
Datenbank: Firebird • Version: 2.1 • Zugriff über: ibx / IBDac
TDbGrid checkt automatisch (mit Trigger) gefülltes Feld nicht
Folgende Situation:
Eine ganz einfache Tabelle bei der die erste Spalte automatisch mit einem Generator gefüllt wird, z.B.
Code:
Diese Tabelle hänge ich an einfach (je nach Zugriffsmethode) an eine IBDataSet/TIbTable/IBCQuery -> DataSource -> TDbGrid.
CREATE GENERATOR GEN_TEST;
CREATE TABLE TEST ( INTFIELD INTEGER, FOO VARCHAR(5)); SET TERM ^ ; CREATE OR ALTER TRIGGER TEST_BI FOR TEST ACTIVE BEFORE INSERT POSITION 0 AS BEGIN IF (NEW.INTFIELD IS NULL) THEN NEW.INTFIELD = GEN_ID(GEN_TEST,1); END ^ SET TERM ; ^ ); Lege ich da einen neuen Eintrag an (d.h. ich tipp einen String in Spalte zwei und scrolle runter) so wird in der Datenbank die erste Spalte sehr wohl mit dem Wert von Generator gefüllt, das DBGrid checkt das aber nicht, d.h. die erste Spalte bleibt leer. Scroll ich zurück und will dann den Eintrag löschen so krieg ich bei IBDAC die Fehlermeldung "Update failed. Found 0 records", bei IBTable tut er so als hätte er den Eintrag gelöscht, schliesst und startet man die Anwendung ist der Eintrag aber doch noch da. Hilfe! Danke! |
AW: TDbGrid checkt automatisch (mit Trigger) gefülltes Feld nicht
Es ist schon ein Unterschied, ob Zugriff über IBX oder IBDac erfolgt.
Bei IBDac sollte es reichen, RefreshOptions roAFterInsert auf True zu setzen. Erklärung findet man in der PDF - Dokumentation. Prinzipiell ist es so, dass immer, wenn Daten automatisch über Trigger oder Defaults der Feld- bzw. Domaindefinition gesetzt werden, einiges beachtet werden muss. Je nach Zugriffskomponenten gibt es da auch verschiedene Möglichkeiten. Frank |
AW: TDbGrid checkt automatisch (mit Trigger) gefülltes Feld nicht
Zitat:
PDF-Doku? Ich hab nur das chm-Helpfile. Ich hab RefreshOpions auf AfterInsert gesetzt, hat nicht geholfen (da kam dann die Meldung dass irgendwas beim Refresh gescheitert ist ("Refresh failed. Found 0 records"). Was nun die Lösung gebracht hat:
Delphi-Quellcode:
Vielen Dank für deinen Schupps in die richtige Richtung!
IBCQuery1.KeyFields:='INTFIELD';
IBCQuery1.KeyGenerator:='GEN_TEST'; :thumb: |
AW: TDbGrid checkt automatisch (mit Trigger) gefülltes Feld nicht
Liste der Anhänge anzeigen (Anzahl: 1)
Hi,
keine Ahnung, woher ich die PDF habe. Vielleicht mit der Installation der Sourcen. Ich habe den Teil mal angehangen. Aber wie du es beschreibst, funktioniert es wohl mit dem PK nicht, weil er diesen sicher für das Refresh benötigt. Frank |
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:40 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz