Discussion :

[Doudy]

Bonjour,

J'utilise la méthode Locate sur un TIBDataSet pour vérifier la présence éventuelle d'un élément dans une table:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

if not(dmGestion.ibdVille.Locate('NomVille',edtVille.Text,[])) then

Mais locate retourne toujours faux, même si la chaine de caractère d' edtVille.Text est identique au contenu du champ 'NomVille' de ma table.
Étant débutant en Delphi, je dois passer à coté de quelque chose d'évident, mais je ne vois pas quoi!

Merci d'avance pour l'aide.

[seabs]

Bonjour,

Tu as essayé en ajoutant les options (loCaseInsensitive,loPartialKey).

Ton code serait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

if not(dmGestion.ibdVille.Locate('NomVille',edtVille.Text,[loCaseInsensitive,loPartialKey])) then

Si locate fonctionne avec ces options, tu pourras ensuite rechercher la raison du dysfonctionnement dans ton code.

N'y a t'il pas un espace en fin de chaîne dans edtVille.Text ?

Bon courage dans tes recherches

[Doudy]

Merci Seabs de t'être penché sur mon problème.
Si j'ajoute les options suggérées, voici les erreurs de compilation que j'obtiens:

[DCC Erreur] autre.pas(44): E2003 Identificateur non déclaré : 'loCaseInsensitive'
[DCC Erreur] autre.pas(44): E2003 Identificateur non déclaré : 'loPartialKey'
[DCC Erreur] autre.pas(44): E2010 Types incompatibles : 'TLocateOptions' et 'Set'
[DCC Erreur fatale] location.dpr(10): F2063 Impossible de compiler l'unité utilisée 'autre.pas'

Et pourtant d'après l'aide (F1) la syntaxe est correcte.
En édtion du code, en passant le curseur sur les options (loCaseInsensitive,loPartialKey), dans l'infobulle j'ai une Erroneous_Type - Erreur que je n'avais pas en laissant les options vides []

Qu'en pensez-vous ?

Merci d'avance

[Cl@udius]

Salut

TLocateOptions est défini dans l'unité DB, que tu dois donc ajouter aux uses.

Quel est le type du champ NomVille: CHAR ou VARCHAR ?
Si c'est CHAR ceci expliquerait l'échec de la recherche sans [loPartialKey].

@+ Claudius.

[Doudy]

Merci une fois de plus à Cl@udius

Comme conseillé en ajoutant DB l'option est prise en compte.
Et en changeant dans Firebird var(25) par varchar(25) on peut rechercher avec [loCaseInsensitive] seul sans [loPartialKey] !

Merci à tous