Abfragen des aktuellen Wertes einer Tabelle

[Flash68]

Hallo zusammen,

ich möchte gern einmal den Inhalt des aktuellen selektierten Datensatzes abfragen. Zum einen möchte ich schauen ob eine Spalte Null ist und aber auch die Werte der anderen Spalten auslesen und dann weiterverwenden.

Gruß

Flash

[DeddyH]

Prima :thumb:

P.S.: Hast Du auch eine Frage dazu?

[Flash68]

Ja wie ich an die Werte des aktuell dargestellten Datensatz/spalte des dbgrids bzw. der DBEdit komme, oder ob ich das anders angehen muß.

[DeddyH]

Das datensensitive Control hängt normalerweise an einer Datasource, welcher wiederum an einem Dataset hängt. Letzteres gilt es abzufragen (Fields, FieldValues, FieldByName sind Kandidaten dafür).

Delphi-Quellcode:

if DBGrid.Datasource.Dataset.FieldByName('Wuppdi').IsNull then
  ShowMessage('Steht nix drin');

[Flash68]

Ist das dann auch der aktuelle wert und kann ich das benutzen wenn ich in die nächste Zeile wechsel?

[mkinzler]

Dort steht immer den Wert der selektierten Zeile/Datensatz drinnen.
Du kannst auf den Wechsel der Zeile reagieren (z.B. Event AfterScroll), dann steht der neue Wert in den Feldern.

[DeddyH]

Das ist der Wert des aktuellen Datensatzes.

[Flash68]

Ich hab mir folgendes erstellt:

Delphi-Quellcode:

Procedure TFRM_NeuerAutor.NullCheck;
begin
  if dbg_autor.datasource.DataSet.FieldByName('Webseite').isnull then But_GoogleSuche.Enabled := true
    else But_GoogleSuche.Enabled := false
end;

was ich dann in die Formcreate Ereignis eingefügt habe und zusätzlich in das Ereignis ColEnter um auf den wechsel der zeile zureagieren

aber obwohl die nächste Zeile einen Wert in dem Feld hat ist der Button trotzdem enabled.

[DeddyH]

Erstens geht das auch kürzer:

Delphi-Quellcode:

But_GoogleSuche.Enabled := dbg_autor.datasource.DataSet.FieldByName('Webseite').isnull;

und zweitens ist der Code im OnAfterScroll des zugrundeliegenden Datasets wohl besser aufgehoben, wie Markus schon sagte.

[edit] Anders ausgedrückt: wenn Du immer dieselbe Datenbasis (also dieselben Felder) verwendest, dann kannst Du den Code direkt im OI im OnAfterScroll-Event des Datasets (TTable, TQuery, etc.) einfügen. IIRC wird beim Open automatisch ein First aufgerufen, was dieses Event auslösen müsste (ohne Gewähr). Sobald Du zur Laufzeit den aktiven Datensatz wechselst wird es aber immer ausgelöst. [/edit]

[Flash68]

das funktioniert soweit, nur leider gibt es dann beim starten/compilieren des Programms einen Zugriffsfehler:00000394

und wie kann ich jetzt einen Inhalt eines Feldes auslesen?