Français
Source/ Codesnippets

finissons Bildschirmschoner Blindpasswort

 

Julian
Schmidt
cette Bildschirmschoner peux seulement finissez volonté, si un Blindpasswort eingeben wird. chez qui Passworteingabe ist large- et Kleinschreibung égal.
encore effektiver ist es si qui FastMode aktiviert wird!
KompilierenMarqueSéparation
WindowStyle $F0
Window 0, 0 - %MaxX, %MaxY
Setwindowpos %hwnd=0, 0 - %MaxX, %MaxY;-1
Cls 0
ShowCursor 0
var blindpasswort$=Upper$("XProfan")
var passwort_edit& = Create("Edit",%HWnd,"",%MaxX,%MaxY,0,(-1)*25)
ShowWindow(passwort_edit&,0)

while 1

    sleep 30
    setfocus(passwort_edit&)
    case Upper$(Gettext$(passwort_edit&))<>Left$(blindpasswort$,Len(Gettext$(passwort_edit&))) : Settext passwort_edit&,""
    case Upper$(Gettext$(passwort_edit&))=blindpasswort$ : end
    'Bildschirmschoner - Algorithmus
    Color Rnd(16),Rnd(16)
    print MkStr$(" ",%MaxX/8)

˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...] 
26.07.2011  
 



Bisl Murx ist cela mais déjà. ^ ^

Vlt. UserMessage wm_keyUp ou bien un Éditer im pas-sichtbaren Bereich et den Fokus festkleben.
 
26.07.2011  
 




Julian
Schmidt
comment peux on car den Fokus festkleben?
 
˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...] 
26.07.2011  
 



si Du un Sleep 30 fais simple après un SetFocus -

ou bien plan "ordentlich" per Subclassing.
 
26.07.2011  
 




Julian
Schmidt
iF (26.07.11)

si Du un Sleep 30 fais simple après un SetFocus -


oui c'est ca cela habe je doch getan, avec qui la ligne:
KompilierenMarqueSéparation
casenot getfocus(passwort_edit&) : setfocus(passwort_edit&)
>

qui Unterschied liegt y cela qui Concentrer seulement gesetzt wird, si encore pas gesetzt ist....
 
˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...] 
26.07.2011  
 



Hatte je pas gesehen - sorry.

Tip: casenot getfocus(passwort_edit&) : setfocus(passwort_edit&) nécessaire ungefähr 3la fois plus CPU/ Strom/ Zeit comme simple seulement setFocus(passwort_edit&).
 
26.07.2011  
 




Julian
Schmidt
pourquoi zieht casenot getfocus(passwort_edit&) : setfocus(passwort_edit&) "ungefähr 3la fois plus CPU/ Strom/ Zeit"?
J'ai pensé plutôt moins!
 
˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...] 
26.07.2011  
 



Laienhaft gezählt:

1: getfocus
2: casenot
2,5: setfocus

seulement um:

1: setfocus

dans cette Situation "lohnt" cela vérifier pas là qui Prüfung lastiger ist comme qui letztendliche Anweisung.
 
26.07.2011  
 



Zum Quelltext


Topictitle, max. 100 marque.
 

Systemprofile:

ne...aucune Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

s'il te plaît s'inscrire um une Beitrag trop verfassen.
 

Options du sujet

9.093 Views

Untitledvor 0 min.
p.specht21.12.2020
Georg Teles03.10.2017
W.L.05.07.2017
RudiB.08.11.2012
plus...

Themeninformationen

cet Thema hat 2 participant:

iF (4x)
Julian Schmidt (4x)


Admins  |  AGB  |  Applications  |  Auteurs  |  Chat  |  protection des données  |  Télécharger  |  Entrance  |  Aider  |  Merchantportal  |  Empreinte  |  Mart  |  Interfaces  |  SDK  |  Services  |  Jeux  |  cherche  |  Support

un projet aller XProfaner, qui il y a!


Mon XProfan
Privé Nouvelles
Eigenes Ablageforum
Sujets-La liste de voeux
Eigene Posts
Eigene Sujets
Zwischenablage
Annuler
 Deutsch English Français Español Italia
Traductions

protection des données


Wir verwenden Cookies seulement comme Session-Cookies à cause de qui technischen Notwendigkeit et chez uns gibt es aucun Cookies de Drittanbietern.

si du ici sur unsere Webseite klickst ou bien navigierst, stimmst du unserer Erfassung de Informationen dans unseren Cookies sur XProfan.Net trop.

Weitere Informationen trop unseren Cookies et en supplément, comment du qui Kontrolle par-dessus behältst, findest du dans unserer nachfolgenden Datenschutzerklärung.


d'accordDatenschutzerklärung
je voudrais keinen Cookie