Accueil > Forum > > > > Validation d'un Code Postal(format Canadien) en Delphi Objet
Validation d'un Code Postal(format Canadien) en Delphi Objet
lundi 9 mai 2005 à 15:56:13 |
Validation d'un Code Postal(format Canadien) en Delphi Objet

alex75000
|
Bonjour,
je cherche une fonction(ou Procédure) de Validation permettant de valider un Code Postal de Format H1H 1H1, je n'arrive pas à faire en sorte que la première fois, on cherche une lettre, la 2ième fois un chiffre et ainsi de suite...(le Code Postal est entré dans un champ Edit, évidemment)
Merci à l'avance.
Alex
|
|
lundi 9 mai 2005 à 18:32:30 |
Re : Validation d'un Code Postal(format Canadien) en Delphi Objet

japee
|
Réponse acceptée !
Tu veux vérifier la validité au moment de la saisie, je suppose ?
Je n'ai pas trop le temps de tester mon code, mais comme ça vite fait, ça devrait donner quelque chose comme ça :
function IsValid(S: TObject; K: Char): Char;
var Position: Byte; // sur modèle: H1H 1H1
begin
Result := #0;
Position := Length(TEdit(S).Text) +1;
if Position > 7 then Exit;
if K in [#8, #13] then
begin
Result := K;
Exit;
end;
case Position of
1, 3, 6: if K in ['A'..'Z', 'a'..'z'] then Result := K;
2, 5, 7: if K in ['0'..'9'] then Result := K;
4: if K = ' ' then Result := K;
end;
end;
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
Key := IsValid(Sender, Key);
end;
Bonne prog'
|
|
lundi 9 mai 2005 à 19:05:48 |
Re : Validation d'un Code Postal(format Canadien) en Delphi Objet

WhiteHippo
|
Réponse acceptée !
Et en utilisant un TEditMask ? Propriété editmask := ">L0L 0L0;1;_"
Cordialement.
|
|
lundi 9 mai 2005 à 20:35:49 |
Re : Validation d'un Code Postal(format Canadien) en Delphi Objet

alex75000
|
merci beaucoup, je vais tester ça! :D
|
|
mercredi 11 mai 2005 à 20:04:10 |
Re : Validation d'un Code Postal(format Canadien) en Delphi Objet

alex75000
|
Y-a-t il un moyen pour que les lettres entrées soit automatiquement en Majuscule(qu'importe si l'usager les entre en minuscule ou Majuscule???) en utilisant le MaskEdit
|
|
mercredi 11 mai 2005 à 21:46:49 |
Re : Validation d'un Code Postal(format Canadien) en Delphi Objet

WhiteHippo
|
oui c'est le > de ">L0L 0L0;1;_" qui force les caractères majuscules.
Cordialement.
|
|
mercredi 11 mai 2005 à 22:50:57 |
Re : Validation d'un Code Postal(format Canadien) en Delphi Objet
|
Cette discussion est classée dans : code, format, validation, postal, canadien
Répondre à ce message
Sujets en rapport avec ce message
Validation MaskEdit [ par lelahel08 ]
Bonjour à tous,Voilà le problème :J'ai un MaskEdit représnetant un Code Postal (mon mask : 00000;0;_)Jusque la aucun soucis particulierpar contre si j
Trie sur CODE POSTAL [ par eli42 ]
Bonjour, Voila je dois sélectionner des code Postaux sur une distance environ de 10 km à vol d'oiseau par rapport A une saisie de l'utilisateur, la
Urgent 2 : auto compléter des nom de ville en fonction de code postal [ par cedflow ]
Bonjour,JE dois réaliser un programme dans de très bref délaisle point qui m'interresse ici est basé sur deux TEditle premier dans lequel l'utilisateu
Changement des é, è, ô etc [ par Also know as ]
[font=Comic Sans MS][size=3]Bonjour,Je crée mon site Internet en utilisant UltraEdit-32.Pour cela aucun problème.Mais il y a une tâche qui m'énerve qu
bip pc [ par nic13 ]
je voudrais savoir le code delphi pour que le code "beeper pc" => http://www.delphifr.com/code.aspx?ID=12673 ne lance pas de fenetre, je veux dire que
Merci Delphiprog : [ par Kenavo ]
Il a passé la barre des 2000 messages ! Ca s'arrose ! ;-))Et un grand merci à Delphiprog ! Ken@vo____________________Code, Code, Codec !
Je cherch vraiment des pro [ par jobtunisieyasser ]
Salut les amisje cherche un interpréteur de code htmlou un éditeur de de code html en outre une source ou un composant qui traduit la mise en page en
glut : redimensionement fenetre [ par stick059 ]
Bonjour tout le monde !Voila, j'ai un petit problème avec le code suivant :program Template;uses Windows, Messages, glut, OpenGL
Chercher des lignes de type string et les convertir au type int dans dbgrid [ par sosososo ]
Bonjour,J'ai un problème de convertir une variable string to int. En fait, J'ai ma dbgrid qui contient 2 colonnes : 'Code' et 'libellé' . Dans le Code
enregistrer dans un format html avec word [ par jobtunisieyasser ]
DocWord.SaveAs(F_H, wdFormatHTML ,EmptyParam, EmptyParam,EmptyParam,EmptyParam,EmptyParam, EmptyPara
Livres en rapport
|
Derniers Blogs
[ASP.NET] NE PAS SE FAIRE AVOIR PAR IHTTPMODULE ET SA MéTHODE INIT()[ASP.NET] NE PAS SE FAIRE AVOIR PAR IHTTPMODULE ET SA MéTHODE INIT() par tja
Beaucoup de développeurs pensent que lorsqu'on créé et enregistre un IHttpModule, il n'en existe qu'une seule instance et la méthode Init() sera appelée qu'une fois.
C'est faux
Cela peut vraiment créer des bugs subtils dont en ne se rend pas compte ...
Cliquez pour lire la suite de l'article par tja [MSTD10] SHAREPOINT 2010 ET TEAM FOUNDATION SERVER[MSTD10] SHAREPOINT 2010 ET TEAM FOUNDATION SERVER par phil
Un post rapide pour vous informer de la disponibilité de la vidéo de ma présentation sur SharePoint 2010 & Team Foundation Server. http://www.microsoft.com/france/vision/mstechdays10/Webcast.aspx?EID=20215d48-02e3-4d43-8c36-e53505c3b316 Dans la ...
Cliquez pour lire la suite de l'article par phil [MSTD10] SQL SERVER 2008 POUR LES DéVELOPPEURS ET VISUAL STUDIO TEAM SYSTEM DATABASE EDITION[MSTD10] SQL SERVER 2008 POUR LES DéVELOPPEURS ET VISUAL STUDIO TEAM SYSTEM DATABASE EDITION par Miiitch
Lors de cette session que j'ai animé avec Rui , j'ai eu l'occasion de présenter, en plus des nouveautés de SQL Server 2008, comment utiliser l'édition "database" de Visual Studio 2008. Le principe? Avoir les mêmes outils lors que l'on travaille avec une b...
Cliquez pour lire la suite de l'article par Miiitch [WF4] LOCALISER SIMPLEMENT UNE ACTIVITé ET SON DESIGNER WPF[WF4] LOCALISER SIMPLEMENT UNE ACTIVITé ET SON DESIGNER WPF par JeremyJeanson
La localisation . vous connaissez ce system miraculeux qui permet à votre application de s'afficher dans la langue de l'utilisateur (à condition de l'avoir intégrée dans votre programme). Comment mettre en place la localisation dans WF4? Cette question m'...
Cliquez pour lire la suite de l'article par JeremyJeanson [TECHDAYS 2010] WEBCASTS ET SLIDES[TECHDAYS 2010] WEBCASTS ET SLIDES par Audrey
Les webcasts des sessions des Techdays 2010 sont maintenant disponibles en ligne ! Me concernant, voici les slides et le webcast de la session Blend 3 / Skechtflow : Dessinez c'est gagné ! (animée avec Michel Perfetti ) Les slides et le webcast : Blend 3/...
Cliquez pour lire la suite de l'article par Audrey
Logiciels
Rigs of Rods (63.3)RIGS OF RODS (63.3)c'est un jeu de multi-simulation camions,autobus voitures, avions, bateaux, hélicoptère avec défo... Cliquez pour télécharger Rigs of Rods Konvertor (4.00)KONVERTOR (4.00)Le logiciel est un gestionnaire multimedia affichant, jouant et convertissant plus de 2000 format... Cliquez pour télécharger Konvertor Xlite (v 3.0 build 41150)XLITE (V 3.0 BUILD 41150)c'est un logiciel qui permet de téléphoner par Internet à l'aide d'un compte SIP pratique pour le... Cliquez pour télécharger Xlite Academy System (10.9.3.0)ACADEMY SYSTEM (10.9.3.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System
|