Reply to thread

Message

<blockquote data-quote="BassFan" data-source="post: 1060065">Yes..That can not Work <img src="data:image/gif;base64,R0lGODlhAQABAIAAAAAAAP///yH5BAEAAAAALAAAAAABAAEAAAIBRAA7" class="smilie smilie--sprite smilie--sprite1" alt=":)" title="Smile&nbsp; &nbsp; :)" loading="lazy" data-shortname=":)" />Do Change from FullScreen to Window mode AtmoWin will stop and deaktivate all LEDs&nbsp;[CODE]&nbsp; &nbsp; &nbsp; &nbsp; EnterCriticalSection(CritSect);&nbsp; &nbsp; &nbsp; &nbsp; try&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; if (FAtmoRunning) then&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; begin&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; if (FAtmoWinInterface.Initialize &lt;&gt; nil) then&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; begin&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; FullScreen := GetFullScreen(ParentHandle);&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; if FullScreen then&nbsp; // only FullScreen&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; begin&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; FAtmoWin.Render(ScrBitmap, pf32Bit, ParentHandle, VisInfo^.VisDC,&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; StretchWidth, StretchHeight);&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; FDisableLEDs := True;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; end else&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; if FDisableLEDs then // no FullScreen&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; begin&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; FAtmoWin.DisableLEDs;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; FDisableLEDs := False;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; end;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; end else&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; FAtmoRunning := False;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; end;&nbsp; &nbsp; &nbsp; &nbsp; finally&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; LeaveCriticalSection(CritSect);&nbsp; &nbsp; &nbsp; &nbsp; end;[/CODE]&nbsp;greets</blockquote>

[QUOTE="BassFan, post: 1060065"] Yes.. That can not Work :) Do Change from FullScreen to Window mode AtmoWin will stop and deaktivate all LEDs [CODE] EnterCriticalSection(CritSect); try if (FAtmoRunning) then begin if (FAtmoWinInterface.Initialize <> nil) then begin FullScreen := GetFullScreen(ParentHandle); if FullScreen then // only FullScreen begin FAtmoWin.Render(ScrBitmap, pf32Bit, ParentHandle, VisInfo^.VisDC, StretchWidth, StretchHeight); FDisableLEDs := True; end else if FDisableLEDs then // no FullScreen begin FAtmoWin.DisableLEDs; FDisableLEDs := False; end; end else FAtmoRunning := False; end; finally LeaveCriticalSection(CritSect); end;[/CODE] greets [/QUOTE]

Verification