/trunk/Login.pas |
---|
50,8 → 50,13 |
Exit; |
end; |
frmBugtracker.eingeloggtMitarbeiter := cbxMitarbeiter.KeyValue; |
frmBugtracker.eingeloggtMitarbeiterName := cbxMitarbeiter.Text; |
frmBugtracker.aktuellesProjekt := cbxProjekt.KeyValue; |
frmBugtracker.aktuellesProjektName := cbxProjekt.Text; |
frmBugtracker.LblAngemeldet.Caption := Format('Eingeloggt: %s, Projekt: %s', [frmBugtracker.eingeloggtMitarbeiterName, frmBugtracker.aktuellesProjektName]); |
frmBugtracker.NeuFiltern; |
ModalResult := mrOk; // Das schließt den Dialog |
end; |