tout le monde

J´aimerais savoir un code:
-Qui permet de creer quelque chose en faisant une action ( je m´explique)

Exemple ::::

J´ai mis un Timer - interval : 1000
Evenement produit tout les 1000 milisecondes:
Creer un label ou un boutton toutes les 1000mili

Donc Conclusion :

J´aimerais un code qui peut creer quelque chose apres une action(CLick,Load,...)

AAAAaaaaaa oui ---> Visual Basic<----

Bon Merci D´avance...

Voila euh... euh.. je crois que c est tout l´addition SVP

Bon Merci

C´est absolument incompréhensible :

tu as un timer OK.
tu as des controle OK.

mais après, tu veux qu´il se passe quoi quand quoi ? ( le timer se déclanche, l´utilisateur clique quelque part...) tu n´est pas clair du tout.

Bon, Bon , BON

Exemple :l´utilisateur click sur un boutton ( Command Button) , Ok?
Donc l´action c´est le **CLICK**
Ok?
Alors l´evenement produit :
Creer un autre boutton ( Si c est possible)!!
Rapelle-toi **Action --->Evenement**
Donc quand l´utilisateur click sur le boutton, le programme creer un autre boutton quelque part . ..

Donc Je demande si c´est possible
- Si oui, est-ce que je peux avoir un code *SVP*
- Si non, tanpis

MERCI *******

Bah j´ai déjà fait du visual basic alors je peux peux-être t´aider . ..

Tu n´a qu´a faire un deuxieme bouton et à le rendre visible quand il clique non ?

En Delphi, je sais créer dynamiquement des boutons, des champs de saisie et autres composants visuels. mais je n´ai jamais essayé en VB !

On peux faire ça ? c´eest compliquer ? ( je suis rendu au 6ieme chapître de mon tuto ^^)

C´est tout à fait possible !
Maintenant, étant donné que je n´ai pas touché à Delphi depuis 1 an, je ne me sens pas capable de t´expliquer comment faire !

Qu´est ce que tu fait présentement ?

lord_kalipsy Posté le 24 mai 2004 à 23:34:17
Bah j´ai déjà fait du visual basic alors je peux peux-être t´aider . . .

Tu n´a qu´a faire un deuxieme bouton et à le rendre visible quand il clique non ?

O.K mais moi je veut pas faire des bouttons invisible-visible apres le Click,
moi je demande si c est possible d´en creer un apres le click

Non, tu ne peut pas en créer un après le click.

( En réalité c´est possible mais c´est chiant et ca sert à rien)

Mais si tu crée un bouton dont la propriété visible vaut false et que tu la rend true quand on clique, ca marchera exactement pareil.

Pourquoi est ce que cette solution ne te convient pas ?

SI t´as vraiment une bonne raison, on en reparle.

C´est vrai que pour un bouton, ça n´est pas très utile, mais ça peut l´être pour d´autres composants visuels !

Non,c est pas sepecialement pour un boutton, ca peut etre un label,frame,image...

Non je pose juste cette question...
Si ca existe comme code . ..

?

tu peut déclarer des variable :
dim boutons as VB.CommandButton

puis tu les initialise avec par exemple
set boutons=me.command1

Mais il faut le nom d´un boutons qui existe déjà.
Si tu en fait plusieur, il faut leur mettre des index différent.
Une meilleur méthode est d´utiliser l´API, mais ej te dit pas le bordel ( si ça t´interesse, je ne connais pas par coeur les fonctions ( je ne m´en sers jamais), il faut que je révise).

une autre méthode, est d´émuler en quelque sorte les boutons avec des images ( tu détecte le clique et tu change l´image).

Ca a l´avantage que tu peut les faire se comporter comme tu veux.

Mais bon, il faudrait que tu donne un exemple précis de ce que tu veux faire avec pour que l´on voit la meilleur solution. Ca sers à rien de se casser la tête pour un problème plus que théorique.

anti flood

Salut les Delphinautes.

Voici comment créer des composants à l´exécution - En l´occurence des boutons.
Tu crées juste une appli avec un bouton dessus et dans l´évènement OnClick de celui-ci, tu mets le code suivant:

procedure TForm1.Button1Click(Sender: TObject);
begin
WITH Tbutton.Create(Application) DO
BEGIN
Parent:= Self;
Caption:= ´Mon bouton´;
Top:= ( Sender AS TButton).Top + ( Sender AS TButton).Height+10;
Left:= ( Sender AS TButton).Left + 10;
OnClick:= ( Sender AS TButton).OnClick;
END;
end;

Et voiloù c´est tout.

Merci beaucoup mais,moi j ai besoin du VB(viusal Basic)code

Salut,

Je n´ai pas VB d´installé sur ma bécane mais je suis sur que l´on peut faire la même chose qu´en Delphi. Je vais me renseigner.

Voilou en VB, à toi d´adapter à tes besoins:

Dim MyoptionButton As OptionButton
Set MyoptionButton = Form1.Controls.Add("VB.OptionButton", " OBIndex" & ( index quelconque))
MyoptionButton.Width = 1500
MyoptionButton.Height = 100
MyoptionButton.Top = 10 + X * 250
MyoptionButton.Left = 100
MyoptionButton.Caption = " OBIndex" & ( index)

MyoptionButton.Visible = True
Set MyoptionButton.Container = . ...

Ca devrait te satisfaite. Bonne continuation.