| |
|
|
- Seite 1 - |
|
Andre Hilprecht | Hi, brauche mal wieder Hilfe. Habe in meinem Prog einen Adminbereich der nur über ein einzugebendes Passwort zu erreichen sein soll. Funzt auch alles bestens - nur ich möchte jetzt noch erreichen das auch im Edit-Feld für die Passworteingabe die ***** (Sternchen) und nicht das Passwort in Reinschrift erscheinen. Habe hier schon gesucht aber nix passendes gefunden.
Gruß André |
|
|
| Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7 i5 / 3,2GHz 4 GB RAM Treibstoff: Radeberger Pils | 12.06.2006 ▲ |
|
|
|
| |
|
- Seite 2 - |
|
|
Andre Hilprecht | Jo, jo, jo,
jetzt sind das Sternchen vom Feinsten. Wie gesagt, ich bin blutiger Anfänger, ich lerne jeden Tag was Neues dazu und manchmal braucht man eben den Klaps uffn Hinterkopp.
Wie soll ich denn vorher wissen das ich Sternchen per SendMessages an die Variable Pass% schicken kann ohne aber ihren wirklichen Inhalt zu verändern.
Danke euch allen. |
|
|
| Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7 i5 / 3,2GHz 4 GB RAM Treibstoff: Radeberger Pils | 12.06.2006 ▲ |
|
|
|
|
| Du kannst das Aussehen des Sternchens auch einfach über setfont bestimmen. |
|
|
| |
|
|
|
Michael Wodrich | [quote:9ed5506d10]Wie soll ich denn vorher wissen das ich Sternchen per SendMessages an die Variable Pass% schicken kann ohne aber ihren wirklichen Inhalt zu verändern. [/quote:9ed5506d10] Pass% enthält das Handle des Edit-Dialoges. Über dieses Handle läßt sich der Dialog ansprechen und feintunen.
Schöne Grüße Michael Wodrich |
|
|
| Programmieren, das spannendste Detektivspiel der Welt. | 13.06.2006 ▲ |
|
|
|
|
Michael Wodrich | Ich habe mir noch einmal die ersten Postings durchgelesen...
Vermutest Du etwas die eingegebenen Daten in Pass% ???
Die Daten eines Edit-Controls erhälst Du mit der Funktion GetText$().
Die Original-Hilfedatei ist übrigens besser als ihr Ruf es zu sein scheint. Dort findest Du auch Einführungskapitel.
Siehe unter: - Einführung - 20.4. Einfache Editierfelder
Das sollte helfen...
Schöne Grüße Michael Wodrich |
|
|
| Programmieren, das spannendste Detektivspiel der Welt. | 13.06.2006 ▲ |
|
|
|
|
Andre Hilprecht | Muss mich vielleicht mal entschuldigen, wenn ich mich nicht so ganz professionell ausdrücke. Ich bin Hobby-Anfangs-Autodidakt. Habe hier niemanden, den ich mal was über Programmieren fragen könnte, in der Schule kein Informatik gahabt (bin Baujahr 60). Baue mir meine eigene Philosophie über das Programmieren auf und verrenne mich dabei bestimmt auch mal. Kann mir mit der Hilfe so einiges zusammenreimen, aber eben nicht immer. Bin lernwillig aber brauche manchmal einen Anschubs und bin Euch deshalb dankbar, das man hier sehr schnell die Hilfe bekommt, die man braucht. KompilierenMarkierenSeparieren Daraus entnehme ich das in der Variablen Pass% genau der Inhalt steht, den der Anwender in das Editfeld getippt hat. Sonst könnte ich doch die Variable nicht direkt mit meinem erdachten (vordefinierten) Passwort : 123456 vergleichen, es geht doch im Prog nur weiter wenn Pass% gleich Passwort. Funzt jedenfalls so. Jetzt kommt dazu das ich mit SetMessage Sternchen für jeden Tastenanschlag ins Editfeld schicken kann, mit dem Minus überhaupt erst mal die Passwortfunktion fürs Editfeld einschalte, mit SetFont dazu noch das aussehen des Sternchens bestimmen kann - bis hierhin reichts bei mir, aber das mit dem Handle - grübel, grübel. Wozu soll ich denn mit GetText$() jetzt noch den Inhalt auslesen, die Variable Pass% hat doch bereits ihre Schuldigkeit getan.
Entschuldigt das ich so hatnäckig bin, ich wills ja begreifen. Gruß André |
|
|
| Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7 i5 / 3,2GHz 4 GB RAM Treibstoff: Radeberger Pils | 13.06.2006 ▲ |
|
|
|
|
| Bin Baujahr 59, das sollte also kein Problem sein Vielleicht verstehste folgendes Code-Snippet und kannst es verweden: KompilierenMarkierenSeparieren Sonst einfach nochmal nachharken |
|
|
| |
|
|
|
Andre Hilprecht | Das verstehe ich, alles klar. Vielleicht brauchte ich den Umweg über GetText$(Pass%) nicht gehen, weil mein Passwort kein Wort sondern eine Zahl ist.
Was anderes, wie bekommt ihr den Programmcode hier in so ein Fenster, sieht besser aus und ich muss bestimmt mal wieder ein paar Zeilen Quellcode posten?
Gruß André |
|
|
| Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7 i5 / 3,2GHz 4 GB RAM Treibstoff: Radeberger Pils | 13.06.2006 ▲ |
|
|
|
|
Rolf Koch | entweder Du klickst auf Ausführliche Antwort schreiben und hast da die Formatierungsoptionen oder du setzt es ohne die Leerzeichen zwischen dem code (nur damit es hier dargestellt wird): [c o d e]hier der code[/c o d e] |
|
|
| |
|
|
|
Jörg Sellmeyer | Andre Hilprecht
Das verstehe ich, alles klar. Vielleicht brauchte ich den Umweg über GetText$(Pass%) nicht gehen, weil mein Passwort kein Wort sondern eine Zahl ist.
Was anderes, wie bekommt ihr den Programmcode hier in so ein Fenster, sieht besser aus und ich muss bestimmt mal wieder ein paar Zeilen Quellcode posten?
Gruß André
Das ist kein Umweg sondern die einzige Möglichkeit an den Text zu kommen - egal ob Text oder Zahl. Pass% enthält nur das Handle zum Editcontrol. Wenn Du eine Zahl hast und weiterverwenden willst, darfst Du nicht vergessen sie mit Val(GetText$(Pass%)) in einen numerischen Wert zu verwandeln.
Gruß Jörg |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 13.06.2006 ▲ |
|
|
|
|
| |
|
| |
|
|
|
Andre Hilprecht | Hm, ihr macht mir gerade klar, das etwas nicht geht, was bei mir aber funzt ??!!?? Also mein Teil sieht jetzt so aus: KompilierenMarkierenSeparierenText% = @Create(Text,D%,Bitte Programmpasswort eingeben:,20,20,300,20)
Pass% = @Create(Edit,D%,, 20, 50,200,-30)
Font% = @Create(Font,Sans Serif,24,0,0,0,0)
SetFont Pass%, Font%
sendmessage(Pass%,204,ord(*),0)
OK% = @Create(DefButton,D%,OK, 20,140, 140,30)
CANCEL% = @Create(DefButton,D%,Abbruch,180,140,140,30)
@SetFocus(Pass%)
F% = 0
WhileNot F%
WaitInput
If Clicked(OK%)
Pass$ = @GetText$(Pass%)
If Pass$=0000
DestroyWindow(OK%)
F% = 1
DestroyWindow(D%)
Client
ElseIf Pass$ <> 0000
Text1% = @Create(Text,D%,Das Passwort ist leider,20,200,140,20)
Text2% = @Create(Text,D%,F A L S C H ! !,60,220,140,20)
EnableWindow Text%,0
EnableWindow Pass%,0
EnableWindow OK%,0
EnableWindow CANCEL%,0
SLEEP 2500
F% = 1
DestroyWindow(D%)
EndIf
ElseIf @Clicked(CANCEL%)
F% = 1
DestroyWindow(D%)
EndIf
EndWhile
und es funzt jetzt wunschgemäß.
Danke Euch allen, bis zum nächsten Denkanstoß Gruß André |
|
|
| Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7 i5 / 3,2GHz 4 GB RAM Treibstoff: Radeberger Pils | 13.06.2006 ▲ |
|
|
|
|
| Du machst es doch so, wie wir schrieben KompilierenMarkierenSeparieren Pass% ist die ID vom Edit Pass$ ist die Stringvariable wo der Text gespeichert werden soll |
|
|
| |
|
|