Discussion :

[Aredi]

Bonjour ! J'ai un problème très simple, mais que je n'arrive absolument pas à corriger

Voici ce que je veux faire : Quand j'ouvre mon TDBPlanner, les items qui sont présents ont un champ dans l'OSP du planning, qui permet de différencier le type de l'item. EN fonction de ce type, je veux juste pouvoir colorier différemment le fond de l'item. Malheureusement, quand j'essaie d'utiliser OnPlannerItemDraw, pour changer la couleur en fonction du champ de l'osp, eh bien... mes items disparaissent.

Voici l'extrait de code en question :

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
18
19
20
21
22
23
 
procedure planning.DBP_ReceptionPlannerItemDraw(Sender: TObject;
  PlannerItem: TPlannerItem; Canvas: TCanvas; Rect: TRect; Selected: Boolean);
var
type : string;
 
begin
type := OSP.fieldbyname('type').value;
 
  if type.equals('CF') then
  begin
  PlannerItem.Color := Clred;
 
  end;
 
  if type_cmde.equals('F') then
  begin
  end;
 
  if type_cmde.equals('P') then
  begin
  end;
end;

En faisant ça, dès qu'un item a pour type 'CF' il disparaît.


Il est 1000% sûr que j'utilise mal la fonction, j'ai cherché partout pour la documentation sur cette fonction sur le site de TMS ou dans la doc du composant : il n'y a rien

Merci d'avance pour votre aide !

[ShaiLeTroll]

Est-ce le Composant TMS ?

Code :

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

type : string;

C'est très osé !

Code :

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

if type.equals('CF') then

amusant, je l'aurais écrit if type = 'CF' then...



Il faudrait lire la documentation, comme ce n'est pas on composant standard, j'ignore si il y une propriété comme OwnerDraw ?
Est-ce que la OnPlannerItemDraw considère que l'on remplace tout le dessin automatique par un dessin manuel

TMS, je confonds toujours avec DevExpress, il n'y a pas un mécanisme de Style que l'on peut définir et appliquer selon un filtre ?

Pourquoi ne pas changer la couleur lors de la création du TPlannerItem ?
Utiliser cette astuce Use custom TPlannerItem classes in descendent TPlanner class with this example comme on le ferait avec un TTreeNode, cela permet de stocker les données dans l'objet et inversement appliquer des "effets" lors de la modification des propriétés.
Comme fonctionne le mode DB connecté ? Comment sont créés les TPlannerItem ?

[Aredi]

Hello merci pour ta réponse, j'avais renommé le vrai nom des variables par des trucs plus simples pour rendre la chose plus claire et effectivement.. c'est pire. Désolé.

C'est le composant TMS oui

Rah oui pour le equals je crois que c'est une vieille habitude que j'ai du JAVA ...

C'est aussi la piste que j'ai concernant onplannerItemDraw, j'ai l'impression qu'a partir du moment ou je change une propriété, il s'attends à ce que je donne toutes les infos de dessin de l'item. Ce qui ne m'arrange pas vraiment car je ne sais absolument pas comment ils sont construits par défaut, et que je veux juste changer le background :/

Je n'ai pas vu de système de style pour TMS, mais étant un débutant, je ne peux rien nier ou confirmer :s