Source position: uPSRuntime.pas line 856
public procedure TPSStack.SetClass(
ItemNo: LongInt;
const Data: TObject
);