Atualizar valores de label com laço for

[Nascimento]

Amigos ja tentei de todas as formas que pude nao consegui



como eu atualizo labeis criadas com laço for next vou exemplificar abaixo como estou fazendo

Código: Selecionar todos

#include "minigui.ch"

Function main()
 local lin:=25
   for i:= 1 to 9 
       lab:= "teste" + Str(i, 1) 
      @ 090+(lin*i),725 label l_&lab  value "teste"

    next
Return Nil

o que ja tentei de tudo no meu pouco conhecimento é modificar o valor do teste chamando a mesma função


exemplo chamo ela a primeira vez ela cria os controles
chamo a segunda vez so faz atualizar
agradeço antecipadamente
Att: Nascimento

[Pablo César]

Você primeiro cria e segundo atualiza.
Primeiro utilizas @ ... LABEL <nome> e segundo SetProperty(<form_name>,<label_name>,"VALUE",<valor>)

Se você ainda quer utilizar a mesma função... diferencie entre criar e modificar os labels.

Código: Selecionar todos

If lmudar
  SetProperty...
else
  @.. LABEL <>...
Endif

[Nascimento]

plablo obg com seu exemplo deu pra ter uma ideia