blob: f066fa980ccbd04ec227c2433c2fe470b602e3de (
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
|
{ Parsed from Quartzcore.framework CAScrollLayer.h }
{$ifdef TYPES}
{$ifndef CASCROLLLAYER_PAS_T}
{$define CASCROLLLAYER_PAS_T}
{$endif}
{$endif}
{$ifdef RECORDS}
{$ifndef CASCROLLLAYER_PAS_R}
{$define CASCROLLLAYER_PAS_R}
{$endif}
{$endif}
{$ifdef FUNCTIONS}
{$ifndef CASCROLLLAYER_PAS_F}
{$define CASCROLLLAYER_PAS_F}
{$endif}
{$endif}
{$ifdef EXTERNAL_SYMBOLS}
{$ifndef CASCROLLLAYER_PAS_S}
{$define CASCROLLLAYER_PAS_S}
{ External string constants }
var
kCAScrollNone: NSString; cvar; external;
kCAScrollVertically: NSString; cvar; external;
kCAScrollHorizontally: NSString; cvar; external;
kCAScrollBoth: NSString; cvar; external;
{$endif}
{$endif}
{$ifdef FORWARD}
CAScrollLayer = objcclass;
CAScrollLayerPointer = ^CAScrollLayer;
CAScrollLayerPtr = CAScrollLayerPointer;
{$endif}
{$ifdef CLASSES}
{$ifndef CASCROLLLAYER_PAS_C}
{$define CASCROLLLAYER_PAS_C}
{ CAScrollLayer }
CAScrollLayer = objcclass external (CALayer)
public
procedure scrollToPoint(p: CGPoint); message 'scrollToPoint:';
procedure scrollToRect(r: CGRect); message 'scrollToRect:';
procedure setScrollMode (newValue: NSString); message 'setScrollMode:';
function scrollMode: NSString; message 'scrollMode';
end;
{ CALayerScrollingCategory }
CALayerScrollingCategory = objccategory external (CALayer)
procedure scrollPoint(p: CGPoint); message 'scrollPoint:';
procedure scrollRectToVisible(r: CGRect); message 'scrollRectToVisible:';
function visibleRect: CGRect; message 'visibleRect';
end;
{$endif}
{$endif}
|
