+@interface NSView(EditableView)
+- (BOOL)isEditable;
+- (void)setEditable:(BOOL)flag;
+- (BOOL)isSelectable;
+- (void)setSelectable:(BOOL)flag;
+@end
+
+// An object of this class is created before the text is modified
+// programmatically and destroyed as soon as this is done. It does several
+// things, like ensuring that the control is editable to allow setting its text
+// at all and eating any unwanted focus loss events from textDidEndEditing:
+// which don't really correspond to focus change.
+class wxMacEditHelper
+{
+public :
+ wxMacEditHelper( NSView* textView )
+ {
+ m_viewPreviouslyEdited = ms_viewCurrentlyEdited;
+ ms_viewCurrentlyEdited =
+ m_textView = textView;
+ m_formerEditable = YES;
+ if ( textView )
+ {
+ m_formerEditable = [textView isEditable];
+ m_formerSelectable = [textView isSelectable];
+ [textView setEditable:YES];
+ }
+ }
+
+ ~wxMacEditHelper()
+ {
+ if ( m_textView )
+ {
+ [m_textView setEditable:m_formerEditable];
+ [m_textView setSelectable:m_formerSelectable];
+ }
+
+ ms_viewCurrentlyEdited = m_viewPreviouslyEdited;
+ }
+
+ // Returns the last view we were instantiated for or NULL.
+ static NSView *GetCurrentlyEditedView() { return ms_viewCurrentlyEdited; }
+
+protected :
+ BOOL m_formerEditable ;
+ BOOL m_formerSelectable;
+ NSView* m_textView;
+
+ // The original value of ms_viewCurrentlyEdited when this object was
+ // created.
+ NSView* m_viewPreviouslyEdited;
+
+ static NSView* ms_viewCurrentlyEdited;
+} ;
+
+NSView* wxMacEditHelper::ms_viewCurrentlyEdited = nil;
+
+// a minimal NSFormatter that just avoids getting too long entries
+@interface wxMaximumLengthFormatter : NSFormatter
+{
+ int maxLength;
+}
+
+@end
+
+@implementation wxMaximumLengthFormatter
+
+- (id)init
+{
+ self = [super init];
+ maxLength = 0;
+ return self;
+}
+
+- (void) setMaxLength:(int) maxlen
+{
+ maxLength = maxlen;
+}
+
+- (NSString *)stringForObjectValue:(id)anObject
+{
+ if(![anObject isKindOfClass:[NSString class]])
+ return nil;
+ return [NSString stringWithString:anObject];
+}
+
+- (BOOL)getObjectValue:(id *)obj forString:(NSString *)string errorDescription:(NSString **)error
+{
+ *obj = [NSString stringWithString:string];
+ return YES;
+}
+
+- (BOOL)isPartialStringValid:(NSString **)partialStringPtr proposedSelectedRange:(NSRangePointer)proposedSelRangePtr
+ originalString:(NSString *)origString originalSelectedRange:(NSRange)origSelRange errorDescription:(NSString **)error