MMBMisc
Multimedia builder plug-in
By Matthew Woodhams - Squash Productions

 

Commands

     Control Panel 
     TaskBar
     StartButton
     Windows
     Console  
     Keys
     Mouse
     Screen
     System 
     Files  
     Inputs
     Messages  
     Dialogs
     Internet 
     Misc.  
    



About

    Hello all, well this is something that i had promised a while back... I have finally found the time to do it,  After some problems I had with MMB plugins in Delphi I have managed to get rid of most of the common bugs that my other delphi plugins had :)
    If you have any ideas of features to add please contact me :)
    Very special thanks to Eric for his great Delphi SDK, it has helped me a lot,  and to Mebirok for his excelent mmbmisc demo, thanks!

Back to top

 

Info

     Update 16 Feb 01: Small Update, I have added a few things requested by users, Change file attributes (Hidden, ReadOnly), DelTree (this will imitate DelTree to delete a whole folder and sub folders...) and RunHidden, HideFromTaskbar. ohh and i fixed the control panel bugs... Enjoy!
     Update 25 Jan 01: Big Update!! well I have fixed all of the known bugs (Http, Keyboard settings, Run, StandBy and others...) And i have added some mayor features (Download, Console, MessageBox, System and others!)  

     Update 14 Jan 01: After Mebirok excelent demo I fixed some bugs and added some new stuff... thanks Mebirok!
     Update 12 Jan 01: Well i just can't get enough of MMBMisc :), Added some usful features: Encrypt/Decrypt and change Screen resolution.
     Update 10 Jan 01: Hi,  Just added some stuff that i forgot to add in the first version, Check for the new hihglights... happy mmb'ing ;)


   This plugin allows you to do allows you do all kind of different  functions in MMB (hence the name Misc. LOL!) well there are quite a few usful features, below are descriptions and commands for you to get to know the plugin :)
    Because this plug-in was done in Delphi it requires no extra files to run and it should work on all Windows 9.x versions and 2000, Me (not tested)

    Note: Delphi source is availible for anyone, but please share what you have added ;)

    As you all know this plugin is free, but i would really appreciate it if you could donate, specially if you use if for a commercial project, It took me a lot of work to do and it would really help if you would donate.  Please click here to find out more about donating and thanks! :)...

    Check out the mmbmisc demo by Mebirok here: http://www.sussexvt.k12.de.us/mmb/files/Plugins/MMBMisc/miscdll_demo.zip

Back to top

 

Commands
    This plugin has many different command, I will try to explain them all:

            ControlPanel: PluginRun("PlugIn", "ControlPanel")

            AddRemove: PluginRun("PlugIn", "AddRemove")

            AddHardware: PluginRun("PlugIn", "AddHardware")

            TimeDateSettings: PluginRun("PlugIn", "TimeDateSettings")

            RegionalSettings: PluginRun("PlugIn", "RegionalSettings")

            DisplaySettings: PluginRun("PlugIn", "DisplaySettings")

            InternetSettings: PluginRun("PlugIn", "InternetSettings")

            ModemSettings: PluginRun("PlugIn", "ModemSettings") 

            MouseSettings: PluginRun("PlugIn", "MouseSettings")

            KeyboardSettings: PluginRun("PlugIn", "KeyboardSettings")   

            SystemSettings: PluginRun("PlugIn", "SystemSettings")

            NetworkSettings: PluginRun("PlugIn", "NetworkSettings")

            PasswordSettings: PluginRun("PlugIn", "PasswordSettings")

            SoundSettings: PluginRun("PlugIn", "SoundSettings")

Back to top

 

            ShowTaskbar: PluginRun("PlugIn", "ShowTaskbar")

            HideTaskbar: PluginRun("PlugIn", "HideTaskbar")

            ShowSystray: PluginRun("PlugIn", "ShowSystray")

            HideSystray: PluginRun("PlugIn", "HideSystray")   

Back to top


            ShowStart: PluginRun("PlugIn", "ShowStart")

            HideStart: PluginRun("PlugIn", "HideStart")

            EnableStart: PluginRun("PlugIn", "EnableStart")

            DisableStart: PluginRun("PlugIn", "DisableStart")

            ClickStart: PluginRun("PlugIn", "ClickStart") 

Back to top


            ShutDown: PluginRun("PlugIn", "ShutDown")  

            Restart: PluginRun("PlugIn", "Restart") 

            LogOff: PluginRun("PlugIn", "LogOff")

