AccueilCodesTutorielsForumsEmploiLivresConnexion

  • Delphi CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2008 11 23 11:34:55
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : Recherche dans un ValueListEditor [ Divers / Débutant(e) ] (buguetj)

dimanche 7 septembre 2008 à 15:33:07 | Recherche dans un ValueListEditor

buguetj
Bonjour, j'ai ressencé plusieurs information dans un TValueListEditor, parallèlement à ce composant j'ai créer un TEdit, un TLabel et un TButton.
En fait l'Edit sert à rechercher un terme (présent ou non dans le ValueList Editor) et lorque j'appui sur le button je souhaiterais que si le terme que j'ai écris dans le TEdit est recensé dans le ValueListEditor que le TLabel est pour valeur Caption: "Terme présent".

Pour cela j'ai essayé ceci: If TEdit1.Text=ValueListEditor.String then Label1.Caption:=Terme présent";
mais cette ligne ne fonctionne pas, je fais donc appel à votre aide...
dimanche 7 septembre 2008 à 18:52:04 | Re : Recherche dans un ValueListEditor

cantador

Membre Club
bonsoir,
connais pas le TValueListEditor..??

Mais si c'est une liste, c'est normal que ça ne fonctionne pas..
il faudrait tester l'ensemble des valeurs possibles du TValueListEditor.

cantador
lundi 8 septembre 2008 à 09:35:53 | Re : Recherche dans un ValueListEditor

f0xi

Membre Club Administrateur CodeS-SourceS
Réponse acceptée !

Uses StrUtils;

function FindValue(const Value: String; VLE: TValueListEditor; const Start: integer=0): integer;
var N, SP : integer;
begin
  result := -1;
  if Start >= VLE.Strings.Count then
    SP := 0
  else
    SP := Start;

  for N := Start to VLE.Strings.Count-1 do
  begin
    if PosEx(Value, VLE.Strings[N], Pos('=', VLE.Strings[N])) <> 0 then
    begin
      result := N;
      Break;
    end;
  end;
end;

function FindKey(const Key: string; VLE: TValueListEditor): integer;
begin
  if not VLE.FindRow(Key, Result) then
    result := -1;
end;




Cette discussion est classé dans : recherche, présent, tedit, terme, valuelisteditor

Répondre à ce message

Sujets en rapport avec ce message

Recherche terme [ par xt3 ] Bonjour à tous, Je souhaite en stage dans une boite de développement informatique et mon maitre de stage me demande d'écrire un programme qui permet Recherche d'entier dans un TEdit [ par hysteria74 ] Bonjour,je besoin d'un ptit conseil car j'ai créé un ptit programme qui va me permettre notamment de saisir des entiers dans un TEdit et j'aurais voul Valider et curseur! [ par darky93 ] Bonjour Voilà j’ai des TEdits et je voudrais lorsqu’ on presse Entrée et qu’on se trouve dans certain de ces TEdit que cela face la même action qu’un Position du Curseur dans un TEdit [ par tichau4 ] Bonjour, Est-il possible de connaitre la position du curseur dans un composant TEdit, et de la changer, si non existe t-il un composant capable de fa Déterminer le Form appelant [ par draft61 ] Bonjour,je dois créer un prog dans lequel il y a un Form Recherche, permmettant de rechercher des Utilisateurs, Fournisseurs, Equipements...Il existe Recherche de doublons dans une table [ par DGPat ] Bonjour,Avant la fonction Post dans une table Paradox je voudrais vérifier si cet enregistrement n'existe pas dans la table (saisir deux fois une fact Moteur de recherche sur CD [ par stefaneb ] Bjr,j'aimerais faire un moteur de recherche type windows pour rechercher un mot dans un dossier et donc des fichiers .rtf sur CD. Est-ce possible?Je n focus sur fiche [ par bouziri ] je veux créer une fiche (boite de dialogue) qui recherche un mot dans un Dbgrid d'une autre fiche tel que la fonction de recherche dans Microsoft Word recherche dans un RxMemory [ par bouziri ] j'ai une boite de dialogue qui recherche un mot dans une plusieurs colonnes du DBgrid d'une autre fiche. Le dbgrid est basé sur un rxMemory (dataset) Envoyer le contenu d'un TEdit dans un TStringGrid [ par saravana ] slt a tous je suis nouveau en delphi et jai un ptit problèm je cherche le code pour que le contenu dun edit soit envoyé dans un tstringgrid sachant qu


Nos sponsors

Sondage...

CalendriCode

Novembre 2008
LMMJVSD
     12
3456789
10111213141516
17181920212223
24252627282930

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,234 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.