Microsoft KB Archive/102395: Difference between revisions

From BetaArchive Wiki
m (Text replacement - "[[7" to "[[../7")
m (Text replacement - """ to """)
 
Line 31: Line 31:
CreateGroup()
CreateGroup()


<pre class="CODESAMP">  ChanNum = DDEInitiate(&quot;ProgMan&quot;, &quot;Progman&quot;)
<pre class="CODESAMP">  ChanNum = DDEInitiate("ProgMan", "Progman")
   rem CreateGroup(GroupName,GroupPath)
   rem CreateGroup(GroupName,GroupPath)
   DDEExecute ChanNum, &quot;[CreateGroup(WinWord Docs)]&quot;
   DDEExecute ChanNum, "[CreateGroup(WinWord Docs)]"
   DDETerminate ChanNum </pre>
   DDETerminate ChanNum </pre>
ShowGroup()
ShowGroup()


<blockquote>Instructs the Program Manager to maximize, minimize, or restore a group window.</blockquote>
<blockquote>Instructs the Program Manager to maximize, minimize, or restore a group window.</blockquote>
<pre class="CODESAMP">  ChanNum = DDEInitiate(&quot;ProgMan&quot;, &quot;Progman&quot;)
<pre class="CODESAMP">  ChanNum = DDEInitiate("ProgMan", "Progman")
   rem ShowGroup(GroupName,ShowCommand)
   rem ShowGroup(GroupName,ShowCommand)
   DDEExecute ChanNum, &quot;[ShowGroup(WinWord Docs,3)]&quot;
   DDEExecute ChanNum, "[ShowGroup(WinWord Docs,3)]"
   DDETerminate ChanNum </pre>
   DDETerminate ChanNum </pre>
DeleteGroup()
DeleteGroup()


<blockquote>Instructs the Program Manager to delete a group.</blockquote>
<blockquote>Instructs the Program Manager to delete a group.</blockquote>
<pre class="CODESAMP">  ChanNum = DDEInitiate(&quot;ProgMan&quot;, &quot;Progman&quot;)
<pre class="CODESAMP">  ChanNum = DDEInitiate("ProgMan", "Progman")
   rem DeleteGroup(GroupName)
   rem DeleteGroup(GroupName)
   DDEExecute ChanNum, &quot;[DeleteGroup(WinWord Docs)]&quot;
   DDEExecute ChanNum, "[DeleteGroup(WinWord Docs)]"
   DDETerminate ChanNum </pre>
   DDETerminate ChanNum </pre>
=== Word 2.x, 6.x ===
=== Word 2.x, 6.x ===
Line 54: Line 54:


<blockquote>Instructs the Program Manager to create a new group or activate the window of an existing group.</blockquote>
<blockquote>Instructs the Program Manager to create a new group or activate the window of an existing group.</blockquote>
<pre class="CODESAMP">  ChanNum = DDEInitiate(&quot;ProgMan&quot;, &quot;Progman&quot;)
<pre class="CODESAMP">  ChanNum = DDEInitiate("ProgMan", "Progman")
   rem CreateGroup(GroupName,GroupPath)
   rem CreateGroup(GroupName,GroupPath)
   DDEExecute ChanNum, &quot;[CreateGroup(WinWord Docs)]&quot;
   DDEExecute ChanNum, "[CreateGroup(WinWord Docs)]"
   DDETerminate ChanNum </pre>
   DDETerminate ChanNum </pre>
ShowGroup()
ShowGroup()


<blockquote>Instructs the Program Manager to maximize, minimize, or restore a group window.</blockquote>
<blockquote>Instructs the Program Manager to maximize, minimize, or restore a group window.</blockquote>
<pre class="CODESAMP">  ChanNum = DDEInitiate(&quot;ProgMan&quot;, &quot;Progman&quot;)
<pre class="CODESAMP">  ChanNum = DDEInitiate("ProgMan", "Progman")
   rem ShowGroup(GroupName,ShowCommand)
   rem ShowGroup(GroupName,ShowCommand)
   DDEExecute ChanNum, &quot;[ShowGroup(WinWord Docs,3)]&quot;
   DDEExecute ChanNum, "[ShowGroup(WinWord Docs,3)]"
   DDETerminate ChanNum </pre>
   DDETerminate ChanNum </pre>
AddItem()
AddItem()


<blockquote>Instructs the Program Manager to create a new program item (icon) in the currently active group window.</blockquote>
<blockquote>Instructs the Program Manager to create a new program item (icon) in the currently active group window.</blockquote>
<pre class="CODESAMP">  ChanNum = DDEInitiate(&quot;ProgMan&quot;, &quot;Progman&quot;)
<pre class="CODESAMP">  ChanNum = DDEInitiate("ProgMan", "Progman")
   rem (Windows 3.0) AddItem(CommandLine,
   rem (Windows 3.0) AddItem(CommandLine,
   rem Name,IconPath,IconIndex,xPos,yPos)
   rem Name,IconPath,IconIndex,xPos,yPos)
   rem (Windows 3.1) AddItem(CmdLine,Name,IconPath,IconIndex,xPos,
   rem (Windows 3.1) AddItem(CmdLine,Name,IconPath,IconIndex,xPos,
   rem yPos,DefDir,HotKey,,fMinimize)
   rem yPos,DefDir,HotKey,,fMinimize)
   DDEExecute ChanNum, &quot;[AddItem(&quot; + Chr$(34) + &quot;Winword.Exe &quot; +\  
   DDEExecute ChanNum, "[AddItem(" + Chr$(34) + "Winword.Exe " +\  
   Chr$(34) + &quot;,&quot; + Chr$(34) + &quot;Word&quot; + Chr$(34) + &quot;)]&quot;
   Chr$(34) + "," + Chr$(34) + "Word" + Chr$(34) + ")]"
   DDETerminate ChanNum </pre>
   DDETerminate ChanNum </pre>
