Einzelnen Beitrag anzeigen

HaJo

Registriert seit: 28. Apr 2004
Ort: Würselen
140 Beiträge
 
Delphi 8 Enterprise
 
#28

Re: Datenmanipulation (ODBC/Access)

  Alt 12. Feb 2009, 15:07
Also,

wenn dabei keine Fehlermeldung kam...

mir persönlich sind da zu viele Variable für den ersten Lazarus-Test drinne.
Zudem ist die Verfahrensweise über CachedUpdates eine etwas andere

Auch muss die Funktion "QuotedStr" nicht unbedingt das richtige Ergebnis liefern. Wäre ggf. mit einer Variablen mal zu überprüfen ob wirklich beide Hochkommata verdoppelt werden.

Inm OnKlick-Ereignis des Button folgende Variablen-Deklaration über dem BEGIN mal eintragen:
Delphi-Quellcode:
VAR
   Test : STRING [100];
Zur Sicherheit unter dem
Delphi-Quellcode:
BEGIN
   Test = ''; // Variable initialisieren
Delphi-Quellcode:
SQLQuery1.Close;
SQLQuery1.CachedUpdates := FALSE; //Direkt in der DB ändern - sollte eigentlich Standard sein!
Test := QuotedStr('TEST');
SQLQuery1.SQL.Clear; // <-- hier einen Haltepunkt für den Debuger setzen
                     // und die Variable Test mal auf Inhalt prüfen
                     // sieht der Inhalt wirklich so "TEST" aus?

SQLQuery1.SQL.Add('Update Entgeltdatei_SIA Set Bezeichnung='+QuotedStr('TEST')+' Where Bezeichnung='+QuotedStr('Unfrei'));

TRY // Kennt Lazarus Try-Exception-Blöcke??
   SQLQuery1.ExecSQL;
EXCEPT
   HALT(0); // Wenn es geht mit dem Debuger - hier auch einen Haltepunkt setzen**
END;
SQLTransaction1.Commit;
** Wenn hier wirklich das Prg beendet wird - funktioniert es - Nur ist dann noch irgendwo ein formeller Fehler drin

Uff - Lazarus und Access - mal sehen
Hans-Joachim Brosius
  Mit Zitat antworten Zitat