[Michae1]

Здравствуйте, я новичок в Delphi, поэтому прошу особо не пинать за вопрос.
Каким образом в классе или в методе класса можно рарешить вызов этого метода в неквалифицированной форме?
Т.е. например, имеется код COM-класса:

Код:

unit Test01;
{$WARN SYMBOL_PLATFORM OFF}
interface
uses
  Windows, ActiveX, Classes, ComObj, Tst01_TLB, StdVcl;
type
  TTest01 = class(TTypedComObject, ITest01)
  published
    function Method1: SYSINT; stdcall;
  end;
implementation
uses ComServ, Dialogs;
function TTest01.Method1: SYSINT; export;
begin
  ShowMessage('OK');
  Result:=0;
end;
initialization
  TTypedComObjectFactory.Create(ComServer, TTest01, Class_Test01,
    ciMultiInstance, tmApartment);
end.

Когда этот все компилируется в DLL, и затем вызывается из других программ то вызов типа TTest01.Method1 работает прекрасно, а мне очень нужно чтобы вызывалось просто Method1 без указания объекта.