Entwickler-Ecke

Datenbanken - DB-Login-Namen automatisch in Tabelle eintragen lassen


peppi - Mo 25.11.02 12:35
Titel: DB-Login-Namen automatisch in Tabelle eintragen lassen
Hallo,

ich hab ein Programm an dem verschiedene Mitarbeiter arbeiten. Um Daten eintragen zu können müssen sich die Mitarbeiter natürlich vorher bei der DB anmelden. In der Tabelle in der sie die Daten eingeben, ist ebenfalls eine Spalte "MITARBEITER" in der nun automatisch der jeweilige Login-Name eingetragen werden soll. Gibts da irgendwie ne Prozedur oder sowas für?? Wäre für jeden Tip dankbar!!

LG

Jana!


LCS - Mo 25.11.02 12:40

Hi
du könntest z. B. das OnNewRecord Ereigniss dazu verwenden, den aktuellen Login-Namen in das entsprechende Tabellenfeld zu schreiben.

Gruss Lothar


peppi - Mo 25.11.02 13:44
Titel: OnNewRecord
Hi Lothar,

also die Online-Hilfe dazu find ich ehrlich gesagt nicht unbedingt hilfreich ... wie soll das denn in der Anwendung aussehen?? Also der Anfang sicher so ...



Quelltext
1:
2:
3:
4:
procedure TForm1.table1NewRecord(DataSet: TDataSet);
begin
 table1.active := false
 ...


aber wie selektiere ich dazwischen nun den Login-Namen??


LCS - Mo 25.11.02 14:45

Hi
OnNewRecord wird jedesmal dann ausgelöst, wenn ein neuer Datensatz für die Tabelle erzeugt wird. Innerhalb der Routine hast du die Möglichkeit die Felder des neuen Satzes zu füllen bzw. zu initialisieren bevor ihn der Anwender überhaupt zu Gesicht bekommt.

Quelltext
1:
2:
3:
4:
procedure TForm1.table1NewRecord(DataSet: TDataSet); 
begin 
  table1.FieldByName('Mitarbeiter').Value := Mitarbeiterkennung;
end;

Die Mitarbeiterkennung wäre die Eingabe des Mitarbeiters von der Anmeldung.

Gruss Lothar