2016-08-02 6 views
0

J'ai essayé de compiler FMXTee.Chart.Grid.pas de fichiers de TeeChart 9 pour XE10 qui a utilisé la fonction CellControlByRow dans FMX.Grid.pas pour le code suivant:fonction FMX.Grid.TColumn.CellControlByRow

avec TColumnAccess (Colonnes [Col]). CellControlByRow (Row) .BoundsRect.BottomRight ne commence ... end;

Je me fonctionne bien lorsque vous utilisez RAD XE10 Seattle, et maintenant j'ai essayé avec RAD XE10.1 Berlin, mais obtenir un message d'erreur: [Erreur dcc32] FMXTee.Chart.Grid.pas (1507): E2003 identificateur undeclared: « CellControlByRow »

Je compare FMX.Grid.pas de fichiers de paquets XE10 par rapport FMX.Grid.pas de forfaits XE10.1, et il y a beaucoup de différences en particulier la fonction CellControlByRow() n'existe plus FMX.Grid.pas à partir de XE10.1.

Maintenant, je veux savoir comment changer le code qui utilise la fonction CellControlByRow afin qu'il s'exécute dans RAD XE10.1 Berlin?

Répondre

0

Je voudrais vous suggère de remplacer le code ci-dessous:

result:=TColumnAccess(Columns[Col]).CellControlByRow(Row).BoundsRect.BottomRight; 

Pour la prochaine:

... 
    var tmp : TFmxObject; 
    begin 
    tmp:=TColumnAccess(Columns[Col]).CellControl; 
    result:=TControl(tmp).BoundsRect.BottomRight 
... 

Le code ci-dessus devrait résoudre le problème de compilation que vous rencontrez. Pourriez-vous confirmer cela?

+0

Merci Sandra pour votre suggestion, ceci avec succès. Je change le code de: ** avec {$ IFDEF D17} TColumnAccess {$ ENDIF} (Colonnes [Col]) CellControlByRow (Row) .BoundsRect.BottomRight faire ** à: ** avec {$ IFDEF D17} TControl { $ ENDIF} (tfmxobj) .BoundsRect.BottomRight faire ** –

+0

Désolé ** Sandra **, évidemment j'ai trouvé la prochaine erreur: ** [Erreur dccosx] FMXTee.Import.pas (894): E2003 Identificateur non déclaré: 'Grid' * * dans la syntaxe suivante: {$ IFDEF FMX} (ACordon est TImageControl) ou ((ACordon est TColumn) et (TColumnAccess (ACordon) .grid <> nil) et (TColumnAccess (ACordon) .grid est TStringGrid)) ou (AComponent est TTextControl) {$ ELSE} ...... Cette erreur autour de la classe ** TColumnAccess ** comme erreur avant trouvé dans fi le ** FMXTee.Chart.Grid.pas **. Comment corriger cette erreur? Merci beaucoup. –