Curso WinDev - Funções Dialogo - 6/... - Input

---

---

---

Video Youtube

---

Nessa aula vou mostrar como digitar informacoes manuais com Input

This lesson will show how to type with manual Input Info

Cette leçon montrera comment taper avec Infos entrée manuelle

---

http://doc.windev.com/en-US/?3021010&name=constants_for_managing_the_dialog_boxes

http://doc.windev.com/en-US/?3021016&name=input_function
http://doc.pcsoft.fr/fr-FR/?3021016&name=saisie_fonction

---

Blog - WinDev - Curso Funções Dialogo - 001/... - Confirm
Blog - WinDev - Curso Funções Dialogo - 002/... - Okcancel
Blog - WinDev - Curso Funções Dialogo - 003/... - Message
Blog - WinDev - Curso Funções Dialogo - 004/... - toastDisplay
Blog - WinDev - Curso Funções Dialogo - 005/... - YesNo
Blog - WinDev - Curso Funções Dialogo - 006/... - Input
Blog - WinDev - Curso Funções Dialogo - 007/... - Error
Blog - WinDev - Curso Funções Dialogo - 008/... - Gauge
Blog - WinDev - Curso Funções dialogo - 009/... - Info 

---

n_numero_copias is int
Input("Quantas Copias",n_numero_copias)
s_telefone is string=""
Input.InputMask=maskPhone
Input("Telefone",s_telefone)
s_observacao is string=""
s_observacao=RepeatString(CR,10)
Input.InputMask="regexp:.{0,140}"
Input("Observacao",s_observacao)
b_pergunta is boolean=False
Input.OptionalCaption="Deseja Gravar"
Input("pergunta",b_pergunta)

---

n_numero_copias est entier
Saisie("Quantas Copias",n_numero_copias)
s_telefone est chaîne=""
Saisie.MasqueSaisie=maskTel
Saisie("Telefone",s_telefone)
s_observacao est chaîne=""
s_observacao=Répète(RC,10)
Saisie.MasqueSaisie="regexp:.{0,140}"
Saisie("Observacao",s_observacao)
b_pergunta est booléen=Faux
Saisie.LibelléOptionnel="Deseja Gravar"
Saisie("pergunta",b_pergunta)

---

---

Example

// Example of simplified input
NbCopies is int
ReturnValue is int
ReturnValue = Input("How many copies do you want to print?", NbCopies)
SWITCH ReturnValue 
CASE 0: Info("You have canceled. The default number is set to 1")
CASE 1: Info("You have requested " + NbCopies)
END

// Simplified input while using an input mask
PhoneNum is string
// Use an input mask
Input.InputMask = maskPhoneFrance
SWITCH Input("What is your phone number?", PhoneNum)
// OK
CASE 1: EDT_PhoneNum = PhoneNum 
// Cancel
CASE 0: EDT_PhoneNum = "No phone"
END

Comments is string
Comments = RepeatString(CR, 10)
// Comments entered by the user in a multi-line control
// Input limited to 140 characters
Input.InputMask = "regexp:.{0,140}"
SWITCH Input("Enter your comments.", Comments)
// OK
CASE 1: EDT_Comment = Comments
// Cancel
CASE 0: EDT_Comment = "No comment"
END

DisplayInfo is boolean = False
// Ask the user whether he really wants to close the application
// A checkmark ("Don't display this window anymore") allows the user
// not to display this question anymore
Input.OptionalCaption = "Don't display this window anymore"
IF DisplayInfo = False THEN
SWITCH Input("Do you want to close the application?", DisplayInfo)
// Close
CASE 1: Close()
END
END
// Remember to store the value of DisplayInfo for the next time

// Direct syntax
PhoneNum is string
IF Input("What is your phone number?", PhoneNum, ...
["Validate", "No phone", "Cancel"], 3, 3, dlgIconQuestion) = 1 THEN
Info(PhoneNum)
END

---

---

---

---