Back to top

 

            Console: PluginRun("PlugIn", "Console")
            This must be run for the Write and Read commands to work.

         Write: This allows you to print text to the console window     

           Write$ = 'Hello MMB Dev World!'
           PluginSet("PlugIn","Write$")
           PluginRun("PlugIn","Write")

        Read: This will enable the user to type in the console window, and it will send you the result as a string.

           Write$ = 'Hi, What is your name?'
           PluginSet("PlugIn","Write$")
           PluginRun("PlugIn","Write")
          **This is the write command.
          PluginRun("PlugIn","Read")
          PluginGet("PlugIn","Read$")
          Message("hello","Read$")
          **This is the Read command.

       **Remember, Console must be run so that Read and Write can work. BTW when you close the console, your project will close.

 

Back to top

 

         The following will enable/disable the Ctrl+Alt+Del keys:
            EnableDel: PluginRun("PlugIn", "EnableDel")

            DisableDel: PluginRun("PlugIn", "DisableDel")

         The following will enable/disable all system keys:
            EnableSysKeys: PluginRun("PlugIn", "EnableSysKeys")

            DisableSysKeys: PluginRun("PlugIn", "DisableSysKeys")

 Back to top

 

            SwapMouse: PluginRun("PlugIn", "SwapMouse")

            NormalMouse: PluginRun("PlugIn", "NormalMouse")

            ShowMouse: PluginRun("PlugIn", "ShowMouse")         

            HideMouse: PluginRun("PlugIn", "HideMouse")        

            RightClick: PluginRun("PlugIn", "RightClick")           

            LeftClick: PluginRun("PlugIn", "LeftClick")                

           MiddleClick: PluginRun("PlugIn", "MiddleClick")          

 Back to top

 

            StandBy: PluginRun("PlugIn", "StandBy") 

            MonitorOn: PluginRun("PlugIn", "MonitorOn")

            ScreenSaver: PluginRun("PlugIn", "ScreenSaver")

           ChangeRes: Change the resolution of your screen!        
           Example: Uses to other commands (ResX and ResY)

           XRes$ = '800'
           XResInt = VAL(XRes$)
           ** Change X value to Integer
           PluginSet("PlugIn","XResInt")
           PluginRun("PlugIn","ResX")
           YRes$ = '600'
           YResInt = VAL(YRes$)
           ** Change Y value to Integer
           PluginSet("PlugIn","YResInt")
           PluginRun("PlugIn","ResY")
           PluginRun("PlugIn","ChangeRes")
           **Must be a valid Screen Resolution

Back to top

 

            Serial: This get the drives serial number...

           Drive$ = 'C:\\'
           PluginSet("PlugIn","Drive$")
           PluginRun("PlugIn","Serial")
           PluginGet("PlugIn","data$")
           Message("Your hard drive serial number is: ","data$")

            TotalSpace: This get the total space in your computer... in bytes

           Drive$ = 'C:\\'
           PluginSet("PlugIn","Drive$")
           PluginRun("PlugIn","TotalSpace")
           PluginGet("PlugIn","data$")
           Message("The total space in your computer is: ","data$")

           FreeSpace: This get the free space in your computer... in bytes

           Drive$ = 'C:\\'
           PluginSet("PlugIn","Drive$")
           PluginRun("PlugIn","FreeSpace")
           PluginGet("PlugIn","data$")
           Message("The free space in your computer is: ","data$")

Back to top

 

            FileDelete: This will delete a file from the computer       
             Example:

       Filename$ = 'C:\Hello.txt'
            PluginSet("PlugIn","Filename$")
            PluginRun("PlugIn","DelFile")

            FileMove: This will move a file in the computer   tip: Move file can also rename a directory... 
             Example: 
 

       Filename$ = 'C:\hello.txt'
            PluginSet("PlugIn","Filename$")
            PluginRun("PlugIn","Filename")
        **Directory must exist
       Moved$ =
