Discussion :

[ero-sennin]

Bonsoir,

J'ai vu sur ce site, qu'un sondage avait était fait pour élire les meilleurs composants qu'ils soient gratuits ou payants! Ayant vu que les composants TMS étaient 1er, je suis allé sur leur site! J'y ai découvert les composants (vraiment très beau).

Je viens à mon "problème". On peut télécharger sur leur site, quelques composants (assez banal) et je me suis arrêté sur le TPlannerCalendar.
Cliquer ici pour accéder à la page.

Je voudrais faire comme sur leur site, prédéfinir en "gras" certaines dates, et pour cela, ils nous montrent un bout de code en delphi ... seul problème, c'est que je ne sais pas comment l'adapter pour C++.
Voici le code :

Code :

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

1
2
3
4
5
6
7
8
9
This code snippet shows how to programmatically adding events to the calendar or datepicker:
 
  with plannercalendar1.Events.Add do
  begin
    date  := EncodeDate(2005,2,14);
    hint  := 'Valentine';
    shape := evsCircle;
    color := clRed;
  end;

Si vous pouvez m'aider sur ce composant.
Merci

[Sunchaser]

Bonsoir,
Il est beau ce composant...mais 'Buy now', ça doit vouloir dire pas gratuit, non ? Moi qui voulait le charger pour l'essayer

[ero-sennin]

Tu n'as pas réussi à le télécharger?
Si tu veux le télécharger, il faut cliquer sur les disquettes
Moi j'ai réussi à le télécharger. Tiens moi au courant !

[pottiez]

Pour ma part j'ai réussi

[ero-sennin]

Tu as trouvé comment faire Pottiez?

Ca ressemble à la structure que j'ai donné en début de post?
Pour ma part, j'y suis arrivé mais pas de la même façon. Et je n'arrive pas à afficher le Hint pour chaque Date.

Je voudrais bien voir ton code stp
Merci

[nonda69]

Salut,

essaye ce bout de code :

Code :

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

1
2
3
4
5
6
7
8
9
10
void __fastcall TForm1::FormShow(TObject *Sender)
{
    TSelDateItem *pSDI = PlannerCalendar1->Events->Add();
 
    pSDI->Date = StrToDate("19/07/2006");
    pSDI->FontColor = clYellow;
    pSDI->Color = clRed;
    pSDI->Hint = "Mon Anniversaire";
    pSDI->Shape = evsCircle;
}

[ero-sennin]

Merci nonda69,

Ce code est fonctionnel sauf que toujours pour les Hints, lorsque je laisse la souris sur la date concerné, je n'ai rien qui apparait

Chez toi cela fonctionne-t-il?

[nonda69]

Salut,

il faut que tu mettes à true la propriété "EventHints" du composant.

[ero-sennin]

Re,

je l'avais déjà faite cette manipulation mais je n'obtiens rien! Est-ce chez moi qu'il y a un problème?

Pour info, j'ai fais cela :

Code :

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

1
2
3
4
5
6
7
8
9
10
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    TSelDateItem *pSDI = PlannerCalendar1->Events->Add();
    PlannerCalendar1->EventHints=true;
    pSDI->Date = StrToDate("19/07/2006");
    pSDI->FontColor = clYellow;
    pSDI->Color = clRed;
    pSDI->Hint = "Mon Anniversaire";
    pSDI->Shape = evsCircle;
}

Voilà
Merci

[nonda69]

Re,

ajoute cette ligne c'est peut-etre cela qu'il te manque :

Code :

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

PlannerCalendar1->ShowHint = true;

[pottiez]

Oui c'est cela, mais tu peut simplement la mettre a true dans l'inspecteur d'objet plutot que de le faire par code, si tu prefert

[ero-sennin]

Merci,

Cela fonctionne, je n'ai pas pensé à ce Hint là lol.

Mais comme j'aime bien comprendre ce que je fais et savoir le pourquoi du comment, j'aimerai que vous m'aidiez sur le bout de code ci- dessous :

Code :

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

1
2
3
4
5
6
7
8
9
10
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    PlannerCalendar1->ShowHint = true;
    PlannerCalendar1->EventHints=true;
    PlannerCalendar1->Events->Add()->Date = StrToDate("19/07/2006");
    PlannerCalendar1->Events->Add()->FontColor = clYellow;
    PlannerCalendar1->Events->Add()->Color = clRed;
    PlannerCalendar1->Events->Add()->Hint = "Mon Anniversaire";
    PlannerCalendar1->Events->Add()->Shape = evsCircle;
}

Ce code ne fonctionne pas mais le code ci dessous fonctionne :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    TSelDateItem *pSDI = PlannerCalendar1->Events->Add();
    PlannerCalendar1->ShowHint=true;
    PlannerCalendar1->EventHints=true;
    pSDI->Date = StrToDate("19/07/2006");
    pSDI->FontColor = clYellow;
    pSDI->Color = clRed;
    pSDI->Hint = "Mon Anniversaire";
    pSDI->Shape = evsCircle;
}

Qu'est ce que TSelDateItem ? Si vous avez une réponse ...
Sinon tout est nickel, merci

[pottiez]

Le TSelDateItem est une structure qui permet d'enregistrer les données d'un evenement, tu créé ta structure de type TSelDateItem, et il ne reste plus qu'a l'ajouter au PlannerCalendar, si jamais tu voulais ajouter le même evenement sur un autre composant, tu n'est pas obligé de recréé un TSelDateItem, tu reprend le même qui contient les infos que tu souhaite

[ero-sennin]

Merci de ta réponse Pottiez

Comme je l'avais déjà dis, tout est fonctionne! Pas mal ce PlannerCalendar

[dvsoft]

Effectivement les composants TMS sont très bien. Je les utilise depuis très longtemps sous builder et delphi.

Ils ne sont pas très chères au vue de ce qu’ils peuvent permettre de faire, attention quand même, c’est mieux de prendre la version avec les sources, car il y a souvent des bug, et de fréquentes mise à jour.

Je développe actuellement une application qui utilise certains des composants de TMS
Une petite image :http://dvsoft.developpez.com/Articles/TMS.PNG

Bon courage
Alain

[ero-sennin]

Ca fait vraiment professionnel

J'ai encore du boulot pour arriver à ce stade!
Interface claire et de plus elle est très jolie.

Vite, faut que j'y retourne lol