DeleteGroup()
DeleteGroup()


<blockquote>Instructs the Program Manager to delete a group.</blockquote>
<blockquote>Instructs the Program Manager to delete a group.</blockquote>
<pre class="CODESAMP">  ChanNum = DDEInitiate(&quot;ProgMan&quot;, &quot;Progman&quot;)
<pre class="CODESAMP">  ChanNum = DDEInitiate("ProgMan", "Progman")
   rem DeleteGroup(GroupName)
   rem DeleteGroup(GroupName)
   DDEExecute ChanNum, &quot;[DeleteGroup(WinWord Docs)]&quot;
   DDEExecute ChanNum, "[DeleteGroup(WinWord Docs)]"
   DDETerminate ChanNum </pre>
   DDETerminate ChanNum </pre>
For additional information, please see the following article in the Microsoft Knowledge Base:
For additional information, please see the following article in the Microsoft Knowledge Base:

Latest revision as of 09:23, 20 July 2020

WD: Using Program Manager DDE Interface in WordBasic Macros

Q102395



The information in this article applies to:


  • Microsoft Word for Windows, versions 2.0, 2.0a, 2.0a-CD, 2.0b, 2.0c, 6.0, 6.0a, 6.0c
  • Microsoft Word for Windows, versions 7.0, 7.0a





SUMMARY

Windows Program Manager features a DDE interface you can use from within a Word for Windows WordBasic macro to control certain activities in Program Manager.

The following list contains the Program Manager DDE commands you can use in your WordBasic macros.

Word 7.x

CreateGroup()

   ChanNum = DDEInitiate("ProgMan", "Progman")
   rem CreateGroup(GroupName,GroupPath)
   DDEExecute ChanNum, "[CreateGroup(WinWord Docs)]"
   DDETerminate ChanNum 

ShowGroup()

Instructs the Program Manager to maximize, minimize, or restore a group window.

   ChanNum = DDEInitiate("ProgMan", "Progman")
   rem ShowGroup(GroupName,ShowCommand)
   DDEExecute ChanNum, "[ShowGroup(WinWord Docs,3)]"
   DDETerminate ChanNum 

DeleteGroup()

Instructs the Program Manager to delete a group.

   ChanNum = DDEInitiate("ProgMan", "Progman")
   rem DeleteGroup(GroupName)
   DDEExecute ChanNum, "[DeleteGroup(WinWord Docs)]"
   DDETerminate ChanNum 

Word 2.x, 6.x

CreateGroup()

Instructs the Program Manager to create a new group or activate the window of an existing group.

   ChanNum = DDEInitiate("ProgMan", "Progman")
   rem CreateGroup(GroupName,GroupPath)
   DDEExecute ChanNum, "[CreateGroup(WinWord Docs)]"
   DDETerminate ChanNum 

ShowGroup()

Instructs the Program Manager to maximize, minimize, or restore a group window.

   ChanNum = DDEInitiate("ProgMan", "Progman")
   rem ShowGroup(GroupName,ShowCommand)
   DDEExecute ChanNum, "[ShowGroup(WinWord Docs,3)]"
   DDETerminate ChanNum 

AddItem()

Instructs the Program Manager to create a new program item (icon) in the currently active group window.

   ChanNum = DDEInitiate("ProgMan", "Progman")
   rem (Windows 3.0) AddItem(CommandLine,
   rem Name,IconPath,IconIndex,xPos,yPos)
   rem (Windows 3.1) AddItem(CmdLine,Name,IconPath,IconIndex,xPos,
   rem yPos,DefDir,HotKey,,fMinimize)
   DDEExecute ChanNum, "[AddItem(" + Chr$(34) + "Winword.Exe " +\ 
   Chr$(34) + "," + Chr$(34) + "Word" + Chr$(34) + ")]"
   DDETerminate ChanNum 

DeleteGroup()

Instructs the Program Manager to delete a group.

   ChanNum = DDEInitiate("ProgMan", "Progman")
   rem DeleteGroup(GroupName)
   DDEExecute ChanNum, "[DeleteGroup(WinWord Docs)]"
   DDETerminate ChanNum 

For additional information, please see the following article in the Microsoft Knowledge Base:

Q72907 Manipulating Program Manager Groups Using DDE Interface

Additional query words: win31

Keywords : kbmacro kbdtacode winword word6 winword2 word7 word95
Issue type : kbinfo
Technology :


Last Reviewed: November 4, 2000
© 2001 Microsoft Corporation. All rights reserved. Terms of Use.