ouai, je sais bien ca ... mais c'est les source de delphi ! et je peux pas y toucher ....

a++
stéphane

"Flo" <flouc@laposte.net> wrote in message news:ffv6pp$4o2$1@sd-6498.dedibox.fr...

> loki a écrit :

>> Soit la classe Tstrings :
>>
>> TStrings = class(TPersistent)
>> private
>> function GetValue(const Name: string): string;
>> procedure SetValue(const Name, Value: string);
>> protected
>> public
>> property Values[const Name: string]: string read GetValue write SetValue;
>> end;
>>
>> Je voudrais dans une classe enfant modifier la procedure SetValue .. comment je peux faire cela ? bon je sais c'est pas possible mais bon ...

>
> Salut,
>
> il faut ajouter le mot clé "virtual" après la procedure SetValue pour
> autoriser les surcharges dans la classe parente, le mot "override" doit
> être utilisé sur cette même fonction dans les déclarations des classes
> descendant de TStrings.