Discussion :

[Osmali]

Bonsoir je souhaite grâce à un button afficher une table et en cliquant une 2eme fois caché l'image
Merci de m'aider

[ALWEBER]

Tu places les objets que tu veux dans un Tpanel et après tu modifie la propriété visible
Ex.

Code :

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

Panel1.visible := true ou Panel1.visible := false

[SergioMaster]

Bonjour,

Plutôt que d'accrocher cette demande à une vieille discussion au sujet d'une image j'ai préféré ouvrir un nouveau sujet (dans ma grande bonté je vous pardonne pour ne pas avoir créé un nouveau sujet)

afficher une table

je présume que vous savez déjà comment ouvrir une table et certainement l'afficher dans une grille (TDBGrid, TStringGrid, TList) ou tout autre conteneur associé aux données de la table

cacher l'image

tout simplement en mettant la propriété visible du conteneur à False

exemple :

Code :

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

1
2
3
4
5
6
procedure TForm1.Button1Click(sender : TObject);
begin
 DBGrid1.Visible:=not DBGrid1.Visible;
// Table1.Active := DBGrid1.Visible; // si vous utilisez ça vous vous retrouverez toujours positionnée en début de table
// if DBGrid1.Visible then Table1.EnableControls else Table1.DisableControls;  // si vous utilisez ça toutes les informations liées à la table et son datasource seront "bloquées"  
end;

Maintenant, essayez d'être plus précise dans vos demande en spécifiant quelle version de Delphi vous utilisez ainsi que s'il s'agit de VCL ou FMX. ALWEBER vous propose un TPanel (VCL) mais j'aurais pu vous proposer un TLayout (FMX) et enfin montrez nous ce que vous avez déjà pu écrire comme code (ou joindre une image écran de votre forme en mode design)

[Osmali]

Merci bcp sa a très bien fonctionné