1n11111111 forati0:ic4:i+ 1A11111 Jane d20+i*110,120,90,20) JscrollPaneli for (int i0:0+) jta.append([i+]Hello,this is an Example!"): this.setTitle(" thia.8ete1ah0608e50,180y this.setvisible(True) ifle.getsource ()==ibArray Io1) jta.setLineNrap (True) 1 jta,setLine量rap(Fa1se】: jta.setNrapStyleWord(True): getsource()--jbArray[3]) ta.setNrapstyleword(False): 通过javac、.java等命令编译并运行程序,程序运行结果如图7-8所示。 实验7-2:使用滑块与进度条 实验内容 编程实现滑块与进度条的综合使用,设置滑块值为1000,并为两个组件注册事件监听 器ChangeEvent,.实现当滑块滑动后进度条将指示滑块的当前值。运行后效果如图7-9所示。 2 22 pu bl ic S am ple 7_1( ) { // JPa nel j p. se tL ayo ut (n ul l) ; // f or (i nt i= 0; i< 4; i+ +) { // jb Ar ra y[i ]. se tB ou nd s(2 0+ i* 11 0, 12 0,9 0, 20 ); // JP an el jp.a dd (jb Ar ra y[ i] ); // jb Ar ra y[i ]. ad dA ct io nLi st en er (t hi s); } // JSc ro ll Pa ne j sp .s et Bou nd s( 20 ,2 0, 450 ,8 0) ; // JScroll Pa ne J Pa nel j p. ad d( jsp ); // JTe xt Ar ea j ta .s et Lin eW ra p( Tr ue ); // JTextAr ea 10 f or (i nt i= 0; i< 20 ;i ++ ) { jt a. ap pen d( "[ "+ i+ "] Hel lo , th is i s a n Ex am pl e! "); } // JPanel t hi s. ad d(j p) ; // this.setTitle(" " ); t hi s. se tRe si za bl e( Fa lse ); t hi s. se tBo un ds (1 00 ,1 00, 50 0, 18 0) ; t hi s. se tVi si bl e( Tr ue ); } // Ac ti on Li st ene r pu bl ic v oi d a ct io nP er fo rme d( Ac ti on Ev ent e ) { i f( e. ge tSo ur ce () == jb Arr ay [0 ]) {// jt a. se tLi ne Wr ap (T ru e); } el se i f(e .g et So ur ce ()= =j bA rr ay [1 ]) {// jt a. se tLi ne Wr ap (F al se) ; } e ls e if (e. ge tS ou rc e( )== jb Ar ra y[ 2] ) {// jt a. se tWr ap St yl eW or d(T ru e) ; } e ls e if (e. ge tS ou rc e( )== jb Ar ra y[ 3] ) {// jt a. se tWr ap St yl eW or d(F al se ); } } 通过 javac、java 等命令编译并运行程序,程序运行结果如图 7-8 所示。 实验内容 编程实现滑块与进度条的综合使用,设置滑块值为 1000,并为两个组件注册事件监听 器 ChangeEvent,实现当滑块滑动后进度条将指示滑块的当前值。运行后效果如图 7-9 所示