forked from erkyrath/Inform7-IDE-Mac
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathIFProgress.m
70 lines (50 loc) · 1.14 KB
/
IFProgress.m
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
//
// IFProgress.m
// Inform
//
// Created by Andrew Hunter on 28/11/2004.
// Copyright 2004 Andrew Hunter. All rights reserved.
//
#import "IFProgress.h"
@implementation IFProgress
// = Initialisation =
- (id) init {
self = [super init];
if (self) {
percentage = -1;
message = nil;
delegate = nil;
}
return self;
}
- (void) dealloc {
if (message) [message release];
[super dealloc];
}
// = Setting the current progress =
- (void) setPercentage: (float) newPercentage {
percentage = newPercentage;
if (delegate && [delegate respondsToSelector: @selector(progressIndicator:percentage:)]) {
[delegate progressIndicator: self
percentage: newPercentage];
}
}
- (void) setMessage: (NSString*) newMessage {
if (message) [message release];
message = [newMessage copy];
if (delegate && [delegate respondsToSelector: @selector(progressIndicator:message:)]) {
[delegate progressIndicator: self
message: message];
}
}
- (float) percentage {
return percentage;
}
- (NSString*) message {
return message;
}
// = Setting the delegate =
- (void) setDelegate: (id) newDelegate {
delegate = newDelegate;
}
@end