[M3devel] windows move/scroller

[Jay]

Could be that I had:


        brush := WinGDI.CreatePatternBrush (pst.pmtable[pm].hbmp);
        IF brush = NIL THEN
          win32error := WinBase.GetLastError ();
          IO.Put("CreatePatternBrush failed with " (* & Fmt.Address(brush) *) & " " & Fmt.Int(win32error) & "\n");
>>>          WinBase.DebugBreak ();
        END;
        


will remove that and see.
Fisheye sees this too ("RTSignal", we'll see if it was the breakpoint...)

 - Jay

> From: jay.krell at cornell.edu
> To: wagner at elegosoft.com; m3devel at elegosoft.com
> Subject: RE: [M3devel] windows move/scroller
> Date: Thu, 14 Aug 2008 15:01:51 +0000
>
>
> Juno was not in 3.6 and 4.1.
>
> - Jay
>
>
> ________________________________
>
> From: jay.krell at cornell.edu
> To: wagner at elegosoft.com; m3devel at elegosoft.com
> Subject: RE: [M3devel] windows move/scroller
> Date: Thu, 14 Aug 2008 14:38:33 +0000
>
>
>
>
> I admit I can't remember between NT386GNU and NT386.
> At least one of them Juno works on, at least better than I'm seeing on NT386 today.
> Juno gets pretty far on NT386. The splash screen comes up, the loading progress,
> most of the initial gui comes up, except the "canvas" is full of scrollbar arrows.
>
> I'll have to try with 3.6/4.1..
>
> A few seconds with mentor and I got:
>
> D:\dev2\cm3.2\m3-ui\ui\src\winvbt>\cm3\bin\mentor.exe
> CreatePatternBrush failed with 0
>
> ***
> *** runtime error:
> *** A runtime error occurred.
> *** pc = 0x7d61002d
> ***
> Stack trace:
> FP PC Procedure
> --------- --------- -------------------------------
> 0x72af77c 0x9266ae SystemError + 0x66 in ..\src\runtime\NT386\RTSignal.m3
> 0x72af80c 0x7d61002d
> 0x72af8d4 0x147fe8c PixmapCom + 0x932 in ..\src\winvbt\WinPaint.m3
> 0x72afd30 0x147ddb5 PaintBatch + 0x225 in ..\src\winvbt\WinPaint.m3
> 0x72afd98 0x147867e PaintBatchVBT + 0x12d in ..\src\winvbt\WinTrestle.m3
> 0x72afde0 0x1476f7d WindowProc + 0x699 in ..\src\winvbt\WinTrestle.m3
> 0x72afe0c 0x7d9472d8
> 0x72afe84 0x7d947568
> 0x72afefc 0x7d94778d
> 0x72aff0c 0x7d94ab86
> ......... ......... ... more frames ...
>
> Maybe a divide by zero since I don't know how to setup mentor usefully..
> Looks different than Juno.
>
> Calculator works.
>
> - Jay
>
>> Date: Thu, 14 Aug 2008 15:20:40 +0200
>> From: wagner at elegosoft.com
>> To: m3devel at elegosoft.com
>> Subject: Re: [M3devel] windows move/scroller
>>
>> Quoting Jay :
>>
>>>
>>> Randy, your scrollervbclass.m3 looks ok or better.
>>>
>>> I went to try other gui apps, see if I could see the failure-to-move bug.
>>> It seems that most gui apps now crash.
>>> formsvbtedit is ok.
>>>
>>>
>>> ***
>>> *** runtime error:
>>> *** failed.
>>> *** file "..\src\winvbt\WinContext.m3", line 171
>>> ***
>>>
>>> Stack trace:
>>> FP PC Procedure
>>> --------- --------- -------------------------------
>>> 0x6e1f80c 0x1011cf9 PushPixmap + 0x49b in ..\src\winvbt\WinContext.m3
>>> 0x6e1f8d4 0x101fd0c PixmapCom + 0x932 in ..\src\winvbt\WinPaint.m3
>>> 0x6e1fd30 0x101dc35 PaintBatch + 0x225 in ..\src\winvbt\WinPaint.m3
>>> 0x6e1fd98 0x10184ee PaintBatchVBT + 0x12d in ..\src\winvbt\WinTrestle.m3
>>> 0x6e1fde0 0x1016ded WindowProc + 0x699 in ..\src\winvbt\WinTrestle.m3
>>> 0x6e1fe0c 0x7d9472d8
>>> 0x6e1fe84 0x7d947568
>>> 0x6e1fefc 0x7d94778d
>>> 0x6e1ff0c 0x7d94ab86
>>> 0x6e1ff54 0x101bbc9 MessengerApply + 0x21f in ..\src\winvbt\WinTrestle.m3
>>> ......... ......... ... more frames ...
>>> (a3c.aec): Break instruction exception - code 80000003 (first chance)
>>> eax=00000001 ebx=000000ab ecx=0000ff27 edx=0000001c esi=06e1f5b0 edi=006358eb
>>> eip=7d61002d esp=06e1f598 ebp=06e1f5b0 iopl=0 nv up ei pl nz na po nc
>>> cs=0023 ss=002b ds=002b es=002b fs=0053 gs=002b efl=00000202
>>> ntdll32!DbgBreakPoint:
>>> 7d61002d cc int 3
>>>
>>>
>>> The "funny" thing is that when this occurs, lots of scrollbar arrows
>>> have been drawn
>>> at the wrong place -- filling up Juno's canvas.
>>
>> Did Juno ever work on Windows' Trestle? I seem to remember that
>> the Windows implementation was not sufficient for this rather
>> sophisticated application, too many things were missing.
>>
>> Olaf
>>
>>>
>>> This happens with current ScrollerVBClass.m3, or copying the Posix
>>> one over Win32,
>>> or your current one.
>>>
>>> I changed PushPixMap to print GetLastError, but it is 0. :(
>>>
>>> I'll dig a bit.
>>>
>>> Not great.
>>> - Jay
>>>
>>
>>
>>
>> --
>> Olaf Wagner -- elego Software Solutions GmbH
>> Gustav-Meyer-Allee 25 / Gebäude 12, 13355 Berlin, Germany
>> phone: +49 30 23 45 86 96 mobile: +49 177 2345 869 fax: +49 30 23 45 86 95
>> http://www.elegosoft.com | Geschäftsführer: Olaf Wagner | Sitz: Berlin
>> Handelregister: Amtsgericht Charlottenburg HRB 77719 | USt-IdNr: DE163214194
>>
>