Discussion :

[Picolo18]

Salut salut, je voudrais une petite précision concernant les classes génériques en Delphi. Je voudrais savoir s'il était possible de définir une classe qui hériterait d'une classe générique ayant en paramètre la classe que je suis en train de définir. En d'autres termes, faire une sorte de

Code :

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

1
2
 
Myclass = class(MyClassGeneric<MyClass>)

Merci, a toute !

[Picolo18]

Salut, salut.
Voila j'ai un autre soucis.
Tout d'abord, le code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
type
TGenericClass<T : class> = class
public
class function CreateInstance() : T; virtual; abstract;
class procedure Kill(); virtual;
end;
 
TMyClass = class(TGenericClass<TMyClass>)
public
class function CreateInstance() : TMyClass; override;
procedure Test();
end;
 
///////////////////////////////////
Main.pas
/////////////////////////////////
procedure main();
var
 Test1 : TMyClass;
begin
 
  Test1:= TMyClass.CreateInstance(); //Ici ca marche
  Test1.Kill(); //Ici erreur interne à la compilation
end

Alors voila, ma question c'est peut-on appeler une méthode d'une classe générique mère ?
Thx.

[sjrd]

Et si tu écris :

Code :

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

TMyClass.Kill;

au lieu de

Code :

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

Test.Kill;

Ca fait aussi une erreur interne ?

[Picolo18]

Salut, ouais

Code :

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

DCC Erreur fatale F2084 Erreur interne : AV21B2E436-R0000000C-0

[Picolo18]

Salut salut, bon j'ai résolu le problème en appelant la classe mère directement.

Code :

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

1
2
 
TGenericClass<TMyClass>.Kill;

Mais maintenant j'ai un autre soucis qui n'a pas de rapport avec le sujet, mais pour éviter de recréer un post, je demande ici.

En gros, j'ai réalisé un bind d'une lib C vers Delphi. Toutes les fonctions sont exécutés sans trop de soucis, seulement, je viens de remarquer que les string que je passe en paramètre ne sont pas correctement passés à la DLL.
Exemple

Code :

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

1
2
3
4
5
6
7
8
 
//DLL
void display(const char* mystring);
//Delphi
procedure display(mystring : string); cdecl; external 'mydll.dll' name 'display'
 
//Appel
display('Ahahaha')

Ici seulement le premier A est passé à la dll. Alors je voulais savoir si le problème se résout en recompilant la dll avec le compilateur de borland ou si je peux le résoudre dans mon appli ? (ouais pas trop envie de recompiler des libs...)

Thx.

[sjrd]

char * en C c'est PAnsiChar en Delphi, pas string !