pascalabcnet/TestSamples/FormatterTests/input/inherited_protected.pas
Бондарев Иван e6e67c193c initial commit
2015-05-14 21:35:07 +02:00

21 lines
432 B
ObjectPascal

#reference 'System.Windows.Forms.dll'
uses System.Windows.Forms,System.Reflection;
//NetHelper.cs
type
TMainForm = class(Form)
procedure CenterToScreen;
begin
inherited CenterToScreen;
end;
end;
var mi:array of MemberInfo;
i:=0;
bf:BindingFlags;
begin
bf:=BindingFlags.NonPublic;
mi:=typeof(Form).GetMembers(BindingFlags.NonPublic);
for i:=0 to mi.length-1 do
writeln(mi[i]);
readln
end.