'C:\Windows\Desktop\World.txt'
            PluginSet("PlugIn","Moved$")
            PluginRun("PlugIn","FileMove")

            FileRename: This will rename a file in the computer       
             Example:

       Filename$ = 'C:\Hello.txt'
            PluginSet("PlugIn","Filename$")
            PluginRun("PlugIn","Filename")

       Renamed$ = 'C:\World.txt'
            PluginSet("PlugIn","Renamed$")
            PluginRun("PlugIn","FileRename")

          FileExist: Example:

        filename$ = 'C:\hello.txt'
 
            PluginSet("PlugIn","filename$")
      PluginRun("PlugIn","FileExist")
      PluginGet("PlugIn","Result$")
      If (Result$ = 'True')
      Message("Yup, hello.txt does exist","")
      end

      If (Result$ = 'False')
      Message("Naaa I can't find it...","")
      end

          DirDelete: James: here ya go ;)      
          Example:

        Filename$ = 'C:\Test\'
      PluginSet("PlugIn","Filename$")
      PluginRun("PlugIn","DirDelete")

 

          DirCreate: Creates a folder     
          Example:

       Filename$ = 'C:\Test\'
      PluginSet("PlugIn","Filename$")
      PluginRun("PlugIn","DirCreate")

 

          DelTree: This will imitate the DelTree (delete a whole dir and sub folders...)       <------------- NEW
          Example:

        Filename$ = 'C:\Test\'
      PluginSet("PlugIn","Filename$")
      PluginRun("PlugIn","DelTree")

 

          HideFile   This will change the attributes of the file to hidden     <------------- NEW
          Example:

        Filename$ = 'C:\Test\test.html'
      PluginSet("PlugIn","Filename$")
      PluginRun("PlugIn","HideFile")

 

          ReadOnlyFile: This will change the attributes of the file to read only     <------------- NEW
          Example:

        Filename$ = 'C:\Test\test.html'
      PluginSet("PlugIn","Filename$")
      PluginRun("PlugIn","ReadOnlyFile")

 

 

 

Back to top

 

            InputBox: Show a little input box...

       Caption$ = 'What is your name?'
       PluginSet("PlugIn","Caption$")
       PluginRun("PlugIn","InputBox")
       PluginGet("PlugIn","Name$")
       Message("Nice to meet you ","Name$")

            SelectDir: Show the browse folder box

       Caption$ = 'Please choose a folder'
       PluginSet("PlugIn","Caption$")
       PluginRun("PlugIn","SelectDir")
       PluginGet("PlugIn","FolderName$")
       Message("You choose ","FolderName$")


Back to top

 

            MessageBox: this uses 2 other commands (Button and Icon) these are used to set the icons and buttons....

       Example1:

       **Set the icon
       Icon$ = 'CONFIRM'
       PluginSet("PlugIn","Icon$")
       PluginRun("PlugIn","Icon")
       **Set the buttons
       Button$ = 'YES/NO'
       PluginSet("PlugIn","Button$")
       PluginRun("PlugIn","Button")
       **Set the message and run
       Msg$ = 'Do you like MMBMisc?'
       PluginSet("PlugIn","Msg$")
       PluginRun("PlugIn","MessageBox")
       **Get the result (True/False)
       PluginGet("PlugIn","Result$")
       if (Result$ = 'True') then
       Message("Thanks man! Enjoy the plugin","")
       end
       if (Result$ = 'False') then
       Message("Ohh well, thats too bad :)","")
       end

       Example2:

       **Set the icon
       Icon$ = 'NONE'
       PluginSet("PlugIn","Icon$")
       PluginRun("PlugIn","Icon")
       **Set the buttons
       Button$ = 'OK'
       PluginSet("PlugIn","Button$")
       PluginRun("PlugIn","Button")
       **Set the message and run
       Msg$ = 'Hello MMB Dev world!'
       PluginSet("PlugIn","Msg$")
       PluginRun("PlugIn","MessageBox")

            Getting Result: Well if you have 2 buttons (YES/NO or OK/CANCEL) then mmbmisc will return 'True' of OK or YES was pressed or it will return    'FALSE' if CANCEL or NO was pressed (Example1 uses 2 buttons...)

            Icon: This will define the icon, it can be any of the following icons:
            - NONE
            - INFO
            - WARNING
            - ERROR
            - CONFIRM

            Button: This will define the button, it can be any of the following buttons:
            - NONE
            - OK
            - OK/CANCEL
            - YES/NO

Note: Both Button and Icon must be set in uppercase...


Back to top

 

            ColorDialog: Example:    

       PluginRun("PlugIn","ColorDialog")
       PluginGet("PlugIn","Color$")
       Message("You choose the color: ","Color$")
  
    **Returns the color as an RGB string. 

            OpenDialog: Example:

       Filter$ = 'Text File (*.txt)|*.txt'
      PluginSet("PlugIn","Filter$")
      PluginRun("PlugIn","OpenDialog")
      PluginGet("PlugIn","Filename$")
      Message("You Choose: ","Filename$")

            SaveDialog: Example:

      Filter$ = 'Text File (*.txt)|*.txt'
      PluginSet("PlugIn","Filter$")
      PluginRun("PlugIn","SaveDialog")
      PluginGet("PlugIn","Filename$")
      Message("You Choose: ","Filename$")

            OpenPictureDialog: Example:

      Filter$ = 'All (*.dib;*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf)|*.dib;*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf'
      PluginSet("PlugIn","Filter$")
      PluginRun("PlugIn","OpenPictureDialog")
      PluginGet("PlugIn","Filename$")
      Message("You Choose: ","Filename$")

            SavePictureDialog: Example:

      Filter$ = 'All (*.dib;*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf)|*.dib;*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf'
      PluginSet("PlugIn","Filter$")
      PluginRun("PlugIn","SavePictureDialog")
      PluginGet("PlugIn","Filename$")
      Message("You Choose: ","Filename$")

