vendredi, novembre 24, 2006

Comment récupérer la valeur d'une combo dans une table mémoire ?

On pourrait penser que pour récupérer la valeur du Glien d'une combo dans une table mémoire, il faudrais utiliser : NomTable[IndiceLigne][listeSelect(NomColonneCombo)]
he! bien non

Voici la bonne syntaxe :
NomColonneCombo[NomTable,NomTable]..valeur.

Cette syntaxe est uniquement valable pour une combo dans un table mémoire.
Pour une table fichier utiliser : NomColonneCombo..Valeur.

Comment modifier la police d'un libellé d'un champ de saisie

Soit un champ de saisie qui comme police de libellé : MS UI Gothic.



Pour modifier la police de du libellé "Champ de saisie", il utiliser le code suivant :

sLibel est une chaîne = SAI_Saisie1..Libellé

SAI_Saisie1..Libellé = gPolice("Arial")+sLibel

jeudi, novembre 23, 2006

Enlever les caractères Spéciaux tel que =E9,=E8,..

Il arrive de récupérer une chaine de caractère (un mail ou une page internet) avec des caractères tel que =E9 en lieu et place d'un caractères accentués.

[En savoir plus]

Pour afficher une chaine sans ces caractères, voici donc une procédure permettant de les remplacer :

PROCEDURE RemplaceCaractères(pMachaine est une chaîne)

ch est une chaîne = SansEspace(pMachaine )

// Remplacement des caractères
ch = Remplace(ch,"=?ISO-8859-15?Q?","")
ch = Remplace(ch,"=?ISO-8859-1?Q?","")
ch = Remplace(ch,"=E9","é")
ch = Remplace(ch,"=E8","è")
ch = Remplace(ch,"=EA","ê")
ch = Remplace(ch,"=E7","ç")
ch = Remplace(ch,"=C9","é")
ch = Remplace(ch,"=7E","~")
ch = Remplace(ch,"?=","")
ch = Remplace(ch,"=?","")
ch = Remplace(ch,"=27","'")
ch = Remplace(ch,"=22","""")
ch = Remplace(ch,"=28","'(")
ch = Remplace(ch,"=29","')")
ch = Remplace(ch,"=2E",".")
ch = Remplace(ch,"=3A",":")
ch = Remplace(ch,"=3F","?")
ch = Remplace(ch,"=E0","à")
ch = Remplace(ch,"=3B",";")
ch = Remplace(ch,"=2B","+")
ch = Remplace(ch,"_"," ")

RENVOYER ch

dimanche, novembre 19, 2006

Site ProgWdm

Voici une page consacrée à une application WinDev Mobile.
L'utilitaire s'intitule WD Véhicule.
Il permet la gestion de carburant et d'entretien d'un ou plusieurs véhicules.
Il délivre également des statistiques sur la consommation, la station service la moins chère. D'autres fonctionnalités sont à venir...

Disponible en Téléchargement à la page suivante :
http://progwdm.free.fr/#sect1.5.

samedi, novembre 11, 2006

OpenXML de Microsoft (Part 1)

OpenXML est le nouveau format des fichiers de la suite office. Ce sont en fait des fichiers Zip. Celui-ci contient une arborescence et des fichiers décrivant le document. En apparence on pourrait croire qu’il sera désormais simple de créer un fichier Word, par exemple, au format .docx. Cependant le format est très complexe.

Juger plutôt. Voici l’arborescence d’un document Word 2007.

Quelques explications sont données sur l’utilité des différents répertoires et fichiers sur la page suivante : http://www.microsoft.com/france/msdn/office/OpenXML/structure-fichiers-OpenXML.mspx. On s’aperçoit rapidement que le code XML n’est pas simple.

Des exemples de création de documents Word sont données pour les langages .NET, Java et bientôt disponibles en PHP.

(Voir exemple en .Net)

La bonne nouvelle c’est qu’avec WinDev on peut utiliser des package .Net et avec WebDev utiliser du code PHP. Il reste plus qu’a installé le FrameWork .NET 3.0.

A noter que dans la Version 11 de WinDev, ce FrameWork .NET 3.0, sera indispensable pour utiliser le champ carrousel et le champ cube. (Nouveauté 62 et 63)

A suivre…

WinDev - Comment récupérer des valeurs persistantes dans la base de registre ?

Soit un projet "MonProjet" contenant plusieurs fenêtres (fnt1, fnt2 etc) dont certains champs ont l'option "Mémoriser la valeur" cochée.

Cette option est disponible dans la "Description du champ", onglet "Détail.


Soit chp1 l'un des champs de fnt1 dont je veux récupérer la valeur mémorisée (chaîne alphanumérique). Etant en mode test, cette valeur est stockée à l'endroit suivant de la base de registres :
HK_CURRENT_USER\Software\PCSoft\WinDev\10.0\ModeTest\MonProjet\fnt1\chp1

Pour récupérer la valeur, Il faut utiliser :

ChargeParamètre("fnt1\chp1\Val")

Dans le cas d'une application en production la clé sera légèrement différente, puisque au lieu d'avoir PC SOFT, ça sera le nom de votre application.

La clé de registre, peut-être récupérée par programmation par la fonction WLangage :

ProjetInfo(piRegistre)

Voir l'aide en ligne pour plus de détail sur les fonctions.