Как перегрузить функцию на основе типа результата?

То, что вы публикуете, не имеет смысла. Первый пример должен скомпилироваться без проблем, так как функции имеют разные имена, Funct1 и Funct2.

Проблемы возникают только тогда, когда методы (или функции) имеют одно и то же имя. Тогда, как правило, подойдет директива overload, но overload не может различать функции только по возвращаемому значению.

Итак, если предположить, что имена одинаковы, то, что вы хотите, невозможно. Невозможно перегрузить эти функции, если у них нет другой сигнатуры параметра. Вы можете просто дать им разные имена, что в любом случае предпочтительнее, так как они явно выполняют разные функции.

_{FWIW, ваш вопрос ошибочен из-за того, что вы, по-видимому, не опубликовали точный код, с которым у вас действительно возникли проблемы. Пожалуйста, всегда публикуйте точный код, который вызывает ваши проблемы, и если есть сообщения об ошибках, всегда публикуйте точное сообщение об ошибке (их обычно можно скопировать с помощью обычных нажатий клавиш копирования, например Ctrl+C, даже в большинстве частей IDE или в диалоговые окна сообщений в Delphi). Если в сообщении об ошибке есть какие-либо номера строк, укажите это в исходном коде, который вы публикуете, поскольку у нас не всегда такие же номера строк, как у вас.}

Вы можете превратить функцию в процедуру, принимающую параметр var:

myclass = class
public
  procedure Funct1(var AResult: String); overload;
  procedure Funct1(var AResult: Integer); overload;
end;

Во-первых, чтобы функции можно было перегружать, они должны называться одинаково.

Во-вторых, это невозможно сделать. Перегруженные функции должны иметь другие параметры.

В вашем случае компилятор никак не может определить, какую из ваших функций вызывать (предполагается, что обе они переименованы в Funct1):

var
  v: Variant;
  mc: myclass;
begin
  v := mc.Funct1;
end;

если вы хотите перегрузить методы с разными типами возвращаемого значения, просто добавьте фиктивный параметр со значением по умолчанию, чтобы разрешить выполнение перегрузки, но не забывайте, что тип параметра должен быть другим, чтобы работала логика перегрузки, например:

type    
    myclass = class
    public
      function Funct1(dummy: string = EmptyStr): String; overload;
      function Funct1(dummy: Integer = -1): Integer; overload;
    end;

использовать это так

procedure tester;
var yourobject : myclass;
  iValue: integer;
  sValue: string;
begin
  yourobject:= myclass.create;
  iValue:= yourobject.Funct1(); //this will call the func with integer result
  sValue:= yourobject.Funct1(); //this will call the func with string result
end;

также не забывайте, что таким образом у вас возникнут проблемы с вариантами, как в этом примере:

procedure tester;
var yourobject : myclass;
  vValue: variant;
begin
  yourobject:= myclass.create;
  vValue:= yourobject.Funct1(); 
end;

пока вы не реализуете вариантную функцию:

      function Funct1(dummy: Variant = Unassigned): Variant; overload;

Как уже было сказано, вы не можете сделать это так, как хотите. Однако вы могли бы так же легко реализовать каждую функцию с другим именем, например «AsInteger» или «AsString». Ваш код будет более четким, и это обычно делается в VCL.

TmyClass = class (TObject)
public
  function AsString : string;
  function AsInteger : Integer;
end;