View Single Post
  #1  
Old 24-05-2012, 03:26
Joe Joe is offline
Member
 
Join Date: Nov 2008
Location: Latvia
Posts: 92
Send a message via Skype™ to Joe
Default Another goofy X6 docker

Hi all

While waiting for some knowledgeable Corel ninjas to answer the other questions I have engineered yet another little X6 docker. This one is really raw, based on an idea I once had - it's basically a notepad right inside of CD.

The top textbox is a calculator of sorts, routed through the CQL evaluate function, so you can do stuff like this:

And get this:

Sometimes handy. Moving on, below that you have a very simple task list thing. You can put in some tasks (well, I suppose normally those would be Design related):

Then press Add new task(s) and get this:

And as you complete them you can add some checkmarks:


It's really simple, doesn't remember anything (yet) and is basically just a toy. But sometimes useful. In theory I can add saving of the data and even per-document saving and loading of it, depends on interest.

Here's the code to add it:

Code:
Sub addNotepadDocker()
    Dim dockerAssembly As String
    dockerAssembly = "D:\Downloads\DOCKER\Notepad\bin\Debug\Notepad.dll"
    
    Call FrameWork.AddDocker("7BCA6297-CD28-4320-A168-FFA635B9FA0A", "Notepad.Docker", dockerAssembly)
    Call FrameWork.CommandBars("Dockers").Controls.AddToggleButton("7BCA6297-CD28-4320-A168-FFA635B9FA0A", 0, False)
End Sub
Attached Files
File Type: zip Notepad.zip (91.7 KB, 804 views)
Reply With Quote