Pa Callender

Could someone please give me a nudge in the right direction for using functions in the Fluidsynth API with AutoIt? The EXE version crashes if I use it through the console, and I am at a loss with using the DLL API - hence why I need help. The Fluidsynth homepage, Windows EXE/DLL and the API documentation are linked below. Fluidsynth homepage Fluidsynth EXE/DLL Fluidsynth API Docs I wish to use this in a few projects - a music scorewriter, and possibly a game. Thank you if you respond, Pa C

Wonderful idea, absolutely brilliant. My only issue is it doesn't work I have the latest AutoIt3Lib and AutoIt3-Prod installed, but I can't get it to work correctly. My errors are: ERROR: $LVITEM previously declared as a 'Const' (fixed, but then)Variable used without being declared.: ($tagSize, $tagPoint, $tagBlendFunction) (fixed, but then)Unknown function name.: (_API_UpdateLayeredWindow) (??)Could someone help me here? I understand that _API_UpdateLayeredWindow should be present in A3lWinAPI but it isn't... ¡Muchas gracias! EDIT: Fixed anyway. Thanks.

It's only very recently occured to me that you can use the MM Lib to create Office 2003 style menus... I modified the XSkinGradient Code and injected it into the WM_DRAWITEM function. Just use this new feature like this: _SetMenuIconGradBkColor(0xEFEFEF) Knock yourselves out! ModernMenu.au3 sample.au3

As a small experiment I'm trying to use the System.Windows.Forms class of .NET as a replacement to GUICreate to discover more about .NET. But I've run into a major problem. Here: $form1 = ObjCreate("System.Windows.Forms.Form") ;ObjEvent($form1,"form1_") $form1.Text = "Hello" $form1.HelpButton = True $form1.MaximizeBox = False $form1.MinimizeBox = False $button1 = ObjCreate("System.Windows.Forms.Button") $button1.Text = "OK" ;$form1.Controls.Add($button1) $form1.ShowDialog() While 1 Sleep(512) WEnd ;Func form1_FormClosed() ; Exit ;EndFunc As you can see, if you run the form, you get a GUI with the caption "Hello" and a Help Caption button. But my problem is trying to recreate the functionality of new Point(10,10) I have tried ObjCreate("System.Windows.Forms.Point") and that doesn't exist. I've also tried $form1.Point, $button1.Point and System.Windows.Forms > Point, but to no avail. Could anyone enlighten me?

*quickly writes a really fast program with a dozen easter eggs in it*

Try this: CODE#include <GUIConstants.au3> Global $SHELL32DLL = @SystemDir & "\SHELL32.dll" Global $GUI, $logonServer, $gcpLogo, $gceInfoWindow Global $DomainName = @LogonDomain Global $UserName = @UserName Global $updates, $gcgScriptDecision, $gcpScriptProgress Global $colItems, $objItem, $FullName, $Name, $PasswordExpires ;#NoTrayIcon Opt('GUICloseOnESC', 0); 1 = ESC closes / 0 = ESC won't close Opt('GUIEventOptions', 1); 0=default, 1=just notification, 2=GuiCtrlRead tab index Opt('TrayIconDebug', 0); 0=no info, 1=debug line info ;Opt('TrayMenuMode', 1); 0=append, 1=no default menu, 2=no automatic check, 4=menuitemID not return Opt('TrayOnEventMode', 1); 0=disable, 1=enable ;******************************************************************************** ;* Script body ;******************************************************************************** _UserDomainInfo() $GUI = GUICreate('Logon Script', 344, 443, 20, 20) GUISetIcon($SHELL32DLL, 21, $GUI) $gcpLogo = GUICtrlCreatePic(@LogonServer & '\NETLOGON\Utils\Logo.bmp', 130, 10, 80, 30) $gceInfoWindow = GUICtrlCreateEdit('', 24, 50, 296, 130, $ES_READONLY) GUICtrlSetBkColor($gceInfoWindow, 0xffffff) GUICtrlSetData($gceInfoWindow, 'Full Name: ' & $FullName & @CRLF & 'Username: ' & @UserName & @CRLF & 'Password Expires On: ' & _ $PasswordExpires & @CRLF & 'Workstation: ' & @ComputerName & @CRLF & 'Logon Server: ' & @LogonServer & @CRLF & _ 'Date/Time: ' & @MON & '/' & @MDAY & '/' & @YEAR & ' ' & @HOUR & ':' & @MIN & ':' & @SEC & @CRLF & @CRLF & _ 'Please regularly reboot your PC to ensure that any' & @CRLF & 'important Security Updates and Patches are installed!') $updates = GUICtrlCreateEdit('', 24, 181, 296, 184, $ES_READONLY) GUICtrlSetBkColor($updates, 0xffffff) $gcgScriptDecision = GUICtrlCreateGroup('Choose the script to run:', 24, 370, 296, 38) $gcrProductionChoice = GUICtrlCreateRadio('Production', 160, 387, 70, 10) $gcrBetaChoice = GUICtrlCreateRadio('Beta', 250, 387, 50, 10) GUICtrlSetState($gcrProductionChoice, $GUI_CHECKED) $gcpScriptProgress = GUICtrlCreateProgress(10, 413, 324, 20, $PBS_SMOOTH) GUISetState (@SW_SHOW, $GUI) AdlibEnable('ChooseScript',3000) ;set a timer for ChooseScript() to run in 3000 ms (3 seconds) While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE GUIDelete($GUI) Exit EndSwitch WEnd ;******************************************************************************** ;* Production / Beta functions. * ;******************************************************************************** Func ChooseScript() If BitAnd(GUICtrlRead($gcrBetaChoice),$GUI_CHECKED) = $GUI_CHECKED Then BetaScript() Else ProductionScript() EndIf AdlibDisable() ;make sure the timer doesn't run again later EndFunc Func BetaScript() MsgBox(0, '', 'Running BETA script...') Exit EndFunc Func ProductionScript() MsgBox(0, '', 'Running PRODUCTION script...') Exit EndFunc ;******************************************************************************** ;* This section is for all other functions. * ;******************************************************************************** Func _UserDomainInfo() $wbemFlagReturnImmediately = 0x10 $wbemFlagForwardOnly = 0x20 $colItems = '' $objWMIService = ObjGet('WinNT://' & $DomainName & '/' & $UserName & ',user') $FullName = $objWMIService.Fullname $objWMIService = ObjGet('winmgmts:\\localhost\root\cimv2') $colItems = $objWMIService.ExecQuery('Select * from Win32_NetworkLoginProfile') For $objItem in $colItems $Name = $objItem.Name If $Name = @LogonDomain & '\' & @UserName Then $PasswordExpires = StringMid($objItem.PasswordExpires, 5, 2) & '/' & StringMid($objItem.PasswordExpires, 7,2) & _ '/' & StringLeft($objItem.PasswordExpires, 4) & ' ' & StringMid($objItem.PasswordExpires, 9, 2) & _ ':' & StringMid($objItem.PasswordExpires, 11, 2) & ':' & StringMid($objItem.PasswordExpires, 13, 2) EndIf Next EndFunc I used the Adlib functions to create a similar effect to Javascript's setTimeout().

