unit findref_cursor;

interface

uses findref_declaration;

type
  TAliasInt = TMyInt;

var
  VIPNumber: TMyInt;

implementation

end.