smoketest/data/Basic/Standard/Events.xml

   1 <?xml version="1.0" encoding="UTF-8"?>
   2 <!--
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  -->
  19 <!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
  20 <script:module xmlns:script="http://openoffice.org/2000/script" script:name="Events" script:language="StarBasic">REM  *****  BASIC  *****
  21
  22 Global s_CloseListenerCalled As Boolean
  23
  24 Sub PressCancel
  25     gDlgState = cDlgCancel
  26 end Sub
  27
  28 Sub PressOk
  29     gDlgState = cDlgOk
  30 end Sub
  31
  32 Sub PressTest
  33     gOptionsDialog.EndExecute()
  34     gDlgState = cDlgStartTest
  35 end Sub
  36
  37 Sub closeListener_queryClosing
  38   &apos; not interested in
  39   closeListener_queryClosing = TRUE
  40 End Sub
  41
  42 Sub closeListener_notifyClosing
  43   s_CloseListenerCalled = TRUE
  44 End Sub
  45
  46 Sub closeListener_disposing
  47   &apos; not interested in
  48 End Sub
  49
  50 Sub ResetCloseListenerFlag
  51   s_CloseListenerCalled = FALSE
  52 End Sub
  53
  54 Function HasCloseListenerBeenCalled As Boolean
  55   HasCloseListenerBeenCalled = s_CloseListenerCalled
  56 End Function
  57 </script:module>