在 LibreOffice Writer 中製作一個按鈕，使其在按下後會在滑鼠位置顯示 "Hello 您好"

 在 LibreOffice Writer 中製作一個按鈕，使其在按下後會在滑鼠位置顯示 "Hello 您好"，可以按照以下步驟進行：

1. **建立按鈕**：

   - 開啟 LibreOffice Writer。

   - 在選單列中，選擇 `檢視` > `表單控制項` > `推動按鈕(Button)`，然後在你想要按鈕出現的位置，畫一個按鈕。

2. **編輯按鈕屬性**：

   - 右鍵點擊繪製的按鈕，選擇 "控制項屬性(Control)" > ，以打開 "按鈕屬性(Button Properties)" 對話框。

   - 在 "一般(General)" 選項卡中，你可以設定按鈕的標籤（顯示的文字），例如 "點擊顯示問候"。

3. **新增巨集**：

   - 在 "屬性" 對話框中，切換到 "執行動作" 選項卡，選擇 "指派巨集(Edit Macro)"。

4. **編寫巨集程式碼**：

   - 在巨集編輯器中，你可以編寫按下按鈕後要執行的操作的巨集程式碼。以下是一個示例巨集程式碼，用於在滑鼠位置顯示 "Hello 您好"。

Sub ShowGreetingAtMousePosition

    Dim oDoc As Object

    Dim oViewCursor As Object

    Dim oTextCursor As Object

    Dim oText As Object

    oDoc = ThisComponent

    oViewCursor = oDoc.CurrentController.getViewCursor()

    oTextCursor = oViewCursor.getText().createTextCursorByRange(oViewCursor)

    oText = oDoc.Text

    oText.insertString(oTextCursor, "Hello 您好", False)

End Sub

5. **關聯巨集與按鈕**：

   - 在巨集編輯器中，將上述示例巨集程式碼複製並貼上到巨集編輯器視窗中。

   - 關閉巨集編輯器。

   - 回到 Writer 文件，確保按鈕已被選取。

   - 在 "按鈕屬性" 對話框中，切換到 "事件(Events)" 選項卡。

   - 在 "滑鼠按下(Mouse Button Pressed)" 事件下拉選單中，選擇你剛剛建立的巨集（例如 "ShowGreetingAtMousePosition"）。

6. **測試按鈕**：

   - 關閉 "按鈕屬性" 對話框。

   - 點擊你創建的按鈕。你應該會在滑鼠位置看到顯示 "Hello 您好"。