

FredS
Members-
Content Count
424 -
Joined
-
Last visited
-
Days Won
4
Everything posted by FredS
-
15.0.47 Access violation during options>string conversion
FredS replied to FredS's topic in MMX Code Explorer
Unfortunately a similar Error now happens in Berlin on Win7: exception class : EAccessViolation exception message : Access violation at address 50122684 in module 'rtl240.bpl'. Read of address 0ECED000. thread $1108: 50122684 +0c8 rtl240.bpl System.TypInfo 1610 +20 GetEnumName 0e85d9ad +12d mmx_bds18.dll PropInfo 507 +7 TObjectAccess.GetValues 0e85d158 +0dc mmx_bds18.dll PropInfo 198 +12 CopyProperties 0eae506b +017 mmx_bds18.dll PascalOptionsFrm 104 +1 TMMXPascalOptionsForm.ApplySettings 0e9cd3d6 +00e mmx_bds18.dll MMX.Options.Form 720 +2 TOptionsPage.ApplySettings 0e9cca6d +025 mmx_bds18.dll MMX.Options.Form 435 +3 TOptionsShellForm.ApplySettings 0e9cc7c7 +01f mmx_bds18.dll MMX.Options.Form 354 +4 TOptionsShellForm.Execute 0e9cc5c0 +138 mmx_bds18.dll MMX.Options.Form 257 +27 TOptionsRegistry.Execute 0ea40222 +022 mmx_bds18.dll MMXEditorToolsDM 1257 +2 TEditorToolsDataModule.MMXPropertiesActionExecute 5017009f +00f rtl240.bpl System.Classes 16683 +3 TBasicAction.Execute 50a8cd86 +086 vcl240.bpl Vcl.ActnList 260 +19 TCustomAction.Execute 0ea7ecee +012 mmx_bds18.dll MMX.ActionProxies 180 +2 TActionProxy.ActionExecute 0ea7eaa4 +028 mmx_bds18.dll MMX.ActionProxies 86 +3 TBaseActionProxy.actActionExecute 5017009f +00f rtl240.bpl System.Classes 16683 +3 TBasicAction.Execute -
15.0.47 Access violation during options>string conversion
FredS replied to FredS's topic in MMX Code Explorer
Thanks, but D11 isn't ready to leave the 'Sandbox' yet but maybe eventually.. -
How to focus a window from another application?
FredS replied to Lajos Juhász's topic in Windows API
BringWindowToTop give it keyboard focus here.. of course I'm not dealing with minimized.. FYI it also gets focus if on a different virtual desktop. This works here, suspended or not.. hFrame := FindWindow('ApplicationFrameWindow', 'Calculator'); if isIconic(hFrame) then ShowWindow(hFrame, SW_RESTORE) else BringWindowToTop(hFrame); -
How to focus a window from another application?
FredS replied to Lajos Juhász's topic in Windows API
@Lajos Juhász I assume you replied to me.. best to use a tag like I just did or quote some part of the text else a user never gets alerted. Only checked back here because of a 'Like'.. Maybe we are missing some info? All this assumes your calls are made from the Active input Window, and Calculator actually has the 'Calculator' caption. I did run SpyXX first and my version 20H2 has an actual window 'Calculator' buried within that framework and BringWindowToTop claims, and does on my system, bring that to the Top. -
How to focus a window from another application?
FredS replied to Lajos Juhász's topic in Windows API
This works for me, even switches desktops if you have more that one: BringWindowToTop(FindWindow( nil,'Calculator')); EDIT: the desktop switching is a bit flaky though.. -
Where is the Welcomepage directory in Delphi 11 Alexandria?
FredS replied to PeterPanettone's topic in Delphi IDE and APIs
I think you forgot the sarcasm tag 🙂 -
DDevExtensions with: TDataModule.PixelsPerInch property remover
FredS posted a topic in Delphi Third-Party
New branch: https://github.com/fschetterer/DDevExtensions/tree/RemoveDMPixelsPerInch Makes it easier to share code with older versions of Delphi. Although it works fine here it could use some testing before I add a pull request. -
You can't really expect a new feature like that to be implemented in under 3 years.. /s
-
I canceled out of that when it came up, was early during my beta testing the release version 🙂 After the 'What's New' page became available I saw some bragging about implementing such a 'feature' but it all felt wrong. First it asked to install Abbrevia and Lockbox which where already installed but NOT by Getit, then why on earth add Getit to my package.. Anyhow, only so many RSPs one wants to file in a day..
-
wuppdi Welcome Page for Delphi 11 Alexandria?
FredS replied to PeterPanettone's topic in Delphi IDE and APIs
Just uninstalled all LiveBindings: -
wuppdi Welcome Page for Delphi 11 Alexandria?
FredS replied to PeterPanettone's topic in Delphi IDE and APIs
Welcome is the first thing I remove, followed by Refactoring and Live Binding.. sure seems to make the rest a lot more lightweight.. -
They most likely have justified abandonment issues..
-
Delphi 11 Windows XP compatibility tweak
FredS replied to mitzi's topic in RTL and Delphi Object Pascal
The VMware slogan was: Run XP forever.. -
Delphi 11 Windows XP compatibility tweak
FredS replied to mitzi's topic in RTL and Delphi Object Pascal
Yup, I have one running but don't expect newer versions of Delphi to be practical for any updates to that code.. -
I checked Berlin and Rio both work with 15_0_45_2476..
-
15_0_45_2476 gives me an exception in Delphi 11 on Windows 7: Attempting show 'Code Explorer' gave me an error and then this while clicking 'OK' to rebuild the index. In Sydney the 'Code Explorer' is docked but same error rebuilding the index with the form open, rebuilding is fine using the refresh button. Both required killing the process to get out of loop. 15.0.37 works in Sydney CodeSite Express, MadExcept and DevEx are installed [76C2C5AF]{KERNELBASE.dll} RaiseException + $58 [50CCCF17]{vcl280.bpl } Vcl.Controls.DoControlMsg (Line 10648, "Vcl.Controls.pas" + 12) + $11 [50CCD9BB]{vcl280.bpl } Vcl.Controls.TWinControl.WMCommand (Line 10925, "Vcl.Controls.pas" + 1) + $5 [50E06D4D]{vcl280.bpl } Vcl.Forms.TCustomForm.WMCommand (Line 6915, "Vcl.Forms.pas" + 6) + $4 [50CC7CCA]{vcl280.bpl } Vcl.Controls.TControl.WndProc (Line 7544, "Vcl.Controls.pas" + 91) + $6 [5006076C]{rtl280.bpl } System.TMonitor.Destroy (Line 19558, "System.pas" + 0) + $0 [50064774]{rtl280.bpl } System.@FinalizeRecord (Line 32815, "System.pas" + 76) + $2 [50CC86E2]{vcl280.bpl } Vcl.Controls.TControl.WMLButtonUp (Line 7801, "Vcl.Controls.pas" + 9) + $6 [50CA814D]{vcl280.bpl } Vcl.Graphics.FreeMemoryContexts (Line 7288, "Vcl.Graphics.pas" + 12) + $8 [17351E55]{mmx_bds22.dll} SysInit.@_delayLoadHelper2 + $2A5 [17352809]{mmx_bds22.dll} Winapi.Windows.user32.dll + $5 [17371CFE]{mmx_bds22.dll} FormStates.TFormState.UpdateHighDPI (Line 491, "FormStates.pas" + 4) + $8 [1737184E]{mmx_bds22.dll} FormStates.TFormState.SaveState (Line 404, "FormStates.pas" + 1) + $4 [5005A388]{rtl280.bpl } System.@FreeMem (Line 4976, "System.pas" + 20) + $0 [5006206C]{rtl280.bpl } System.@UStrClr (Line 25872, "System.pas" + 14) + $0 [17371F62]{mmx_bds22.dll} FormStates.TFormStateStore.AssureFormState (Line 555, "FormStates.pas" + 8) + $10 [1737245A]{mmx_bds22.dll} FormStates.TFormStateStore.SaveFormState (Line 669, "FormStates.pas" + 2) + $E [175C9388]{mmx_bds22.dll} SrcIndexerOptsFrm.TSourceIndexerOptionsForm.FormClose (Line 197, "SrcIndexerOptsFrm.pas" + 1) + $9 [50E02967]{vcl280.bpl } Vcl.Forms.TCustomForm.DoClose (Line 4523, "Vcl.Forms.pas" + 1) + $16 [50E082AF]{vcl280.bpl } Vcl.Forms.TCustomForm.CloseModal (Line 7711, "Vcl.Forms.pas" + 6) + $A [50E08A03]{vcl280.bpl } Vcl.Forms.TCustomForm.ShowModal (Line 7974, "Vcl.Forms.pas" + 52) + $F [50E08B78]{vcl280.bpl } Vcl.Forms.TCustomForm.ShowModal (Line 8004, "Vcl.Forms.pas" + 82) + $13 [175C9243]{mmx_bds22.dll} SrcIndexerOptsFrm.TSourceIndexerOptionsForm.Execute (Line 173, "SrcIndexerOptsFrm.pas" + 8) + $5 [17531253]{mmx_bds22.dll} SourceIndexerServices.IndexerServices (Line 139, "SourceIndexerServices.pas" + 3) + $8 [175CBD4F]{mmx_bds22.dll} MMX.SourceIndexer.Frame.TSourceIndexerFrame.OptionsActionExecute (Line 550, "MMX.SourceIndexer.Frame.pas" + 8) + $23 [501733CF]{rtl280.bpl } System.Classes.TBasicAction.Execute (Line 17813, "System.Classes.pas" + 3) + $7 [50CAF9B2]{vcl280.bpl } Vcl.ActnList.TCustomAction.Execute (Line 284, "Vcl.ActnList.pas" + 19) + $35 [50173223]{rtl280.bpl } System.Classes.TBasicActionLink.Execute (Line 17724, "System.Classes.pas" + 2) + $7 [50CC820C]{vcl280.bpl } Vcl.Controls.TControl.Click (Line 7658, "Vcl.Controls.pas" + 7) + $7 [50D50550]{vcl280.bpl } Vcl.ComCtrls.TToolButton.Click (Line 22464, "Vcl.ComCtrls.pas" + 0) + $0 [50CC86D7]{vcl280.bpl } Vcl.Controls.TControl.WMLButtonUp (Line 7799, "Vcl.Controls.pas" + 7) + $6 [50CC7CCA]{vcl280.bpl } Vcl.Controls.TControl.WndProc (Line 7544, "Vcl.Controls.pas" + 91) + $6 [50093C27]{rtl280.bpl } System.SysUtils.AnsiCompareText (Line 7195, "System.SysUtils.pas" + 1) + $2F [5006076C]{rtl280.bpl } System.TMonitor.Destroy (Line 19558, "System.pas" + 0) + $0 [50064774]{rtl280.bpl } System.@FinalizeRecord (Line 32815, "System.pas" + 76) + $2 [50DCDE51]{vcl280.bpl } Vcl.Themes.TStyleManager.GetStyle (Line 5789, "Vcl.Themes.pas" + 7) + $D [50061544]{rtl280.bpl } System.@TryFinallyExit (Line 23404, "System.pas" + 8) + $0 [50CC7900]{vcl280.bpl } Vcl.Controls.TControl.Perform (Line 7322, "Vcl.Controls.pas" + 10) + $8 [50CCC435]{vcl280.bpl } Vcl.Controls.GetControlAtPos (Line 10291, "Vcl.Controls.pas" + 2) + $78 [50CCC506]{vcl280.bpl } Vcl.Controls.InternalControlAtPos (Line 10315, "Vcl.Controls.pas" + 15) + $E [50D658DE]{vcl280.bpl } Vcl.ComCtrls.TToolBarStyleHook.WndProc (Line 34293, "Vcl.ComCtrls.pas" + 6) + $4 [50DD15DE]{vcl280.bpl } Vcl.Themes.TStyleHook.HandleMessage (Line 7389, "Vcl.Themes.pas" + 20) + $6 [50CC7900]{vcl280.bpl } Vcl.Controls.TControl.Perform (Line 7322, "Vcl.Controls.pas" + 10) + $8 [50CCC5EC]{vcl280.bpl } Vcl.Controls.TWinControl.IsControlMouseMsg (Line 10344, "Vcl.Controls.pas" + 15) + $29 [50CCCC02]{vcl280.bpl } Vcl.Controls.TWinControl.WndProc (Line 10521, "Vcl.Controls.pas" + 112) + $6 [50D52A41]{vcl280.bpl } Vcl.ComCtrls.TToolBar.UpdateButtonState (Line 23818, "Vcl.ComCtrls.pas" + 11) + $27 [50D52A82]{vcl280.bpl } Vcl.ComCtrls.TToolBar.UpdateButtonStates (Line 23829, "Vcl.ComCtrls.pas" + 3) + $4 [50D556EE]{vcl280.bpl } Vcl.ComCtrls.TToolBar.WndProc (Line 25450, "Vcl.ComCtrls.pas" + 104) + $6 [50CCC338]{vcl280.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 10267, "Vcl.Controls.pas" + 3) + $6 [50174200]{rtl280.bpl } System.Classes.StdWndProc (Line 18318, "System.Classes.pas" + 8) + $0 [50E0D68F]{vcl280.bpl } Vcl.Forms.TApplication.ProcessMessage (Line 11317, "Vcl.Forms.pas" + 23) + $1 [50E0D6D2]{vcl280.bpl } Vcl.Forms.TApplication.HandleMessage (Line 11347, "Vcl.Forms.pas" + 1) + $4 [50E0DA11]{vcl280.bpl } Vcl.Forms.TApplication.Run (Line 11486, "Vcl.Forms.pas" + 27) + $3 [004F6F82]{bds.exe } bds.bds (Line 227, "" + 16) + $2
-
Similar using Windows 7 and 15_0_45_2476 while 15.0.37 works.. Just in the process of repeating that install to track down that issue which also broke Sydney as well as Alex..
-
Not sure what you wrote but I had to pick the license without the Mobile add-on for it to work.. in Windows 7 that is..
-
I started that way, now its the opposite 🙂
-
Where there changes in Record Helper? Nothing compiles for me.. but I still can't get to DocuWiki and the help 'What's new' seems all 10.4 stuff..
-
That might require a 'new feature' request 🙂
-
Try clicking 'Advanced' then select the active license..
-
Anon function with undefined result yields no warning
FredS replied to Lars Fosdal's topic in RTL and Delphi Object Pascal
Can't expect 'em to implement a new feature in under 5 years now.. -
upcoming language enhancements?
FredS replied to David Schwartz's topic in RTL and Delphi Object Pascal
So are Roadmaps 🙂