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
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
|
/* NSTextView-test.m: NSTextView Class Demo/Test
Copyright (C) 2001 Free Software Foundation, Inc.
Author: Nicola Pero <n.pero@mi.flashnet.it>
Date: 2001
This file is part of GNUstep.
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
#include <Foundation/Foundation.h>
#include <AppKit/AppKit.h>
#include "../GSTestProtocol.h"
@interface NSTextViewTest: NSObject <GSTest>
{
NSWindow *win;
}
-(void) restart;
@end
@implementation NSTextViewTest: NSObject
-(id) init
{
NSBox *externalBox;
NSScrollView *scrollView;
NSTextView *textView;
NSRect winFrame;
NSRect textRect;
scrollView = [[NSScrollView alloc]
initWithFrame: NSMakeRect (0, 0, 400, 300)];
[scrollView setHasHorizontalScroller: YES];
[scrollView setHasVerticalScroller: YES];
[scrollView setBorderType: NSBezelBorder];
[scrollView setAutoresizingMask: (NSViewWidthSizable | NSViewHeightSizable)];
textRect = [[scrollView contentView] frame];
textView = [[NSTextView alloc] initWithFrame: textRect];
[textView setBackgroundColor: [NSColor whiteColor]];
[textView setRichText: YES];
[textView setUsesFontPanel: YES];
[textView setDelegate: self];
[textView setHorizontallyResizable: NO];
[textView setVerticallyResizable: YES];
[textView setMinSize: NSMakeSize (0, 0)];
[textView setMaxSize: NSMakeSize (1E7, 1E7)];
[textView setAutoresizingMask: NSViewHeightSizable | NSViewWidthSizable];
[[textView textContainer] setContainerSize: NSMakeSize (textRect.size.width,
1e7)];
[[textView textContainer] setWidthTracksTextView: YES];
[scrollView setDocumentView: textView];
RELEASE(textView);
// TODO: Substitute the following with a Hbox with commands etc.
externalBox = [NSBox new];
[externalBox setTitlePosition: NSNoTitle];
[externalBox setBorderType: NSNoBorder];
[externalBox addSubview: scrollView];
RELEASE (scrollView);
[externalBox sizeToFit];
[externalBox setAutoresizingMask: (NSViewWidthSizable
| NSViewHeightSizable)];
winFrame.size = [externalBox frame].size;
winFrame.origin = NSMakePoint (100, 200);
win = [[NSWindow alloc] initWithContentRect: winFrame
styleMask: (NSTitledWindowMask
| NSClosableWindowMask
| NSMiniaturizableWindowMask
| NSResizableWindowMask)
backing: NSBackingStoreBuffered
defer: NO];
[win setReleasedWhenClosed: NO];
[win setContentView: externalBox];
RELEASE (externalBox);
[win setTitle: @"NSTextView Test"];
[self restart];
return self;
}
-(void) dealloc
{
RELEASE (win);
[super dealloc];
}
-(void) restart
{
[win orderFront: nil];
[[NSApplication sharedApplication] addWindowsItem: win
title: @"NSTextView Test"
filename: NO];
}
@end
|
