Código: Seleccionar todo
LBX2.Add(LBX[LBX.Index].Text)
LBX.Remove(LBX.Index)
Código: Seleccionar todo
IF LBX.Index >= 0 THEN
LBX2.Add(LBX[LBX.Index].Text)
LBX.Remove(LBX.Index)
ENDIF
Código: Seleccionar todo
LBX2.Add(LBX[LBX.Index].Text)
LBX.Remove(LBX.Index)
Código: Seleccionar todo
IF LBX.Index >= 0 THEN
LBX2.Add(LBX[LBX.Index].Text)
LBX.Remove(LBX.Index)
ENDIF