Discussion :

[franck SEFIC]

salut a tous,

je souhaite gérer par code les options d'un DBGrid. j'ai fait ce code, mais ça marche pas.

DBGrid1.Options[dgEditing,dgTitles,dgIndicator,dgColumnResize,dgColLines,dgRowLines,dgTabs,dgConfirmDelete,dgCancelOnExit]:=true;

Comment faire? quelqu'un a une idée?

Merci d'avance

[PadawanDuDelphi]

Salut,

Comme ceci, par exemple:

Code :

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

 DBGrid1.Options := DBGrid1.Options+[dgEditing];

+ Pour ajouter des options, - pour les enlever.

A+.

[anapurna]

salut

autres solution

Code :

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

1
2
3
4
5
6
const
 GO_EDIT   = [dgEditing,dgTitles,dgIndicator,dgColLines,dgRowLines,dgTabs,dgConfirmDelete,dgCancelOnExit];
GO_BROWSE   = [dgTitles,dgColLines,dgRowLines,dgTabs,dgConfirmDelete,dgCancelOnExit,dgrowselect];
 
...
   dbgrid.Options    := GO_EDIT;

@+ Phil

[franck SEFIC]

Merci pour la promptitude.
J'ai essayé

DBGrid1.Options := DBGrid1.Options+[dgEditing];

marche tres fort.

[franck SEFIC]

Donc toutes les options qui se trouvent dans le crohet [] ont la valeur TRUE? si je comprends bien.

[anapurna]

salut

effectivement toutes les options entre crochet sont activé

@+Phil

[franck SEFIC]

Dit moi anapurna, comment déclare- tu les constanteS GO_EDIT et GO_BROWSE?

[Fabrice ROUXEL 1]

Ce n'est pas indispensable mais tu peux ajouter:

Code :

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

GO_EDIT:TDBGridOptions  = [dgEditing,dgTitles,dgIndicator,dgColLines,dgRowLines,dgTabs,dgConfirmDelete,dgCancelOnExit];

Donc toutes les options qui se trouvent dans le crohet [] ont la valeur TRUE? si je comprends bien.

Précision:
Les crochet n'ont strictement rien à voir avec les tableaux, ils définissent la syntaxe d'affection de valeurs à un type ensemble.
Voir "Set of" et "ensemble" dans l'aide Delphi.

[franck SEFIC]

genial.

A bientot

[anapurna]

salut

Dit moi anapurna, comment déclare- tu les constanteS GO_EDIT et GO_BROWSE?

comme je les ai ecrite
c'est a dire en constante
pour bien faire tu peut meme le mettre dans une unité global a tout ton projet afin de ne le declarer qu'une fois et t'en servir pour tout les dbgrid de ton projet


@+ Phil

[franck SEFIC]

Oui, c'est ce que j'ai fait finalement et ça marche bien.

Mais j'ai encore un autre souci: comment mettre a false l'une des options? Par exemple quand j'execute le GO_BROWSE , le GO_EDIT ne marche plus car dès que dgrowselect:=true impossible de mettre dgEditing a true, il faut d'abord mettre dgrowselect a false.
Comment faire? par code bien sur.

merci pour vos reponse

[Fabrice ROUXEL 1]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
const
  GO_BROWSE = [dgTitles,dgColLines,dgRowLines,dgTabs,dgConfirmDelete,dgCancelOnExit,dgrowselect];
var
  CurrentOptions: TDBGridOptions;
begin
  CurrentOptions := GO_BROWSE - [dgrowselect];
  DbGrid1.Options := CurrentOptions;
 
 .....
end;