[Asphyre] Propriété de type tableau non supportée

Version imprimable

02/03/2006, 19h06
gandf

[Asphyre] Propriété de type tableau non supportée
Bonjour,
j'essaie d'installer les composants de asphyre dans BCB6 mais j'ai un bug que je n'arrive pas à régler.
Il y a une propriété qui pose problème :
Je met le début du fichier :
Code:

1 2 3 4 5 6 7 type TAsphyreMatrix = class private FRawMtx: TMatrix4; public property RawMtx: TMatrix4 read FRawMtx write FRawMtx;
TMatrix4 étant un :

Code:

TMatrix4 = array[0..3, 0..3] of Single;

hors, j'obtiens le code d'erreur suivant :

Citation:

[Pascal Erreur] AsphyreMatrix.pas(303): Fonctionnalité de langage non supportée : 'propriété de type tableau'

Comment faire? Il y a un autre type proche de celui la pour mettre en property ou faut-il le mettre autrement qu'en property?

Merci
07/03/2006, 18h22
totoche76

Hello

Peut-être passer outre les définitions de propriétés:
tu redéclares FRawMtx en public, tu vires les property et tu corriges les appels à RawMtx pour en faire des appels à FRawMtx (ou bien tu renommes FRawMtx en RawMtx, comme ça t'arrange)

Après si tu as des propriétés du style property Toto: tableau read GetToto write SetToto; :
vire le property, remets les GetToto/SetToto en public, et renommage des appels à Toto....

Ca fait pas très propre, mais bon....

Bon courage :)
08/03/2006, 16h13
gandf

Merci, cela ne pose pas de problème quand les propriété ne font pas appel à des fonctions mais quand il y a un set ou un get, cela pose problème.

Il n'y a pas une méthode plus propre? et pourquoi en delphi il y a des propriété de type tableau et que c++builder n'arrive pas à les prendre en compte?
08/03/2006, 16h52
totoche76

Hello

Ca fait partie des différences entre le Pascal Objet et le C++... cf l'aide de Builder: "Gestion de la VCL en langage C++" / "Types sans correspondants".....

Dans les parties de code en Pascal, si la propriété Toto est référencée et passée en paramètre à une fonction sous forme de référence (mot clé var), alors oui, il rique d'y avoir un problème. Si elle est passée par valeur, remplace Toto par GetToto dans l'appel...

Citation:

Merci, cela ne pose pas de problème quand les propriété ne font pas appel à des fonctions mais quand il y a un set ou un get, cela pose problème.

Quel problème ???

Comme je le disais, si :

Code:

1
2
3
4
5
6
7
type 
 TAsphyreMatrix = class 
 private 
  FRawMtx: TMatrix4; 
 
 public 
  property RawMtx: TMatrix4 read FRawMtx write FRawMtx;

Devient :

Code:

1
2
public 
  RawMtx: TMatrix4;

Cela fonctionne mais certaines propriété font appel à des fonctions. Donc, j'essaie sur ce fichier simple pour voir si votre astuce fonctionne et :

Code:

1
2
3
4
5
6
7
 private
  FRawMtx: TMatrix4;
 
  function GetRawMtx(): TMatrix4;
  procedure SetRawMtx(const Value: TMatrix4);
 public
  property RawMtx: TMatrix4 read GetRawMtx write SetRawMtx;

Code:

1
2
3
4
5
6
7
8
9
10
11
//--------------------------------------------------------------------------
function TAsphyreMatrix.GetRawMtx(): TMatrix4;
begin
 Result:= FRawMtx;
end;
 
//--------------------------------------------------------------------------
procedure TAsphyreMatrix.SetRawMtx(const Value: TMatrix4);
begin
 FRawMtx:= Value;
end;

BCB m'indique toujours que les propriétés de type tableau ne sont pas supportées.

Hello

Cherche dans le code les appels à la propriété .RawMtx, et remplaces les par des appels à .GetRawMtx (supprime le property RawMtx)

Exemple, si tu as (comme ça, au pif :roll:)
Code:

1 2 3 4 property ViewMtx: TMatrix4 read GetViewMtx write SetViewMtx; property ProjMtx: TMatrix4 read GetProjMtx write SetProjMtx; ... SetTransform(Camera.ViewMtx, Camera.ProjMtx);
Ca devient
Code:

1 2 3 4 //property ViewMtx: TMatrix4 read GetViewMtx write SetViewMtx; //property ProjMtx: TMatrix4 read GetProjMtx write SetProjMtx; ... SetTransform(Camera.GetViewMtx, Camera.GetProjMtx);
Bonne continuation