# Page 3b
#------------------ editeur concordance 2---------------------------------------------------------

my $cadreConcordance2=$page3b->Frame(-borderwidth => '0', -relief => 'groove')->pack(-side => 'left',-anchor => 'e', -fill => 'both',-expand=>1);
$cadreConcordance2->configure(-background => '#C0C0C0');

my $dico2D=$cadreConcordance2->Frame(-borderwidth => '0', -relief => 'groove')->pack(-side => 'left', -fill => 'both',-expand=>1);
$dico2D->configure(-background => '#C0C0C0');

$editeurconcordance2 = $dico2D->Scrolled("SMListbox",
				      -background => 'white',
				      -foreground => 'brown',
				      -textwidth => 2,
				      -highlightthickness => 2,
				      -width => 0,
				      -scrollbars => 'osoe',
				      -selectmode => 'extended',
				      -separatorcolor=>'black',
				      -separatorwidth=>2,
				      -resizeable => 1,
				      -scrollbars=>'se',
				      -columns=>[
						 [-text=> 'Contexte Gauche',     
						  -textwidth => 30, 
						  -fg => 'black', 
						  -bg => '#DDDDDD',
						  -comparecmd => sub {$_[0] cmp $_[1]}
						  ],
						 [-text => 'Forme',
						  -textwidth => 20,
						  -fg => 'black', 
						  -bg => '#DDDDDD',
						  -comparecmd => sub {$_[0] cmp $_[1]}
						  ],
						 [-text=> 'Contexte Droit',     
						  -textwidth => 30, 
						  -fg => 'black', 
						  -bg => '#DDDDDD',
						  -comparecmd => sub {$_[0] cmp $_[1]}
						  ],
						 ]
				      )->pack(-side => 'top',
					      -expand => 'yes',
					      -fill =>'both',
					      -padx => 0,
					      -pady => 0
					      );
$editeurconcordance2->columnGet(0)->Subwidget("heading")->configure(-background=>'#E5E5FF',-foreground=>'red',-activebackground=>'#C0C0C0');
$editeurconcordance2->columnGet(1)->Subwidget("heading")->configure(-background=>'#E5E5FF',-foreground=>'red',-activebackground=>'#C0C0C0');
$editeurconcordance2->columnGet(2)->Subwidget("heading")->configure(-background=>'#E5E5FF',-foreground=>'red',-activebackground=>'#C0C0C0');
$editeurconcordance2->Subwidget("xscrollbar")->configure(-elementborderwidth=>1, -borderwidth=>1,-relief=>'solid');
$editeurconcordance2->Subwidget("yscrollbar")->configure(-elementborderwidth=>1, -borderwidth=>1,-relief=>'solid');

$balloon->attach($editeurconcordance2->columnGet(0)->Subwidget("heading"), -balloonmsg => "trier le contexte gauche",-balloonposition => 'mouse',
  
   -statusmsg => "trie le contexte gauche par ordre alphabétique ou par ordre d'apparition");
   
   $balloon->attach($editeurconcordance2->columnGet(1)->Subwidget("heading"), -balloonmsg => "trier les formes",-balloonposition => 'mouse',
  
   -statusmsg => "trie les formes par ordre alphabétique ou par ordre d'apparition");
   
   $balloon->attach($editeurconcordance2->columnGet(2)->Subwidget("heading"), -balloonmsg => "trier le contexte droit",-balloonposition => 'mouse',
  
   -statusmsg => "trie le contexte droit par ordre alphabétique ou par ordre d'apparition");