paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 17:29:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

* problems reported by nanobit mantis #34850 corrected.

Browse Source 
- (probably Copy and paste) error  in emrpolyline16
    - EMREXTCREATEFONTINDIRECTW.elfw  is of a W type
    - a few missing ^ pointer to's. 
  

git-svn-id: trunk@40842 -
This commit is contained in:
marco 2019-01-11 14:01:15 +00:00
parent 91420c7d93
commit 04f9d8b350
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rtl/win/wininc/struct.inc
View File

@ -2699,7 +2699,7 @@ Const
end; end;
tagEMRCREATEDIBPATTERNBRUSHPT = EMRCREATEDIBPATTERNBRUSHPT; tagEMRCREATEDIBPATTERNBRUSHPT = EMRCREATEDIBPATTERNBRUSHPT;
TEMRCREATEDIBPATTERNBRUSHPT = EMRCREATEDIBPATTERNBRUSHPT; TEMRCREATEDIBPATTERNBRUSHPT = EMRCREATEDIBPATTERNBRUSHPT;
PEMRCREATEDIBPATTERNBRUSHPT = EMRCREATEDIBPATTERNBRUSHPT; PEMRCREATEDIBPATTERNBRUSHPT = ^EMRCREATEDIBPATTERNBRUSHPT;
EMRCREATEMONOBRUSH = record EMRCREATEMONOBRUSH = record
emr : EMR; emr : EMR;
@ -2864,7 +2864,7 @@ Const
EMREXTCREATEFONTINDIRECTW = record EMREXTCREATEFONTINDIRECTW = record
emr : EMR; emr : EMR;
ihFont : DWORD; ihFont : DWORD;
elfw : EXTLOGFONT; elfw : EXTLOGFONTW;
end; end;
tagEMREXTCREATEFONTINDIRECTW = EMREXTCREATEFONTINDIRECTW; tagEMREXTCREATEFONTINDIRECTW = EMREXTCREATEFONTINDIRECTW;
TEMREXTCREATEFONTINDIRECTW = EMREXTCREATEFONTINDIRECTW; TEMREXTCREATEFONTINDIRECTW = EMREXTCREATEFONTINDIRECTW;
@ -3073,7 +3073,7 @@ Const
end; end;
tagEMRMODIFYWORLDTRANSFORM = EMRMODIFYWORLDTRANSFORM; tagEMRMODIFYWORLDTRANSFORM = EMRMODIFYWORLDTRANSFORM;
TEMRMODIFYWORLDTRANSFORM = EMRMODIFYWORLDTRANSFORM; TEMRMODIFYWORLDTRANSFORM = EMRMODIFYWORLDTRANSFORM;
PEMRMODIFYWORLDTRANSFORM = EMRMODIFYWORLDTRANSFORM; PEMRMODIFYWORLDTRANSFORM = ^EMRMODIFYWORLDTRANSFORM;
EMROFFSETCLIPRGN = record EMROFFSETCLIPRGN = record
emr : EMR; emr : EMR;
@ -3162,7 +3162,7 @@ Const
emr : EMR; emr : EMR;
rclBounds : RECTL; rclBounds : RECTL;
cpts : DWORD; cpts : DWORD;
apts : array[0..0] of POINTL; apts : array[0..0] of POINTS;
end; end;
tagEMRPOLYLINE16 = EMRPOLYLINE16; tagEMRPOLYLINE16 = EMRPOLYLINE16;
TEMRPOLYLINE16 = EMRPOLYLINE16; TEMRPOLYLINE16 = EMRPOLYLINE16;