Back to top

 

            Connect: PluginRun("PlugIn", "Connect")          

            Disconnect: PluginRun("PlugIn", "Disconnect")       

            Connection: Example:

      PluginRun("PlugIn","Connected")
      PluginGet("PlugIn","Result$")
      If (Result$ = 'True')
      Message("Yeah, your connected","")
      end

      If (Result$ = 'False')
      Message("Sorry, your not connected...","")
      end

            ConnectionKind: Example:

      PluginRun("PlugIn","ConnectionKind")
      PluginGet("PlugIn","Result$")
      Message("Your connection type is: ","Result$")

            Http: This is used to view the text of an html file. Example:    

       URL$ = 'http://www.mediachance.com/index.html'
            ** URL$ is the html file you want to view as text
            PluginSet("PlugIn","
URL$")
            PluginRun("PlugIn","Http")
            PluginGet("PlugIn","Result$")
     
Message("Http text: ","Result$")

             Download: Well i finally added a download feature :) I hesitated in adding this because Jay has a download plugin. I emailed Jay,
                               But i could not get a reply, so Jay, if you see this Please contact me if you have any probs with this... 

            URL$ = 'Http://www.MediaChance.com/index.html'
            PluginSet("PlugIn","URL$")
            PluginRun("PlugIn","URL")
            **Set's the URL
            **-------
            Dest$ = 'C:\Example.htm'
            PluginSet("PlugIn","Dest$")
            PluginRun("PlugIn","Download")
            **Set's the destination and Download file
            **--------
            PluginRun("PlugIn","Result")
            PluginGet("PlugIn","Result$")
            Message("Download result: ","Result$")
            **Gets the download result.

             CheckURL: This will check to see if an URL existes or not...  

            URL$ = 'http://www.SquashProductions.com'
            PluginSet("PlugIn","URL$")
            PluginRun("PlugIn","CheckURL")
           
**Check if url existes....
            **-------
      PluginGet("PlugIn","Result$")
      If (Result$ = 'True')
      Message("Yup, the site existes!","")
      end
      If (Result$ = 'False')
      Message("Sorry, the site does not existe.","")
      end
            **Gets the result (True, False)
            **-------

             GetIP: This will get your current IP  

      PluginRun("PlugIn","GetIP")
      PluginGet("PlugIn","MyIP$")
      Message("My IP is: ","MyIP$")

             GetHost: This will get your current hostname 

      PluginRun("PlugIn","GetHost")
      PluginGet("PlugIn","MyIP$")
      Message("My IP is: ","MyIP$")

 

