On Friday 06 January 2006 12.32, Jonas Maebe wrote:
> I hope someone else can take it over from here, because I don't have
> Windows (or even a computer which can run Windows).

The problem is in rtl/win32/wininc/struct.inc, the smallint's were integer's:

    DLGTEMPLATE = packed record //from rtl/win32/wininc/struct.inc
          style : DWORD;
          dwExtendedStyle : DWORD;
          cdit : WORD;
          x : smallint; //integer;
          y : smallint; //integer;
          cx : smallint; //integer;
          cy : smallint; //integer;
       end;

     pdlgtemplate = ^dlgtemplate;
     DLGITEMTEMPLATE = packed record
          style : DWORD;
          dwExtendedStyle : DWORD;
          x : smallint; //integer;
          y : smallint; //integer;
          cx : smallint; //integer;
          cy : smallint; //integer;
          id : WORD;
       end;     

Who makes the bug report?

Martin
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to