RosettaCodeData/Task/Send-an-unknown-method-call/PascalABC.NET/send-an-unknown-method-call.pas
2024-07-13 15:19:22 -07:00

10 lines
187 B
ObjectPascal

type MyClass = class
public
procedure Hello := Write('Hello');
end;
begin
var obj := new MyClass;
var mi := typeof(MyClass).GetMethod('Hello');
mi.Invoke(obj,new object[0])
end.