PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 25 → WD - Como realizar uma seleção de arquivo de tabela de inversão multiselection?
WD - Como realizar uma seleção de arquivo de tabela de inversão multiselection?
Débuté par BOLLER ADRIANO, 02 juil. 2016 00:23 - Aucune réponse
Membre enregistré
3 665 messages
Popularité : +175 (223 votes)
Posté le 02 juillet 2016 - 00:23
Voici un exemple de code :
psTable est une chaîne = "TABLE_Nom"
// Declarations
leIndice est un entier

// Zone memoire
MemCrée("MemTemp")

// Memorisation des selections
POUR leIndice=1 A TableSelectOccurrence(psTable)
MemAjoute( "MemTemp", MemOccurrence( "MemTemp")+1,TableSelect(psTable, leIndice))
FIN

// Deselection
TableSelectMoins(psTable)

// Inversion de la selection
POUR leIndice=1 A TableOccurrence(psTable)
SI MemRecherche("MemTemp",leIndice,Faux)=-1 ALORS
TableSelectPlus(psTable,leIndice)
FIN
FIN

// Fin
MemSupprimeTout("MemTemp")


--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 9949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/