Top > OOoBasic > Generic > BasicIDE

* Basic IDE [#vcf36eb4]
OOo Basic 用 IDE。

#contents

** UNO コマンド [#rfe546b5]
 .uno:BasicIDEAppear

** モジュールを開く [#k6252273]
ライブラリ、モジュール、行番号、桁位置を指定して直接 Basic IDE を開きます。

#code(basic){{
Sub OpenBasicIDE()
  sDocument = "application"
  sLibName = "Standard"
  sName = "M2"
  nLine = 100
  nColumn1 = 0
  nColumn2 = 10
  sType = "Module"
  sURL = ".uno:BasicIDEAppear"
  
  aURL = CreateUnoStruct("com.sun.star.util.URL")
  aURL.Complete = sURL
  CreateUnoService("com.sun.star.util.URLTransformer").parseStrict(aURL)
  
  Dim aArgs(6) As New com.sun.star.beans.PropertyValue
  aArgs(0).Name = "LibName"
  aArgs(0).Value = sLibName
  aArgs(1).Name = "Name"
  aArgs(1).Value = sName
  aArgs(2).Name = "Line"
  aArgs(2).Value = nLine
  aArgs(3).Name = "Column1"
  aArgs(3).Value = nColumn1
  aArgs(4).Name = "Column2"
  aArgs(4).Value = nColumn2
  aArgs(5).Name = "Type"
  aArgs(5).Value = sType
  aArgs(6).Name = "Document"
  aArgs(6).Value = sDocument
  
  d = StarDesktop.queryDispatch(aURL, "_self", 0)
  If NOT IsNull(d) d.dispatch(aURL, aArgs) 
End Sub
}}





Reload   New Lower page making Edit Freeze Diff Upload Copy Rename   Front page List of pages Search Recent changes Backup   Help   RSS of recent changes