JVCL - JvTFDays

Version imprimable

23/09/2008, 15h00
salut07

JVCL - JvTFDays

Bonjour,

Je suis sur BCB 6.
Je veux utiliser la JVCL (JvTFDays1) mais je ne comprends pas tout.
Qui peut me donner un exemple de code pour utiliser le composant JvTFDays en BCB.

Je sais qu'il y un exemple fourni avec la JVCL mais c'est tout en Delphi.

Merci d'avance
:)

Pour info j'ai essaye de commencer mais ca donne rien sur le JvTFDays :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  TJvTFAppt * Appt;
  bool NewAppt;
 
  JvTFScheduleManager1->RequestAppt("0", Appt, NewAppt);
  if (NewAppt)
  {
    Appt->SetStartEnd(EncodeDate(2008, 9, 23),
                       EncodeTime(8, 30, 0, 0),
                       EncodeDate(2008, 9, 23),
                       EncodeTime(12, 30, 0, 0));
    Appt->Description = "NLDelphi";
    Appt->AlarmEnabled = True;
    Appt->AlarmAdvance = 10;
    Appt->AddSchedule("Dees");
    Appt->Post();
  }
  JvTFScheduleManager1->RefreshAppts();
  JvTFDays1->Refresh();
}

25/09/2008, 10h40
salut07

Bonjour,

Personne ne m'a laisse de reponse alors autre question.
Je comprend le code delphi mais la ou je bloque c'est au niveau de la traduction en builder.
exemple delphi :

Citation:

If Assigned(JvTFDays1.SelAppt) Then
Begin
ApptEdit.Appt := JvTFDays1.SelAppt;
ApptEdit.ShowModal;
End

J'ai essaye de mettre ca sous Builder

Citation:

Form1->JvTFDays1->SelAppt->Assign()

Mais il me demande un TPersistent *source dans les parentheses.
Que dois je mettre ?

Merci
:)
25/09/2008, 11h02
pottiez
A mon avis le Assigned de Delphi correspond à un test pour savoir si la propriété contient bien quelques choses, ce que confirmerais la ligne du dessous ou l'on met cette valeur dans la propriété Appt, je la traduirait donc plutôt par
Code:

1 2 3 4 5 if(Form1->JvTFDays1->SelAppt != NULL) { ApptEdit->Appt = JvTFDays1->SelAppt; ApptEdit->ShowModal(); }
Mais je ne sais pas ce qu'est ApptEdit ni la propriété Appt, donc il y a surement des erreurs
25/09/2008, 13h00
salut07

merci pottiez

ca m'a l'air bien, autre point sur delphi la declaration est

Citation:

public
{ Public declarations }
// the main form will set this var to the selected appt if the user
// wants to edit the appt OR the main form will set this var to nil
// if the user wants to add a new appointment.
Appt : TJvTFAppt;
end;

et en builder ca donne quoi ?
J'ai essaye ca mais ca ne marche pas:

Citation:

public: // Déclarations de l'utilisateur
TJvTFAppt *Appt;

Erreur 23203 : Nom de type attendu

merci, ca avance petit a petit
:)
25/09/2008, 14h15
pottiez

L'erreur nom de type attendu signifie qu'il ne connait pas le type TJvTFAppt, il doit surement manquer un include ou alors le type est mal orthographié ;)