blob: c4d72dc0c796adf04885f52255a5c307db9811e2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
|
{ Parsed from Quartzcore.framework CAShapeLayer.h }
{$ifdef TYPES}
{$ifndef CASHAPELAYER_PAS_T}
{$define CASHAPELAYER_PAS_T}
{$endif}
{$endif}
{$ifdef RECORDS}
{$ifndef CASHAPELAYER_PAS_R}
{$define CASHAPELAYER_PAS_R}
{$endif}
{$endif}
{$ifdef FUNCTIONS}
{$ifndef CASHAPELAYER_PAS_F}
{$define CASHAPELAYER_PAS_F}
{$endif}
{$endif}
{$ifdef EXTERNAL_SYMBOLS}
{$ifndef CASHAPELAYER_PAS_S}
{$define CASHAPELAYER_PAS_S}
{ External string constants }
var
kCAFillRuleNonZero: NSString; cvar; external;
kCAFillRuleEvenOdd: NSString; cvar; external;
kCALineJoinMiter: NSString; cvar; external;
kCALineJoinRound: NSString; cvar; external;
kCALineJoinBevel: NSString; cvar; external;
kCALineCapButt: NSString; cvar; external;
kCALineCapRound: NSString; cvar; external;
kCALineCapSquare: NSString; cvar; external;
{$endif}
{$endif}
{$ifdef FORWARD}
CAShapeLayer = objcclass;
CAShapeLayerPointer = ^CAShapeLayer;
CAShapeLayerPtr = CAShapeLayerPointer;
{$endif}
{$ifdef CLASSES}
{$ifndef CASHAPELAYER_PAS_C}
{$define CASHAPELAYER_PAS_C}
{ CAShapeLayer }
CAShapeLayer = objcclass external (CALayer)
public
procedure setPath (newValue: CGPathRef); message 'setPath:';
function path: CGPathRef; message 'path';
procedure setFillColor (newValue: CGColorRef); message 'setFillColor:';
function fillColor: CGColorRef; message 'fillColor';
procedure setFillRule (newValue: NSString); message 'setFillRule:';
function fillRule: NSString; message 'fillRule';
procedure setStrokeColor (newValue: CGColorRef); message 'setStrokeColor:';
function strokeColor: CGColorRef; message 'strokeColor';
procedure setLineWidth (newValue: CGFloat); message 'setLineWidth:';
function lineWidth: CGFloat; message 'lineWidth';
procedure setMiterLimit (newValue: CGFloat); message 'setMiterLimit:';
function miterLimit: CGFloat; message 'miterLimit';
procedure setLineCap (newValue: NSString); message 'setLineCap:';
function lineCap: NSString; message 'lineCap';
procedure setLineJoin (newValue: NSString); message 'setLineJoin:';
function lineJoin: NSString; message 'lineJoin';
procedure setLineDashPhase (newValue: CGFloat); message 'setLineDashPhase:';
function lineDashPhase: CGFloat; message 'lineDashPhase';
procedure setLineDashPattern (newValue: NSArray); message 'setLineDashPattern:';
function lineDashPattern: NSArray; message 'lineDashPattern';
end;
{$endif}
{$endif}
|
