unit u3;

interface

implementation

uses WPFObjects;

procedure f;
begin
  var w := Window;
end;

begin

end.