OnClickRésolu/Fermé

Question

Bsr,

procedure TForm1.Button2Click(Sender: TObject);


begin
instance1:=timage.Create(self) ;
instance1.Parent:=form1 ;
instance1.Picture.LoadFromFile  ('c:\bv.bmp');
instance1.Name:= 'bmpx' ;
instance1.Visible :=true;
instance1.Height := 6;
instance1.Width :=  6;
instance1.left:= 732;
instance1.Top := 33;
instance1.ShowHint :=true;
instance1.Hint :='My City';


// ici je veux placer l'évenement instance1.onClick... par exemple
//   showmessage('slt toto');
//   et quand je click sur l'image je déclanche la procédure merci
end;

Francky23012301 · Accepted Answer

Bon ... on va arreter de se foutre de la gueule des gens heins .

On fait une recherche préalable avant de poster une question  (Seconde fois que je te fais une remarque )

OnClick

1 réponse

Discussions similaires