impossible de déclencher un événement pour le composant créé dynamiquement

Question

J'ai créé un composant dynamique TClientDataSet et essayé de déclencher l'événement OnCalcFields .... cela n'a pas fonctionné. Le code ressemble à ceci ...

table := TClientDataset.Create(Application); 
    table.OnCalcFields := tableCalcFields; //where 'tablecalcfields' is the method defined by me. 
    table.FieldDefs := Query1.FieldDefs; 
    table.CreateDataSet; 
    table.Open; 
    Query1.First; 
    while not Query1.Eof do 
    begin 
    table.Append; 
    for I := 0 to Query1.FieldList.Count - 1 do 
    begin 
     table.FieldValues[table.FieldList[i].DisplayName] := 
        Query1.FieldValues[Query1.FieldList[i].DisplayName]; 
    end; 
    Query1.next; 
    table.Post; 
    end; 
    DataSource2.DataSet := table; 
    table.First; 

après cela, je modifier les informations sur le DBGrid (datasource2 est setted à elle), à ​​ce moment l'événement doit tirer (si vous disposez d'un composant de temps de conception, il sera)

Merci pour les réponses, Vijay

Answer 1

Le code n'a pas de champs calculés.