Entwickler-Ecke

Sonstiges (Delphi) - Passwort und benutzername


breakdancer1111 - Mo 21.10.02 09:48
Titel: Passwort und benutzername
Hallo!
Wie kann ich einen Button machen wo man
nur drauf klicken kann wenn man ein passwort und einen
Benutzernamen eingegeben hat?


wwerner - Mo 21.10.02 10:13

Bei dem Button gibt es die Eigenschaft enabled. Sieh dir die mal an. Wenn das Passwort zum benutzernamen passt kannst du die eigenschaft auf true setzten


breakdancer1111 - Mo 21.10.02 10:33

Wie mache ich den ein passwort und ein benutzernamen?


Delete - Mo 21.10.02 10:47

:shock:

*Puuh*

Pseudocode:

Quelltext
1:
2:
wenn Edit1.Text = Hans { Benutzer } und Edit2.Text = Wurst { PW } dann
Button1.Enabled := TRUE;


breakdancer1111 - Mo 21.10.02 11:26

Tut mir leid. Kann ja auch nichts dafür das
ich ein afänger bin.


breakdancer1111 - Mo 21.10.02 11:28

*lol*

es klappt nicht


Delete - Mo 21.10.02 11:30

Luckie hat folgendes geschrieben:

Quelltext
1:
2:
wenn Edit1.Text = Hans { Benutzer } und Edit2.Text = Wurst { PW } dann
Button1.Enabled := TRUE;

Und wenn nicht? Also:

Quelltext
1:
Button1.Enabled := (Edit1.Text = 'Hans') and (Edit2.Text = 'Wurst');                    


@breakdancer: Es war sicher kein Vorwurf von Luckie. Der Gute leidet halt manchmal unter Atemnot ... :wink: ...


breakdancer1111 - Mo 21.10.02 11:48

Danke das 2. klappt.
Beim 1. steht undifinirter bezeichenr wenn undifinirter bezeichenr hans undifinirter bezeichenr wurst


Delete - Mo 21.10.02 11:52

breakdancer1111 hat folgendes geschrieben:

Beim 1. steht undifinirter bezeichenr wenn undifinirter bezeichenr hans undifinirter bezeichenr wurst


*AUTSCH*

Ich habe doch noch drüber geschrieben P S E U D O C O D E!

Das sollte nur eine Anregung für dich sein, wie man es rein logisch umsetzt. Den Pseudocode nach richtigen Delphi-Code umsetzen solltst du.


LCS - Mo 21.10.02 14:57

Ok, nun mal gaaanz ruhig.

@brechdancer1111
niemand wirft dir vor, dass du Anfänger bist, aber wie heissts so schön? Denken hilft :think:

Also mal angenommen du hast ein Formular mit 2 Editfeldern und einem Button, und der Button soll nur aktiv sein, wenn in den Edits was drinnsteht, kannst du für das erste Editfeld eine Prozedur für das OnChange Ereignis machen und reinschreiben:

Quelltext
1:
2:
3:
4:
procedure TForm1.Edit1OnChange(Sender: TObject);
begin
  Button1.Enabled := (edit1.Text <> '') and (edit2.Text <>'');
end;

Dem OnChange Ereignis des zweiten Edits weisst du anschliessend auch diese Prozedur zu und im OI setzt du die Eigenschaft Enabled für den Button auf FALSE.
Dann hast du einen Button der sich nur klicken lässt, wenn in den Feldern was drinsteht. Die Prüfung ob da was korrektes drinsteht musst du dann beim OnClick des Buttons einbauen.

Gruss Lothar


deagle - Mi 23.10.02 21:50

Danke LCS

Ich habe das mal ausprobiert hat geklappt!! Besser kann man es nicht erklaeren!!