Discussion :

[saidus]

Bonjour !!
je voulais vous demander si c'est possible de creeer un Boutton dynamiqement en lui assignant l'evenement OnClick :
voici ce que j'ai fait
Priviet vsem !!!

Mne Xotchetsa Cozdat Prostaya Knopka Dinamitcheski i
ee pisat Obrabotchik Cobitii OnClick no ne znayu esli etogo mojno delat :
vot i moy kod

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
TForm1 *Form1;
void TForm1::ecrire()
{Edit1->Text == "Saidus";}
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
        TButton *b;
        b         = new TButton(this);
        b->Parent = this;
        b->Left   = 272;
        b->Top    = 72;
        b->Caption= "Saidus"; 
//        b->Click();
        b->OnClick = ecrire(); // ecrire() est une fonction ... (voir debut du code)
}

mais ca ne marche pas
merci d'avance ..

[Sunchaser]

Bonjour,

C'est un problème de prototype de fonction, en autres.
Ta fonction Ecrire() doit avoir le même prototype que celui attendu par OnClick(), c'est a dire:

Code :

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

1
2
 
Ecrire(TObject *Sender);

au minimum ...

Ensuite je te conseillerais de déclarer ta fonction dans le .H de la TForm, cela doit être ainsi un membre de la TForm.
Fais une recherche sur le forum sur ce genre de sujet, et aussi dans la FAQ car ce sujet a déja été abordé.

Dernier point ( pas sur mais bon ), je ne sais pas si il est bon de créer ton object dans le constructeur de la TForm ...

Je n'ai pas Builder sous la main (c'est rare chez moi), donc je ne peut poster du code, désolé.

Bon courage,
@ +