Afficher/masquer une image en Delphi 7

Version imprimable

14/03/2009, 23h46
sic_88

Afficher/masquer une image en Delphi 7

Bonjour :)

Je débute en Delphi et j'ai besoin d'aide pour un problème tout simple :

Je souhaite n'afficher une image qu'au moment où l'on clic sur un bouton, tout le reste du temps elle ne doit pas être affichée.

J'ai pensé au champ Enabled, j'imagine qu'il faut l'initialiser à false dans la procédure de création de la fiche puis à true au moment du clic sur le boutton en question, mais cela ne marche pas.

Merci d'avance pour votre aide précieuse ! :aie:
15/03/2009, 08h01
evarisnea

:salut: et bienvenue sur le forum

ta logique est la bonne, il faut juste utiliser la propriété Visible en lieu et place de Enabled de ton composant TImage.

Bienvenue !

Bonjour à toutes et à tous,

@ Sic_88, un petit exemple avec un TButton à deux états et son caption = "Affiche" , un TImage avec la propriété visible = false:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
 
var
  Form1: TForm1;
  marche : boolean; //ligne à ajouter
 
implementation
 
{$R *.dfm}
 
procedure TForm1.BafficheClick(Sender: TObject);
begin
if marche then
                      begin
                      baffiche.caption:='Cacher';
                      image1.Visible := true;
                      marche:=false end
              else
                      begin
                      baffiche.caption :='Affiche';
                      image1.Visible := false;
                      marche:=true
end;
 
 
end;
 
procedure TForm1.FormCreate(Sender: TObject);
begin
marche:=true;
end;

@+,

Cincap

15/03/2009, 15h17
sic_88

Merci beaucoup pour vos réponses qui ont résolu mon problème : sa marche.

Visible à la place de Enabled, fallait juste le savoir.

:)