What?? It never asked me to install MS Office... Strange... It's the same editor that's used on the AutoIt forums as the Rich Text Editor. If it works there (turn it on in My Controls) then it should work in the editor. The control actually has nothing to do with MS Office.

Well... It's been five hours in the making and here it is... I present to you: The FIRST Rich Text Editor that can do cool things like font alterations, etc. from within AutoIt (as far as I have seen). Well... technically it's the IE HTML Editor, but it still works... It's not complete, so don't expect a replacement for MS Word... yet DHTMLEdit.zip Go on, knock yourselves out EDIT: The sample MS DHTML stuff can be found under "Sample DHTML"

Also, there is something I would like to note... With my globe, it gets it's radius from @DesktopHeight/3, and prevents zooming in further than the surface, but if you zoom out too far, the planet sort of passes through the boundary of the universe. Is there any way that this boundary can be expanded - so that if you zoom far enough, the planet is still a full sphere, not a part of a sphere. This also happens with the advanced controls.

And I would also like to propose a texture function (for adding Bitmaps) so I can add land and trees and people to my globe.

Just thought I'd add something in... I've made a prototype of a recreation of the world view of Populous: The Beginning's engine (or the Magic Carpet engine, as PopTB is based on Magic Carpet technology). Populous: The Beginning is an excellent game where you play a primitive tribe's spiritual leader, and conquer other worlds and the three other tribes (Dakini, Matak and Chumara) in your quest to become a god. You play through 3D worlds and build, attack, defend and cast spells to alter land, scare the enemy tribe and enhance the power of your followers. Controls: Simple Controls ====== ======== PgUp - Zoom In PgDn - Zoom Out Up - Rotate World on Y-Axis by positive amount Down - Rotate World on Y-Axis by negative amount Right - Rotate World on X-Axis by positive amount Left - Rotate World on X-Axis by negative amount Advanced Controls ======== ======== PgUp - Zoom In PgDn - Zoom Out Up - Rotate Camera on Y-Axis about 0,0 by positive amount Down - Rotate Camera on Y-Axis about 0,0 by negative amount Right - Rotate Camera on X-Axis about 0,0 by positive amount Left - Rotate Camera on X-Axis about 0,0 by negative amount W - Move Camera up S - Move Camera down A - Move Camera to the left D - Move Camera to the right Mouse Left - } Not actually sure, what these do, but try using them Mouse Right - } when you have rotated the camera so you are facing the world from the side. Here it is - don't overdo it on the stars, use ~30 for slow computers and ~150 for fast computers. Needs the latest Glut32.dll and the latest A3GLPlugin.dll. Place it in the same directory as the DLL and GLPluginUtils.au3. TestWorld.au3

My guess as to why this happens is that WinClose probably sends $GUI_EVENT_CLOSE to the window. And because you probably have one whole loop and GUIGetMsg returns messages for all windows, your While 1 ... WEnd loop picks this p and assumes it is for the parent GUI, therefore closes it and closes the children.

I'm guessing that the admin name is... Ahem! (Double click) Just a guess...

Rubbish isn't it? Still... The IE component sometimes keeps refreshing for some reason. Testing...

Guess I must have been sleepwalking when I wrote it I have just recently run it and the IE Obj has been flickering like crazy when I loaded www.microsoft.com. Ouch!