I still don't understand, what you want to do.

Try this:

Sub Init
  menuName = "&TLUPS"
  addMenuItem "&Format Row To Block", menuName, "FormatRowToBlock", "CTRL+F3"
End Sub

Sub FormatRowToBlock
  Set ed = newEditor()
  ed.openFile("D:\MyProgramm\PSPad editor\Script\svn_xml.h")
  ed.Highlighter("C")
  Set ed = newEditor()
  ed.openFile("D:\MyProgramm\PSPad editor\Script\VBScript\ListTransform.vbs")
  ed.highlighter("MS VBScript")
End Sub 


-- 
<http://forum.pspad.com/read.php?2,57827,58869>
PSPad freeware editor http://www.pspad.com

Odpovedet emailem