9
votes
Vote UpVote

Fixing the FMX menu loop bug on Windows

Delphi Haven – I’ve discovered a very simple bug in the implementation of FMX menu loops on Windows. This bug leads to what is in effect an Application.ProcessMessages loop in VCL terms, causing a CPU spike for the duration an FMX menu is shown. To fix, copy both FMX.Platform.Win.pas and FMX.Defines.inc to your project’s directory, open up the former, and work your way to line 1515 in TPlatformWin.StartMenuLoop. Then, replace if not FirstLoop then WaitMessage; with if FirstLoop then FirstLoop := False else WaitMessage; Rebuild, and the spike should ...
Favorite? Off-Topic? Chris Rolliston @ 2011-09-05 23:37

Statistics

Visits: 1173
Votes: 9
Favorites: 0
Off-Topic: 0

Visits by Source

User Actions

Users who voted for this posting

Alister Christie
Barton_Stano
Francis Ruiz
François
Primoz Gabrijelcic
stukelly
TOndrej
vcldeveloper
Zzzzz
Subscribe:
Contact us to advertise on DelphiFeeds.com

Community Links

Torry Firebird News

Sponsor

 
Please login or register to use this functionality.
(click on this box to dismiss)