Back to top

 

            EmptyRecycle: PluginRun("PlugIn", "EmptyRecycle")

            DisableClose: This will disable to close button of your program. Example: 

       Title$ = 'Welcome!'
            ** Title$ is the title of your project
            PluginSet("PlugIn","Title$")
            PluginRun("PlugIn","DisableClose")

            DisableMin: This will disable to minimize button of your program. Example: 

       Title$ = 'Welcome!'
            ** Title$ is the title of your project
            PluginSet("PlugIn","Title$")
            PluginRun("PlugIn","DisableMin")

    MinimizeAll: PluginRun("PlugIn", "MinimizeAll")        

    Explorer: PluginRun("PlugIn", "Explorer")                 
    This will run the Explorer

    FindFiles: PluginRun("PlugIn", "FindFiles")              
    This will run the Search program

    Run:  Run a file with parameters...  BUG  FIXED!
    Example:


      param$ = 'C:\Test.txt')
      PluginSet("PlugIn","param$")
      PluginRun("PlugIn","Parameters")
      Filename$ = 'C:\Windows\Notepad.exe'
      PluginSet("PlugIn","Filename$")
      PluginRun("PlugIn","Run")

 

    RunHidden:  This will run a file (with parameters if you want) hidden  <------------- NEW
    Example:


      param$ = 'C:\Test.exe')
      PluginSet("PlugIn","param$")
      PluginRun("PlugIn","Parameters")
      Filename$ = 'ExampleParameter'
      PluginSet("PlugIn","Filename$")
      PluginRun("PlugIn","Run")

 

    GetTime:  This will get the current time on the PC 
    Example:

            PluginRun("PlugIn","GetTime")
            PluginGet("PlugIn","Time$")
      Message("The time is: ","Time$")

    GetDate:  This will get the current date on the PC   
    Example:

            PluginRun("PlugIn","GetDate")
            PluginGet("PlugIn","Date$")
      Message("The time is: ","Date$")

   Encrypt:  This will encrypt a string variable in MMB                
    Example: Uses CryptKey (Integer, any number)

      **CryptKey is used to set a key to encrypt and decrypt
      Key$='1'
      value = VAL(Key$)
      PluginSet("PlugIn","value")
      PluginRun("PlugIn","CryptKey")
      Hi$ = 'Hello MMB'
      PluginSet("PlugIn","Hi$")
      PluginRun("PlugIn","Encrypt")
      PluginGet("PlugIn","Test$")
      Message("the encryption is: ","Test$")
      **This shows the encyrpted data

   Decrypt:  This will encrypt a string variable in MMB                          
    Example: Uses CryptKey (Integer, any number)

      **CryptKey is used to set a key to encrypt and decrypt
      Key$='1'
      value = VAL(Key$)
      PluginSet("PlugIn","value")
      PluginRun("PlugIn","CryptKey")
      Hi$ = 'Hello MMB'
      PluginSet("PlugIn","Hi$")
      PluginRun("PlugIn","Decrypt")
      PluginGet("PlugIn","Test$")
      Message("the decryption is: ","Test$")
      **This shows the decyrpted data

 

     Caption: Change the caption of your project on runtime!   

      NewName$ = 'Cool huh?'
      ** NewName$ is the title you want it to be changed to...
      PluginSet("PlugIn","NewName$")
      PluginRun("PlugIn","Filename")
      Title$ = 'Welcome!'
      ** Title$ is the title of your project
      PluginSet("PlugIn","Title$")
      PluginRun("PlugIn","Caption")

     Flash: This will flash your project's caption (once)   

      Title$ = 'Welcome!'
      ** Title$ is the title of your project
      PluginSet("PlugIn","Title$")
      PluginRun("PlugIn","Caption")

     HideFromTaskbar: This will hide your program from the taskbar    <------------- NEW

      Title$ = 'Welcome!'
      ** Title$ is the title of your project
      PluginSet("PlugIn","Title$")
      PluginRun("PlugIn","HideFromTaskbar")

     Terminate: This can terminate any program, just need to know its caption...   
      Title$ = 'Welcome!'
      ** Title$ is the title of the program you want to close
      PluginSet("PlugIn","Title$")
      PluginRun("PlugIn","Terminate")

     Minimize: This will minimize any program, just need to put its caption  

      Title$ = 'Welcome!'
      ** Title$ is the title of your project or any other program...
      PluginSet("PlugIn","Title$")
      PluginRun("PlugIn","Minimize")

     BringToTop: This will bring any program to the top of the screen, just put its caption  

      Title$ = 'Welcome!'
      ** Title$ is the title of your project or any other
      PluginSet("PlugIn","Title$")
      PluginRun("PlugIn","BringToTop")

    
Back to top

**Note: Remember that MMB is case sensitive that that my commands do have caps in the middle... :)
           mmbmisc supports <Embedded>, <Windows> and <SrcDir> **

 

Bugs
   I fixed all of the known bugs! But with so many features there has go to be a few bugs ;) so if anyone finds some bugs, please tell me.

Back to top

 

Contact
      If you have any questions, comments, sugestions or if you have found a bug, please contact us at Squash@cv.cl or visit our website.

Back to top

Donate
   
Please help us help you. 
    You can use all our freeware plugins (MMBMisc, MMBPad, MMMessage, MMBCalendar, MMBRegister, MMBPlaylist and others) without paying a penny (or a dime hehe) But if you use our plugin frecuently or really like them :) please donate so we can make even better plugins to enhace MMB!
If you would like to donate please visit:
http://www.SquashPlugins.f2s.com/donate.htm 

Thanks a lot, your donation will not go unseen 
Note: By no means are you obligated to donate :)

Back to top


MMBMisc v.1.0 Beta
By Matthew Woodhams
Squash Productions
Squash@cv.cl 
http://www.squashplugins.com