Astăzi vom face cheia dvs. de activare.
P / S: cheia cuvântului este codul dvs.
6) Verificați programul folosind tasta F9.
7) Salvați sursa cu SHIFT + CTRL + S.
8) Compilați programul apăsând F5.
Puteți activa o singură dată. Data viitoare când porniți formularul de activare, nu va mai fi
$ davaj = c ("edit1") -> text;
$ a = array ("1111", "1234", "4321", "1243");
dacă (in_array ($ davaj, $ a))<
MessageBox ("Ok", "Ok");
> altceva<
MessageBox ("Nu", "Nu");
>
Câteva chei pentru a face asta!
și am o astfel de întrebare am nevoie pentru a crea un program, dar acolo nu este cu parola
Mai curând va fi o întrebare și sub ea vor fi variante ale răspunsului și i-am făcut din Checkbox
și am nevoie ca atunci când am vibrară răspunsul corect și faceți clic pe butonul Următorul mi-a scris că răspunsul este corect și dacă am ales răspunsul greșit și a făcut clic pe butonul Următorul ar trebui să scrie că răspunsul nu este corect
Ajută-mă să scriu un scenariu.
Ar fi grozav dacă programul a salvat parola și atunci când nu veți mai intra în cheie atunci când veți merge
Da, dar este și mai ușor în acest fel
? 200 '200px': '' + (this.scrollHeight + 5) + 'px'); "> if (c (" edit1 "# 41; -> == textul" 123 "sau c (" edit1 „# 41 ; -> text == "132" sau c ("edit1" # 41; -> text == "321" # 41;<
// dacă textul câmpului de intrare este egal cu valoarea cheii, adică. în el va fi scris acest cuvânt
MessageBox ("Cheia este corectă", "Adevărată" # 41 ;;
>
altfel<
// altfel va ieși o astfel de fereastră:
MessageBox ("Cheia nu este introdusă corect", "Cheia nu este introdusă corect". # 41 ;;
>
sau - înseamnă "sau"
Și astfel este posibil să creați cheile pe termen nelimitat?
? 200 '200px': '' + (this.scrollHeight + 5) + 'px'); "> if (c (" edit1 "# 41; -> == textul" 123 „# 41;<
// dacă textul câmpului de intrare este egal cu valoarea cheii, adică. în el va fi scris acest cuvânt
HideForm (Form1, SW_SHOW # 41 ;; // ascunde formularul cu activare
ShowForm (prog, SW_SHOW # 41 ;; // deschide formularul cu programul
>
altfel<
// altfel va ieși o astfel de fereastră:
MessageBox ("Cheia nu este introdusă corect", "Cheia nu este introdusă corect". # 41 ;;
dacă (c ("edit1" # 41; -> text == "321" # 41;<
// dacă textul câmpului de intrare este egal cu valoarea cheii, adică. în el va fi scris acest cuvânt
HideForm (Form1, SW_SHOW # 41 ;; // ascunde formularul cu activare
ShowForm (prog, SW_SHOW # 41 ;; // deschide formularul cu programul
>
altfel<
// altfel va ieși o astfel de fereastră:
MessageBox ("Cheia nu este introdusă corect", "Cheia nu este introdusă corect". # 41 ;;
dacă (c ("edit1" # 41; -> text == "111" # 41;<
// dacă textul câmpului de intrare este egal cu valoarea cheii, adică. în el va fi scris acest cuvânt
HideForm (Form1, SW_SHOW # 41 ;; // ascunde formularul cu activare
ShowForm (prog, SW_SHOW # 41 ;; // deschide formularul cu programul
>
altfel<
// altfel va ieși o astfel de fereastră:
MessageBox ("Cheia nu este introdusă corect", "Cheia nu este introdusă corect". # 41 ;;
>