IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Langage Delphi Discussion :

Chercher un TEdit par un numéro


Sujet :

Langage Delphi

  1. #1
    Membre à l'essai
    Profil pro
    Inscrit en
    Avril 2008
    Messages
    19
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2008
    Messages : 19
    Points : 15
    Points
    15
    Par défaut Chercher un TEdit par un numéro
    alors après avoir consulter plusieurs site, plusieurs bouquin, et avoir fait 50000 tests je n'ai pas trouvé la solution donc je m'en remet aux grands et génialisisme programmeurs parcourant ce forum.
    Alors voici ma question : comment faire un edit+mavariable+.visible=false; (l'intérêt est que la variable bouge par exemple de 10 à 100 ou de 63 à 100 en fonction du souhait de l'utilisateur et donc de rendre invisible tout les edit après le nombre d'edit qu'il a demandé (donc si il en veut 10 j'en vire 90).

    ex :
    http://www.developpez.net/forums/att...1&d=1208530161
    image.jpg

    devient :
    http://www.developpez.net/forums/att...1&d=1208530161
    image2.jpg

    et évidemment ca peut se faire dans les 2 sens avec un true à la place du false et en faisant le for dans lotre sens (de i vers 1).
    alors g essayé :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    for j:=i to 100 do   //i étant le nombre demandé par l'utilisateur
      tedit('Edit'+inttostr(j)).Visible := false;
    //------------------------------------------------------------------
    edit+j+.visible := false;
    //--------------------------------------------------------------
    var montruc= tedit;
    begin
    //...
    montruc = tedit(edit+inttostr(j));
    montruc.visible :=false;
    Et tout le reste des truc essayé sont encore plus abérant. Si quelqu'un a la solution je lui en serait infiniment reconnaissant. Si vous avez besoin de plus d'info (j'ai essayer de donner tout ceux ke j'ai mais on sait jamais) je suis serais a nouveau sur le forum vers 20h. Merci beaucoup

    PS: désolé si ce n'est pas la qu'il fallait poster mais je suis plus ou moins novice (plutot plus que moins ) en C (je fini ma premiere semaine de stage aujourdui), je ne sais pas trop quel nom porte mon problème...
    Images attachées Images attachées   

  2. #2
    Expert éminent sénior
    Avatar de ShaiLeTroll
    Homme Profil pro
    Développeur C++\Delphi
    Inscrit en
    Juillet 2006
    Messages
    13 534
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Développeur C++\Delphi
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Juillet 2006
    Messages : 13 534
    Points : 25 082
    Points
    25 082
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Cpt := Self.FindComponent('Edit'+inttostr(j));
    if Cpt is TEdit then
      (Cpt as TEdit)Visible := False;
    Sur le forum, tu trouveras beaucoup autour du FindComponent ...

    Tu peux aussi avoir un

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Edits : Array[1..20] of Array[1..2] of TEdit;
    Si l'objet est à nil c'est qu'il n'est pas utilisé ...
    Aide via F1 - FAQ - Guide du développeur Delphi devant un problème - Pensez-y !
    Attention Troll Méchant !
    "Quand un homme a faim, mieux vaut lui apprendre à pêcher que de lui donner un poisson" Confucius
    Mieux vaut se taire et paraître idiot, Que l'ouvrir et de le confirmer !
    L'ignorance n'excuse pas la médiocrité !

    L'expérience, c'est le nom que chacun donne à ses erreurs. (Oscar Wilde)
    Il faut avoir le courage de se tromper et d'apprendre de ses erreurs

  3. #3
    Membre éprouvé
    Avatar de Montor
    Homme Profil pro
    Autre
    Inscrit en
    Avril 2008
    Messages
    879
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Autre

    Informations professionnelles :
    Activité : Autre

    Informations forums :
    Inscription : Avril 2008
    Messages : 879
    Points : 963
    Points
    963
    Par défaut
    Il faut mettre seul les "Tedit" dans un group "Tpanel" il sera leur parent

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Tpanel.name:= panel1;
    (panel1.control[j] as TEdit).Visible := False;

    Tester est ça fonctionne

    Note
    il faut creer le nombre de controls volu et pas les cacher

  4. #4
    Membre à l'essai
    Profil pro
    Inscrit en
    Avril 2008
    Messages
    19
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2008
    Messages : 19
    Points : 15
    Points
    15
    Par défaut
    Merci beaucoup c'est parfait. Décidément je ne m'étais pas trompé sur le génialisisme des gens dici .

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Comment créer plusieurs TEdit par programmation?
    Par rebelor dans le forum Delphi
    Réponses: 2
    Dernier message: 02/06/2007, 17h30
  2. remplacer un TEdit par une TComboBox
    Par freestyler dans le forum Delphi
    Réponses: 4
    Dernier message: 24/10/2006, 16h46
  3. [removeContent(int)] Enlever un fils par son numéro
    Par if_zen dans le forum Format d'échange (XML, JSON...)
    Réponses: 3
    Dernier message: 28/07/2006, 14h18
  4. Réponses: 7
    Dernier message: 09/05/2006, 11h30
  5. création de plusieurs TEdit par programmation
    Par faten7 dans le forum C++Builder
    Réponses: 4
    Dernier message: 15/04/2006, 21h22

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo