Video Youtube , clique aqui para dar um joinha
Nessa aula vou mostrar como usar for com string
This lesson will show how to use is with string
http://doc.windev.com/en-US/?1510001&name=for_statement
Windev Curso Comandos/1 ... Condição - If
Windev Curso Comandos/2 ... Condição - Switch
Windev Curso Comandos/3 ... Loop
Windev Curso Comandos/4 ... WHILE
Windev Curso Comandos/5 ... For
Windev Curso Comandos/6 ... For Tabelas
Windev Curso Comandos/7 ... For String
Windev Curso Comandos/8 ... For Table
Windev Curso Comandos/9 ... Stop
Ordem Alfabetica
For - Windev Curso Comandos/5 ...
For String - Windev Curso Comandos/7 ...
For Tabelas - Windev Curso Comandos/6 ...
For Table - Windev Curso Comandos/8 ...
If - Windev Curso Comandos/1 ... Condição -
Loop - Windev Curso Comandos/3 ...
Stop Debug - Windev Curso Comandos/9 ...
Switch - Windev Curso Comandos/2 ... Condição -
WHILE - Windev Curso Comandos/4 ...
TableDeleteAll(TABLE_string)
s_texto is string=[
1|Coca Cola|5.00
2|Cerveja|7.00
3|Agua Mineral|2.00
]
FOR EACH STRING s_linha OF s_texto SEPAREE BY CR
n_contador is int=0
n_Codigo is int=0
s_nome is string=""
cy_preco is currency=0
FOR EACH STRING s_coluna OF s_linha SEPAREE BY "|"
n_contador++
SWITCH n_contador
CASE 1
n_Codigo=s_coluna
CASE 2
s_nome=s_coluna
CASE 3
cy_preco=s_coluna
OTHER CASE
END
END
TableAddLine(TABLE_string,n_Codigo,s_nome,cy_preco)
END