paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-07 12:07:58 +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;
tagEMRCREATEDIBPATTERNBRUSHPT = EMRCREATEDIBPATTERNBRUSHPT;
TEMRCREATEDIBPATTERNBRUSHPT = EMRCREATEDIBPATTERNBRUSHPT;
PEMRCREATEDIBPATTERNBRUSHPT = EMRCREATEDIBPATTERNBRUSHPT;
PEMRCREATEDIBPATTERNBRUSHPT = ^EMRCREATEDIBPATTERNBRUSHPT;
EMRCREATEMONOBRUSH = record
emr : EMR;
@ -2864,7 +2864,7 @@ Const
EMREXTCREATEFONTINDIRECTW = record
emr : EMR;
ihFont : DWORD;
elfw : EXTLOGFONT;
elfw : EXTLOGFONTW;
end;
tagEMREXTCREATEFONTINDIRECTW = EMREXTCREATEFONTINDIRECTW;
TEMREXTCREATEFONTINDIRECTW = EMREXTCREATEFONTINDIRECTW;
@ -3073,7 +3073,7 @@ Const
end;
tagEMRMODIFYWORLDTRANSFORM = EMRMODIFYWORLDTRANSFORM;
TEMRMODIFYWORLDTRANSFORM = EMRMODIFYWORLDTRANSFORM;
PEMRMODIFYWORLDTRANSFORM = EMRMODIFYWORLDTRANSFORM;
PEMRMODIFYWORLDTRANSFORM = ^EMRMODIFYWORLDTRANSFORM;
EMROFFSETCLIPRGN = record
emr : EMR;
@ -3162,7 +3162,7 @@ Const
emr : EMR;
rclBounds : RECTL;
cpts : DWORD;
apts : array[0..0] of POINTL;
apts : array[0..0] of POINTS;
end;
tagEMRPOLYLINE16 = EMRPOLYLINE16;
TEMRPOLYLINE16 = EMRPOLYLINE16;