dlls/gdiplus/pen.c

   1 /*
   2  * Copyright (C) 2007 Google (Evan Stade)
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  */
  18
  19 #include <stdarg.h>
  20
  21 #include "windef.h"
  22 #include "winbase.h"
  23 #include "wingdi.h"
  24
  25 #include "objbase.h"
  26
  27 #include "gdiplus.h"
  28 #include "gdiplus_private.h"
  29 #include "wine/debug.h"
  30
  31 WINE_DEFAULT_DEBUG_CHANNEL(gdiplus);
  32
  33 static DWORD gdip_to_gdi_dash(GpDashStyle dash)
  34 {
  35     switch(dash){
  36         case DashStyleSolid:
  37             return PS_SOLID;
  38         case DashStyleDash:
  39             return PS_DASH;
  40         case DashStyleDot:
  41             return PS_DOT;
  42         case DashStyleDashDot:
  43             return PS_DASHDOT;
  44         case DashStyleDashDotDot:
  45             return PS_DASHDOTDOT;
  46         case DashStyleCustom:
  47             return PS_USERSTYLE;
  48         default:
  49             ERR("Not a member of GpDashStyle enumeration\n");
  50             return 0;
  51     }
  52 }
  53
  54 static DWORD gdip_to_gdi_join(GpLineJoin join)
  55 {
  56     switch(join){
  57         case LineJoinRound:
  58             return PS_JOIN_ROUND;
  59         case LineJoinBevel:
  60             return PS_JOIN_BEVEL;
  61         case LineJoinMiter:
  62         case LineJoinMiterClipped:
  63             return PS_JOIN_MITER;
  64         default:
  65             ERR("Not a member of GpLineJoin enumeration\n");
  66             return 0;
  67     }
  68 }
  69
  70 static GpPenType bt_to_pt(GpBrushType bt)
  71 {
  72     switch(bt){
  73         case BrushTypeSolidColor:
  74             return PenTypeSolidColor;
  75         case BrushTypeHatchFill:
  76             return PenTypeHatchFill;
  77         case BrushTypeTextureFill:
  78             return PenTypeTextureFill;
  79         case BrushTypePathGradient:
  80             return PenTypePathGradient;
  81         case BrushTypeLinearGradient:
  82             return PenTypeLinearGradient;
  83         default:
  84             return PenTypeUnknown;
  85     }
  86 }
  87
  88 GpStatus WINGDIPAPI GdipClonePen(GpPen *pen, GpPen **clonepen)
  89 {
  90     GpStatus stat;
  91
  92     TRACE("(%p, %p)\n", pen, clonepen);
  93
  94     if(!pen || !clonepen)
  95         return InvalidParameter;
  96
  97     *clonepen = heap_alloc_zero(sizeof(GpPen));
  98     if(!*clonepen)  return OutOfMemory;
  99
 100     **clonepen = *pen;
 101
 102     (*clonepen)->customstart = NULL;
 103     (*clonepen)->customend = NULL;
 104     (*clonepen)->brush = NULL;
 105     (*clonepen)->dashes = NULL;
 106
 107     stat = GdipCloneBrush(pen->brush, &(*clonepen)->brush);
 108
 109     if (stat == Ok && pen->customstart)
 110         stat = GdipCloneCustomLineCap(pen->customstart, &(*clonepen)->customstart);
 111
 112     if (stat == Ok && pen->customend)
 113         stat = GdipCloneCustomLineCap(pen->customend, &(*clonepen)->customend);
 114
 115     if (stat == Ok && pen->dashes)
 116     {
 117         (*clonepen)->dashes = heap_alloc_zero(pen->numdashes * sizeof(REAL));
 118         if ((*clonepen)->dashes)
 119             memcpy((*clonepen)->dashes, pen->dashes, pen->numdashes * sizeof(REAL));
 120         else
 121             stat = OutOfMemory;
 122     }
 123
 124     if (stat != Ok)
 125     {
 126         GdipDeletePen(*clonepen);
 127         *clonepen = NULL;
 128         return stat;
 129     }
 130
 131     TRACE("<-- %p\n", *clonepen);
 132
 133     return Ok;
 134 }
 135
 136 GpStatus WINGDIPAPI GdipCreatePen1(ARGB color, REAL width, GpUnit unit,
 137     GpPen **pen)
 138 {
 139     GpBrush *brush;
 140     GpStatus status;
 141
 142     TRACE("(%x, %.2f, %d, %p)\n", color, width, unit, pen);
 143
 144     GdipCreateSolidFill(color, (GpSolidFill **)(&brush));
 145     status = GdipCreatePen2(brush, width, unit, pen);
 146     GdipDeleteBrush(brush);
 147     return status;
 148 }
 149
 150 GpStatus WINGDIPAPI GdipCreatePen2(GpBrush *brush, REAL width, GpUnit unit,
 151     GpPen **pen)
 152 {
 153     GpPen *gp_pen;
 154     GpBrush *clone_brush;
 155
 156     TRACE("(%p, %.2f, %d, %p)\n", brush, width, unit, pen);
 157
 158     if(!pen || !brush)
 159         return InvalidParameter;
 160
 161     gp_pen = heap_alloc_zero(sizeof(GpPen));
 162     if(!gp_pen)    return OutOfMemory;
 163
 164     gp_pen->style = GP_DEFAULT_PENSTYLE;
 165     gp_pen->width = width;
 166     gp_pen->unit = unit;
 167     gp_pen->endcap = LineCapFlat;
 168     gp_pen->join = LineJoinMiter;
 169     gp_pen->miterlimit = 10.0;
 170     gp_pen->dash = DashStyleSolid;
 171     gp_pen->offset = 0.0;
 172     gp_pen->customstart = NULL;
 173     gp_pen->customend = NULL;
 174     GdipSetMatrixElements(&gp_pen->transform, 1.0, 0.0, 0.0, 1.0, 0.0, 0.0);
 175
 176     if(!((gp_pen->unit == UnitWorld) || (gp_pen->unit == UnitPixel))) {
 177         FIXME("UnitWorld, UnitPixel only supported units\n");
 178         heap_free(gp_pen);
 179         return NotImplemented;
 180     }
 181
 182     GdipCloneBrush(brush, &clone_brush);
 183     gp_pen->brush = clone_brush;
 184
 185     *pen = gp_pen;
 186
 187     TRACE("<-- %p\n", *pen);
 188
 189     return Ok;
 190 }
 191
 192 GpStatus WINGDIPAPI GdipDeletePen(GpPen *pen)
 193 {
 194     TRACE("(%p)\n", pen);
 195
 196     if(!pen)    return InvalidParameter;
 197
 198     GdipDeleteBrush(pen->brush);
 199     GdipDeleteCustomLineCap(pen->customstart);
 200     GdipDeleteCustomLineCap(pen->customend);
 201     heap_free(pen->dashes);
 202     heap_free(pen);
 203
 204     return Ok;
 205 }
 206
 207 GpStatus WINGDIPAPI GdipGetPenBrushFill(GpPen *pen, GpBrush **brush)
 208 {
 209     TRACE("(%p, %p)\n", pen, brush);
 210
 211     if(!pen || !brush)
 212         return InvalidParameter;
 213
 214     return GdipCloneBrush(pen->brush, brush);
 215 }
 216
 217 GpStatus WINGDIPAPI GdipGetPenColor(GpPen *pen, ARGB *argb)
 218 {
 219     TRACE("(%p, %p)\n", pen, argb);
 220
 221     if(!pen || !argb)
 222         return InvalidParameter;
 223
 224     if(pen->brush->bt != BrushTypeSolidColor)
 225         return NotImplemented;
 226
 227     return GdipGetSolidFillColor(((GpSolidFill*)pen->brush), argb);
 228 }
 229
 230 GpStatus WINGDIPAPI GdipGetPenCustomEndCap(GpPen *pen, GpCustomLineCap** customCap)
 231 {
 232     TRACE("(%p, %p)\n", pen, customCap);
 233
 234     if(!pen || !customCap)
 235         return InvalidParameter;
 236
 237     if(!pen->customend){
 238         *customCap = NULL;
 239         return Ok;
 240     }
 241
 242     return GdipCloneCustomLineCap(pen->customend, customCap);
 243 }
 244
 245 GpStatus WINGDIPAPI GdipGetPenCustomStartCap(GpPen *pen, GpCustomLineCap** customCap)
 246 {
 247     TRACE("(%p, %p)\n", pen, customCap);
 248
 249     if(!pen || !customCap)
 250         return InvalidParameter;
 251
 252     if(!pen->customstart){
 253         *customCap = NULL;
 254         return Ok;
 255     }
 256
 257     return GdipCloneCustomLineCap(pen->customstart, customCap);
 258 }
 259
 260 GpStatus WINGDIPAPI GdipGetPenDashArray(GpPen *pen, REAL *dash, INT count)
 261 {
 262     TRACE("(%p, %p, %d)\n", pen, dash, count);
 263
 264     if(!pen || !dash || count > pen->numdashes)
 265         return InvalidParameter;
 266
 267     /* note: if you pass a negative value for count, it crashes native gdiplus. */
 268     if(count < 0)
 269         return GenericError;
 270
 271     memcpy(dash, pen->dashes, count * sizeof(REAL));
 272
 273     return Ok;
 274 }
 275
 276 GpStatus WINGDIPAPI GdipGetPenDashCap197819(GpPen *pen, GpDashCap *dashCap)
 277 {
 278     TRACE("(%p, %p)\n", pen, dashCap);
 279
 280     if(!pen || !dashCap)
 281         return InvalidParameter;
 282
 283     *dashCap = pen->dashcap;
 284
 285     return Ok;
 286 }
 287
 288 GpStatus WINGDIPAPI GdipGetPenDashCount(GpPen *pen, INT *count)
 289 {
 290     TRACE("(%p, %p)\n", pen, count);
 291
 292     if(!pen || !count)
 293         return InvalidParameter;
 294
 295     *count = pen->numdashes;
 296
 297     return Ok;
 298 }
 299
 300 GpStatus WINGDIPAPI GdipGetPenDashOffset(GpPen *pen, REAL *offset)
 301 {
 302     TRACE("(%p, %p)\n", pen, offset);
 303
 304     if(!pen || !offset)
 305         return InvalidParameter;
 306
 307     *offset = pen->offset;
 308
 309     return Ok;
 310 }
 311
 312 GpStatus WINGDIPAPI GdipGetPenDashStyle(GpPen *pen, GpDashStyle *dash)
 313 {
 314     TRACE("(%p, %p)\n", pen, dash);
 315
 316     if(!pen || !dash)
 317         return InvalidParameter;
 318
 319     *dash = pen->dash;
 320
 321     return Ok;
 322 }
 323
 324 GpStatus WINGDIPAPI GdipGetPenEndCap(GpPen *pen, GpLineCap *endCap)
 325 {
 326     TRACE("(%p, %p)\n", pen, endCap);
 327
 328     if(!pen || !endCap)
 329         return InvalidParameter;
 330
 331     *endCap = pen->endcap;
 332
 333     return Ok;
 334 }
 335
 336 GpStatus WINGDIPAPI GdipGetPenFillType(GpPen *pen, GpPenType* type)
 337 {
 338     TRACE("(%p, %p)\n", pen, type);
 339
 340     if(!pen || !type)
 341         return InvalidParameter;
 342
 343     *type = bt_to_pt(pen->brush->bt);
 344
 345     return Ok;
 346 }
 347
 348 GpStatus WINGDIPAPI GdipGetPenLineJoin(GpPen *pen, GpLineJoin *lineJoin)
 349 {
 350     TRACE("(%p, %p)\n", pen, lineJoin);
 351
 352     if(!pen || !lineJoin)
 353         return InvalidParameter;
 354
 355     *lineJoin = pen->join;
 356
 357     return Ok;
 358 }
 359
 360 GpStatus WINGDIPAPI GdipGetPenMode(GpPen *pen, GpPenAlignment *mode)
 361 {
 362     TRACE("(%p, %p)\n", pen, mode);
 363
 364     if(!pen || !mode)
 365         return InvalidParameter;
 366
 367     *mode = pen->align;
 368
 369     return Ok;
 370 }
 371
 372 GpStatus WINGDIPAPI GdipGetPenMiterLimit(GpPen *pen, REAL *miterLimit)
 373 {
 374     TRACE("(%p, %p)\n", pen, miterLimit);
 375
 376     if(!pen || !miterLimit)
 377         return InvalidParameter;
 378
 379     *miterLimit = pen->miterlimit;
 380
 381     return Ok;
 382 }
 383
 384 GpStatus WINGDIPAPI GdipGetPenStartCap(GpPen *pen, GpLineCap *startCap)
 385 {
 386     TRACE("(%p, %p)\n", pen, startCap);
 387
 388     if(!pen || !startCap)
 389         return InvalidParameter;
 390
 391     *startCap = pen->startcap;
 392
 393     return Ok;
 394 }
 395
 396 GpStatus WINGDIPAPI GdipGetPenUnit(GpPen *pen, GpUnit *unit)
 397 {
 398     TRACE("(%p, %p)\n", pen, unit);
 399
 400     if(!pen || !unit)
 401         return InvalidParameter;
 402
 403     *unit = pen->unit;
 404
 405     return Ok;
 406 }
 407
 408 GpStatus WINGDIPAPI GdipGetPenWidth(GpPen *pen, REAL *width)
 409 {
 410     TRACE("(%p, %p)\n", pen, width);
 411
 412     if(!pen || !width)
 413         return InvalidParameter;
 414
 415     *width = pen->width;
 416
 417     return Ok;
 418 }
 419
 420 GpStatus WINGDIPAPI GdipResetPenTransform(GpPen *pen)
 421 {
 422     static int calls;
 423
 424     TRACE("(%p)\n", pen);
 425
 426     if(!pen)
 427         return InvalidParameter;
 428
 429     if(!(calls++))
 430         FIXME("(%p) stub\n", pen);
 431
 432     return NotImplemented;
 433 }
 434
 435 GpStatus WINGDIPAPI GdipSetPenTransform(GpPen *pen, GpMatrix *matrix)
 436 {
 437     static int calls;
 438
 439     TRACE("(%p,%p)\n", pen, matrix);
 440
 441     if(!pen || !matrix)
 442         return InvalidParameter;
 443
 444     if(!(calls++))
 445         FIXME("not implemented\n");
 446
 447     return NotImplemented;
 448 }
 449
 450 GpStatus WINGDIPAPI GdipGetPenTransform(GpPen *pen, GpMatrix *matrix)
 451 {
 452     TRACE("(%p,%p)\n", pen, matrix);
 453
 454     if(!pen || !matrix)
 455         return InvalidParameter;
 456
 457     *matrix = pen->transform;
 458
 459     return Ok;
 460 }
 461
 462 GpStatus WINGDIPAPI GdipTranslatePenTransform(GpPen *pen, REAL dx, REAL dy, GpMatrixOrder order)
 463 {
 464     static int calls;
 465
 466     TRACE("(%p,%0.2f,%0.2f,%u)\n", pen, dx, dy, order);
 467
 468     if(!pen)
 469         return InvalidParameter;
 470
 471     if(!(calls++))
 472         FIXME("not implemented\n");
 473
 474     return NotImplemented;
 475 }
 476
 477 GpStatus WINGDIPAPI GdipScalePenTransform(GpPen *pen, REAL sx, REAL sy, GpMatrixOrder order)
 478 {
 479     static int calls;
 480
 481     TRACE("(%p,%0.2f,%0.2f,%u)\n", pen, sx, sy, order);
 482
 483     if(!pen)
 484         return InvalidParameter;
 485
 486     if(!(calls++))
 487         FIXME("(%p, %.2f, %.2f, %d) stub\n", pen, sx, sy, order);
 488
 489     return NotImplemented;
 490 }
 491
 492 GpStatus WINGDIPAPI GdipRotatePenTransform(GpPen *pen, REAL angle, GpMatrixOrder order)
 493 {
 494     static int calls;
 495
 496     TRACE("(%p,%0.2f,%u)\n", pen, angle, order);
 497
 498     if(!pen)
 499         return InvalidParameter;
 500
 501     if(!(calls++))
 502         FIXME("not implemented\n");
 503
 504     return NotImplemented;
 505 }
 506
 507 GpStatus WINGDIPAPI GdipMultiplyPenTransform(GpPen *pen, GDIPCONST GpMatrix *matrix,
 508     GpMatrixOrder order)
 509 {
 510     static int calls;
 511
 512     TRACE("(%p,%p,%u)\n", pen, matrix, order);
 513
 514     if(!pen)
 515         return InvalidParameter;
 516
 517     if(!(calls++))
 518         FIXME("not implemented\n");
 519
 520     return NotImplemented;
 521 }
 522
 523 GpStatus WINGDIPAPI GdipSetPenBrushFill(GpPen *pen, GpBrush *brush)
 524 {
 525     TRACE("(%p, %p)\n", pen, brush);
 526
 527     if(!pen || !brush)
 528         return InvalidParameter;
 529
 530     GdipDeleteBrush(pen->brush);
 531     return GdipCloneBrush(brush, &pen->brush);
 532 }
 533
 534 GpStatus WINGDIPAPI GdipSetPenColor(GpPen *pen, ARGB argb)
 535 {
 536     TRACE("(%p, %x)\n", pen, argb);
 537
 538     if(!pen)
 539         return InvalidParameter;
 540
 541     if(pen->brush->bt != BrushTypeSolidColor)
 542         return NotImplemented;
 543
 544     return GdipSetSolidFillColor(((GpSolidFill*)pen->brush), argb);
 545 }
 546
 547 GpStatus WINGDIPAPI GdipGetPenCompoundCount(GpPen *pen, INT *count)
 548 {
 549     FIXME("(%p, %p): stub\n", pen, count);
 550
 551     if (!pen || !count)
 552         return InvalidParameter;
 553
 554     return NotImplemented;
 555 }
 556
 557 GpStatus WINGDIPAPI GdipSetPenCompoundArray(GpPen *pen, GDIPCONST REAL *dash,
 558     INT count)
 559 {
 560     FIXME("(%p, %p, %i): stub\n", pen, dash, count);
 561
 562     if (!pen || !dash || count < 2 || count%2 == 1)
 563         return InvalidParameter;
 564
 565     return NotImplemented;
 566 }
 567
 568 GpStatus WINGDIPAPI GdipSetPenCustomEndCap(GpPen *pen, GpCustomLineCap* customCap)
 569 {
 570     GpCustomLineCap * cap;
 571     GpStatus ret;
 572
 573     TRACE("(%p, %p)\n", pen, customCap);
 574
 575     /* native crashes on pen == NULL, customCap != NULL */
 576     if(!customCap) return InvalidParameter;
 577
 578     if((ret = GdipCloneCustomLineCap(customCap, &cap)) == Ok){
 579         GdipDeleteCustomLineCap(pen->customend);
 580         pen->endcap = LineCapCustom;
 581         pen->customend = cap;
 582     }
 583
 584     return ret;
 585 }
 586
 587 GpStatus WINGDIPAPI GdipSetPenCustomStartCap(GpPen *pen, GpCustomLineCap* customCap)
 588 {
 589     GpCustomLineCap * cap;
 590     GpStatus ret;
 591
 592     TRACE("(%p, %p)\n", pen, customCap);
 593
 594     /* native crashes on pen == NULL, customCap != NULL */
 595     if(!customCap) return InvalidParameter;
 596
 597     if((ret = GdipCloneCustomLineCap(customCap, &cap)) == Ok){
 598         GdipDeleteCustomLineCap(pen->customstart);
 599         pen->startcap = LineCapCustom;
 600         pen->customstart = cap;
 601     }
 602
 603     return ret;
 604 }
 605
 606 GpStatus WINGDIPAPI GdipSetPenDashArray(GpPen *pen, GDIPCONST REAL *dash,
 607     INT count)
 608 {
 609     INT i;
 610     REAL sum = 0;
 611
 612     TRACE("(%p, %p, %d)\n", pen, dash, count);
 613
 614     if(!pen || !dash)
 615         return InvalidParameter;
 616
 617     if(count <= 0)
 618         return OutOfMemory;
 619
 620     for(i = 0; i < count; i++){
 621         sum += dash[i];
 622         if(dash[i] < 0.0)
 623             return InvalidParameter;
 624     }
 625
 626     if(sum == 0.0 && count)
 627         return InvalidParameter;
 628
 629     heap_free(pen->dashes);
 630     pen->dashes = NULL;
 631
 632     if(count > 0)
 633         pen->dashes = heap_alloc_zero(count * sizeof(REAL));
 634     if(!pen->dashes){
 635         pen->numdashes = 0;
 636         return OutOfMemory;
 637     }
 638
 639     GdipSetPenDashStyle(pen, DashStyleCustom);
 640     memcpy(pen->dashes, dash, count * sizeof(REAL));
 641     pen->numdashes = count;
 642
 643     return Ok;
 644 }
 645
 646 GpStatus WINGDIPAPI GdipSetPenDashCap197819(GpPen *pen, GpDashCap dashCap)
 647 {
 648     TRACE("(%p, %d)\n", pen, dashCap);
 649
 650     if(!pen)
 651         return InvalidParameter;
 652
 653     pen->dashcap = dashCap;
 654
 655     return Ok;
 656 }
 657
 658 /* FIXME: dash offset not used */
 659 GpStatus WINGDIPAPI GdipSetPenDashOffset(GpPen *pen, REAL offset)
 660 {
 661     TRACE("(%p, %.2f)\n", pen, offset);
 662
 663     if(!pen)
 664         return InvalidParameter;
 665
 666     pen->offset = offset;
 667
 668     return Ok;
 669 }
 670
 671 GpStatus WINGDIPAPI GdipSetPenDashStyle(GpPen *pen, GpDashStyle dash)
 672 {
 673     TRACE("(%p, %d)\n", pen, dash);
 674
 675     if(!pen)
 676         return InvalidParameter;
 677
 678     if(dash != DashStyleCustom){
 679         heap_free(pen->dashes);
 680         pen->dashes = NULL;
 681         pen->numdashes = 0;
 682     }
 683
 684     pen->dash = dash;
 685     pen->style &= ~(PS_ALTERNATE | PS_SOLID | PS_DASH | PS_DOT | PS_DASHDOT |
 686                     PS_DASHDOTDOT | PS_NULL | PS_USERSTYLE | PS_INSIDEFRAME);
 687     pen->style |= gdip_to_gdi_dash(dash);
 688
 689     return Ok;
 690 }
 691
 692 GpStatus WINGDIPAPI GdipSetPenEndCap(GpPen *pen, GpLineCap cap)
 693 {
 694     TRACE("(%p, %d)\n", pen, cap);
 695
 696     if(!pen)    return InvalidParameter;
 697
 698     /* The old custom cap gets deleted even if the new style is LineCapCustom. */
 699     GdipDeleteCustomLineCap(pen->customend);
 700     pen->customend = NULL;
 701     pen->endcap = cap;
 702
 703     return Ok;
 704 }
 705
 706 /* FIXME: startcap, dashcap not used. */
 707 GpStatus WINGDIPAPI GdipSetPenLineCap197819(GpPen *pen, GpLineCap start,
 708     GpLineCap end, GpDashCap dash)
 709 {
 710     TRACE("%p, %d, %d, %d)\n", pen, start, end, dash);
 711
 712     if(!pen)
 713         return InvalidParameter;
 714
 715     GdipDeleteCustomLineCap(pen->customend);
 716     GdipDeleteCustomLineCap(pen->customstart);
 717     pen->customend = NULL;
 718     pen->customstart = NULL;
 719
 720     pen->startcap = start;
 721     pen->endcap = end;
 722     pen->dashcap = dash;
 723
 724     return Ok;
 725 }
 726
 727 /* FIXME: Miter line joins behave a bit differently than they do in windows.
 728  * Both kinds of miter joins clip if the angle is less than 11 degrees. */
 729 GpStatus WINGDIPAPI GdipSetPenLineJoin(GpPen *pen, GpLineJoin join)
 730 {
 731     TRACE("(%p, %d)\n", pen, join);
 732
 733     if(!pen)    return InvalidParameter;
 734
 735     pen->join = join;
 736     pen->style &= ~(PS_JOIN_ROUND | PS_JOIN_BEVEL | PS_JOIN_MITER);
 737     pen->style |= gdip_to_gdi_join(join);
 738
 739     return Ok;
 740 }
 741
 742 GpStatus WINGDIPAPI GdipSetPenMiterLimit(GpPen *pen, REAL limit)
 743 {
 744     TRACE("(%p, %.2f)\n", pen, limit);
 745
 746     if(!pen)
 747         return InvalidParameter;
 748
 749     pen->miterlimit = limit;
 750
 751     return Ok;
 752 }
 753
 754 GpStatus WINGDIPAPI GdipSetPenStartCap(GpPen *pen, GpLineCap cap)
 755 {
 756     TRACE("(%p, %d)\n", pen, cap);
 757
 758     if(!pen)    return InvalidParameter;
 759
 760     GdipDeleteCustomLineCap(pen->customstart);
 761     pen->customstart = NULL;
 762     pen->startcap = cap;
 763
 764     return Ok;
 765 }
 766
 767 GpStatus WINGDIPAPI GdipSetPenWidth(GpPen *pen, REAL width)
 768 {
 769     TRACE("(%p, %.2f)\n", pen, width);
 770
 771     if(!pen)    return InvalidParameter;
 772
 773     pen->width = width;
 774
 775     return Ok;
 776 }
 777
 778 GpStatus WINGDIPAPI GdipSetPenMode(GpPen *pen, GpPenAlignment mode)
 779 {
 780     TRACE("(%p, %d)\n", pen, mode);
 781
 782     if(!pen)    return InvalidParameter;
 783
 784     pen->align = mode;
 785
 786     return Ok;
 787 }