Einzelnen Beitrag anzeigen

Benutzerbild von xZise
xZise

Registriert seit: 3. Mär 2006
Ort: Waldbronn
4.303 Beiträge
 
Delphi 2009 Professional
 
#4

Re: Inputbox Eingabe als "*********"

  Alt 23. Jan 2007, 16:55
@ Vorposter:

Zitat von mafiaente:
also ich möchte so ne kleine nöchte-gern-passwortabfrage über einen inputdialog gestalten
@ Thread:
Erstelle eine neue Form, und benutzte da den Tipp von oben.

[edit]Mal eine Anleitung:
- Erstelle eine public-function "ShowModal" mit einen Boolean als Rückgabewert
- Erstelle eine Variable (oder Property) "Password" (o.s.ä.) von dem Typ "string"
- Erstelle eine private Variable "Aborted" (o.s.ä.) vom Typ Boolean
- Schreibe in der ShowModalFunktion:
Delphi-Quellcode:
ePW.text := '':
aborted := true;
inherited ShowModal;
Result := not aborted;
ePW ist das Edit in den man das Passwort schreibt.
- Schreibe beim Klick auf den Button "OK" folgenden Code:
Delphi-Quellcode:
Password := ePW.Text;
aborted := false;
- Jetzt kann man in der Hauptanwendung die Form aufrufen fast so wie ein Dialog
Delphi-Quellcode:
if frmPW.ShowModal then
  PW := frmPW.Password;
[/edit]
Fabian
Eigentlich hat MS Windows ab Vista den Hang zur Selbstzerstörung abgewöhnt – mkinzler
  Mit Zitat antworten Zitat