die IDE verabschiedet sich mit einem IMA nachdem man einen vermeintlich harmlosen WinAPI-Aufruf macht. Auch die Fehlermeldung kann sich nicht so richtig entscheiden und zeigt jeweils
undError: Invalid memory access
File: [..]\PureBasicIDE\..\PureBasicDebugger\Communication_PipeWindows.pb
Line: 243
an. (Fehlermeldungen von der v4.61 Beta 1 x86, da die v4.60 x64 IDE keine Fehlerbeschreibung ausgibt)Error: Invalid memory access
File: [..]\PureBasicIDE\WindowsMisc.pb
Line: 784
Wenn man diesen Code kompiliert und ausführt und danach zum IDE-Fenster wechselt (maximiert), fährt diese gegen die Wand, zumindest bei mir. Kann das jemand bestätigen?
Code: Alles auswählen
Procedure SetForegroundWindowEx(hWndWindow)
Protected SetForegroundWindowEx
Protected lThreadForeWin.l
Protected lThreadWindow.l
lThreadWindow = GetWindowThreadProcessId_(hWndWindow, 0)
lThreadForeWin = GetWindowThreadProcessId_(GetForegroundWindow_(), 0)
If lThreadWindow = lThreadForeWin
SetForegroundWindowEx = SetForegroundWindow_(hWndWindow)
Else
AttachThreadInput_(lThreadForeWin, lThreadWindow, #True)
SetForegroundWindowEx = SetForegroundWindow_(hWndWindow)
AttachThreadInput_(lThreadForeWin, lThreadWindow, #False)
EndIf
ProcedureReturn SetForegroundWindowEx
EndProcedure
OpenWindow(1, 100, 100, 200, 200, "Crashtest")
Repeat
Event = WaitWindowEvent()
SetForegroundWindowEx(WindowID(1))
Until Event = #PB_Event_CloseWindow
Code: Alles auswählen
AttachThreadInput_(lThreadForeWin, lThreadWindow, #True)
Getestest auf
- PureBasic 4.60 (Windows - x64) auf Windows 7 Ultimate
- PureBasic 4.61 Beta 1 (Windows - x86) auf Windows XP Professional
Kaosu
__________________________________________________
Thread verschoben
Bugs>Windows
08.01.2012
RSBasic