چرا نمیشه یه همچین interface رو طراحی کرد؟

[مهدی فهمیده غلامی]

کد زیر را در نظر بگیرید:

  Isum = interface

    ['{66C1649F-9281-4B5A-A558-734A40971403}']

         function Add :pointer;virtual;

  end;

و بعد کلاس هایی که هر کدوم پیاده سازی خاص Isum را انجام می دن:

این :

  SumClass1=class(TInterfacedObject,Isum)

         function Add(x,y:integer):integer;overload;

و این:
[/code]
SumClass2=class(TInterfacedObject,Isum)
function Add(x,y:real):real;overload;
[/code]
مشکل اینجاست که همچین تعریفی در دلفی مجاز نیست و من حتما یه چنین پیاده سازی رو می خوام.
در ضمن در خود interface Isum از وجود کلمه virtual خطا میگیره.
چه باید کرد؟