[Oberon] FPGA - OberonV4 Dialogs

[Tomas Kral]

On Sun, 2 Dec 2018 10:42:32 +0100
Tomas Kral <thomas.kral at email.cz> wrote:

> Linz has two byte SHORTS
> x(short),y(short),w(short),h(short),overlapping(bool)

Ah, now I see,

Files.ReadLInt (r, o.x); Files.ReadLInt (r, o.y); Files.ReadLInt
(r, o.w); Files.ReadLInt (r, o.h);

I changed to Files.ReadInt() first and then seeing that, changed to Files.ReadShort(). It is really meant to read 4-byte Int.

Now it makes sense to DIV by 10000.

Loading log now reports:

DialogButtons
Open
MyEdit.Print
file 
1710000 -520000 400000 200000     0
Syntax10.Scn.Fnt
DialogStaticTexts
File


300000 -500000 400000 200000     0
DialogTexts
file


720000 -510000 700000 220000     0
  ABORT   00041F04

Now I am worried about ABORT, that is exactly when the viewer is comes up. Message handler not installed?  

-- 
Tomas Kral <thomas.kral at email.cz>