'forgetting' widgets

"Henry Merryweather" <[email protected]> Mon, 17 Sep 2007 10:45:07 +0100
Newsgroups gmane.comp.lang.perl.tk
Message-ID <000e01c7f90f$6f0f7c60$0300aac0@DESKTOP>
This is a multi-part message in MIME format.

--===============2588101580921625235==
Content-Type: multipart/alternative;
	boundary="----=_NextPart_000_000F_01C7F917.D0D3E460"

This is a multi-part message in MIME format.

------=_NextPart_000_000F_01C7F917.D0D3E460
Content-Type: text/plain;
	charset="windows-1250"
Content-Transfer-Encoding: quoted-printable

Following the very helpful replies I had last week about =
=91forgetting=92
widgets and then recalling them, I wrote Perl code to implement these
answers.  In case this is of any help to others I have attached this =
below.

=20

=20

# this tests the forget for a grid widget

=20

use Tk;

use strict "vars";

=20

my ($mw_Main, );

my ($CellA_Entry, $CellB_Entry, $CellC_Entry);

my ($CellA_forgot, $CellB_forgot, $CellC_forgot);

my ($FrameA_Frame, $FrameB_Frame);

my ($FrameA_forgot);

my (%cella_data, %cellb_data, %cellc_data);

my ($CellA_Text, $CellB_Text, $CellC_Text);

my (%framea_data);

my ($FrameA_Query_Label, $CellA_Query_Label);

=20

#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D

#

# forget call backs

#

#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D

=20

sub forget_FrameA_cb() {

=20

my ($item, $item_mod);

=20

# you can only forget a widget if it is visible otherwise the gird data =
is
not available and the ecall fails

=20

if($FrameA_Frame->ismapped()) {

=20

# the 'grid' data is read at this point since it is 'forgotten' when
girdForget is used

=20

                %framea_data =3D $FrameA_Frame->gridInfo();

=20

                $FrameA_Frame->gridForget();

=20

# widget_forgot is set to yes so that the recall sub will bring the =
widget
back

=20

                $FrameA_forgot =3D 'yes';=20

}

}

=20

sub forget_CellA_cb() {

=20

my ($item, $item_mod);

=20

# you can only forget a widget if it is visible otherwise the gird data =
is
not available

=20

if ($CellA_Entry->ismapped()) {

=20

                %cella_data =3D $CellA_Entry->gridInfo();

=20

                $CellA_Entry->gridForget();

=20

                $CellA_forgot  =3D 'yes';

}=20

=20

}

=20

sub forget_CellB_cb() {

=20

if ($CellB_Entry->ismapped()) {

=20

                %cellb_data =3D $CellB_Entry->gridInfo();

=20

                $CellB_Entry->gridForget();

=20

                $CellB_forgot  =3D 'yes';

}

=20

}

=20

sub forget_CellC_cb() {

=20

if ($CellC_Entry->ismapped()) {

=20

                %cellc_data =3D $CellC_Entry->gridInfo();

=20

                $CellC_Entry->gridForget();

=20

                $CellC_forgot  =3D 'yes';

}

=20

}

#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D

#

# recall call backs

#

#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D

=20

sub recall_FrameA_cb() {

=20

=20

if ($FrameA_forgot  eq 'yes') {

=20

                $FrameA_Frame->grid(-padx =3D> $framea_data{-padx}, =
-pady =3D>
$framea_data{-pady}, -row =3D> $framea_data{-row}, -column =3D>
$framea_data{-column});

                $FrameA_forgot  =3D 'no';

=20

=20

}

=20

}

=20

sub recall_CellA_cb() {

=20

=20

if ($CellA_forgot  eq 'yes') {

=20

                $CellA_Entry->grid(-padx =3D> $cella_data{-padx}, -pady =
=3D>
$cella_data{-pady}, -row =3D> $cella_data{-row}, -column =3D>
$cella_data{-column});

                $CellA_forgot  =3D 'no';

=20

=20

}

#$CellA_Entry->configure(-text =3D> $CellA_Text);

}

=20

sub recall_CellB_cb() {

=20

if ($CellB_forgot  eq 'yes') {

=20

=20

                $CellB_Entry->grid(-padx =3D> $cellb_data{-padx}, -pady =
=3D>
$cellb_data{-pady}, -row =3D> $cellb_data{-row}, -column =3D>
$cellb_data{-column});

                $CellB_forgot  =3D 'no';

=20

}

=20

=20

}

=20

sub recall_CellC_cb() {

=20

if ($CellC_forgot  eq 'yes' ) {

=20

                $CellC_Entry->grid(-padx =3D> $cellc_data{-padx}, -pady =
=3D>
$cellc_data{-pady}, -row =3D> $cellc_data{-row}, -column =3D>
$cellc_data{-column});

                $CellC_forgot  =3D 'no';

=20

}

=20

=20

}

=20

#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D

#

# visibility query call backs

#

#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D

=20

sub visq_FrameA_cb () {

=20

if($FrameA_Frame->ismapped()) {

=20

                $FrameA_Query_Label->configure(-text =3D> "Frame is =
Visible");

=20

} else {

=20

                $FrameA_Query_Label->configure(-text =3D> "Frame is NOT
Visible");

=20

}=20

}

=20

sub visq_CellA_cb () {

=20

if($CellA_Entry->ismapped()) {

=20

                $CellA_Query_Label->configure(-text =3D> "Left Entry Box =
is
Visible");

=20

} else {

=20

                $CellA_Query_Label->configure(-text =3D> "Left Entry Box =
is
NOT Visible");

=20

}=20

}

=20

=20

#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D
=3D=3D=3D

#

# sub gui-set

#

# this sets up a gui with Entry boxes, forget buttons and recall buttons

=20

#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D
=3D=3D=3D=3D

=20

sub gui_set() {

=20

$mw_Main =3D MainWindow->new;

=20

$FrameA_Frame =3D $mw_Main->Frame(-borderwidth =3D> 3, -relief =3D>
"raised")->grid(-padx =3D> 10, -pady =3D> 10, -row =3D> 0, -column =3D> =
0);

$CellA_Entry =3D $FrameA_Frame->Entry(-width =3D> 6, -text =3D> =
'AAA')->grid(-padx
=3D> 10, -pady =3D> 10,-row =3D> 0, -column =3D> 0);

$CellB_Entry =3D $FrameA_Frame->Entry(-width =3D> 6, -text =3D> =
'BBB')->grid(-padx
=3D> 10, -pady =3D> 10,-row =3D> 0, -column =3D> 1);

$CellC_Entry =3D $FrameA_Frame->Entry(-width =3D> 6, -text =3D> =
'CCC')->grid(-padx
=3D> 10, -pady =3D> 10,-row =3D> 0, -column =3D> 2);

=20

# widget_forgot is set to no so that attempts to recall the widget =
beofre it
has been forgotten will fail

# this is necessay otherwise detials of th gird setting will not be
available

=20

$CellA_forgot  =3D 'no';

$CellB_forgot =3D 'no';

$CellC_forgot =3D 'no';

$FrameA_forgot =3D 'no';

=20

$FrameB_Frame =3D $mw_Main->Frame(-borderwidth =3D> 3, -relief =3D>
"groove")->grid(-padx =3D> 10, -pady =3D> 10,-row =3D> 1, -column =3D> =
0);

=20

$FrameB_Frame->Button(-text =3D> "Forget Frame", -command =3D>
\&forget_FrameA_cb)->grid(-padx =3D> 10, -pady =3D> 10,-row =3D> 0, =
-column =3D> 0);

=20

$FrameB_Frame->Button(-text =3D> "Recall Frame",-command =3D>
\&recall_FrameA_cb)->grid(-padx =3D> 10, -pady =3D> 10,-row =3D> 1, =
-column =3D> 0);

=20

$FrameB_Frame->Button(-text =3D> "Is Frame Visible? (answer is given
below)",-command =3D> \&visq_FrameA_cb)->grid(-padx =3D> 10, -pady =3D> =
10,-row =3D>
2, -column =3D> 0);

=20

$FrameA_Query_Label =3D $FrameB_Frame->Label(-text =3D> "Query
Result")->grid(-padx =3D> 10, -pady =3D> 10,-row =3D> 3, -column =3D> =
0);

=20

=20

$FrameB_Frame->Button(-text =3D> "Forget Left Entry Box at Top", =
-command =3D>
\&forget_CellA_cb)->grid(-padx =3D> 10, -pady =3D> 10,-row =3D> 4, =
-column =3D> 0);

=20

$FrameB_Frame->Button(-text =3D> "Forget Middle Box at Top", -command =
=3D>
\&forget_CellB_cb)->grid(-padx =3D> 10, -pady =3D> 10,-row =3D> 4, =
-column =3D> 1);

=20

$FrameB_Frame->Button(-text =3D> "Forget Right Box at Top", -command =
=3D>
\&forget_CellC_cb)->grid(-padx =3D> 10, -pady =3D> 10,-row =3D> 4, =
-column =3D> 2);

=20

=20

$FrameB_Frame->Button(-text =3D> "Recall Left Entry Box at Top", =
-command =3D>
\&recall_CellA_cb)->grid(-padx =3D> 10, -pady =3D> 10,-row =3D> 5, =
-column =3D> 0);

=20

$FrameB_Frame->Button(-text =3D> "Recall Middle Entry Box at =
Top",-command =3D>
\&recall_CellB_cb)->grid(-padx =3D> 10, -pady =3D> 10,-row =3D> 5, =
-column =3D> 1);

=20

$FrameB_Frame->Button(-text =3D> "Recall Right Entry Box at =
Top",-command =3D>
\&recall_CellC_cb)->grid(-padx =3D> 10, -pady =3D> 10,-row =3D> 5, =
-column =3D> 2);

=20

$FrameB_Frame->Button(-text =3D> "Is Left Entry Box Visible? (answer is =
given
below)",-command =3D> \&visq_CellA_cb)->grid(-padx =3D> 10, -pady =3D> =
10,-row =3D>
6, -column =3D> 0);

=20

$CellA_Query_Label =3D $FrameB_Frame->Label(-text =3D> "Query
Result")->grid(-padx =3D> 10, -pady =3D> 10,-row =3D> 7, -column =3D> =
0);

=20

=20

MainLoop;

=20

}

=20

=20

############## in line code #########################

=20

gui_set()

=20

=20

Best regards

=20

Henry Merryweather

=20

Telephone: +44 (0) 1225 859051

Web: HYPERLINK
"http://www.merryweathersolutions.co.uk"www.merryweathersolutions.co.uk

=20


No virus found in this outgoing message.
Checked by AVG Free Edition.=20
Version: 7.5.487 / Virus Database: 269.13.21/1012 - Release Date: =
16/09/2007
18:32
=20

------=_NextPart_000_000F_01C7F917.D0D3E460
Content-Type: text/html;
	charset="windows-1250"
Content-Transfer-Encoding: quoted-printable

<html>

<head>
<META HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; =
charset=3Dwindows-1250">


<meta name=3DGenerator content=3D"Microsoft Word 10 (filtered)">

<style>
<!--
 /* Font Definitions */
 @font-face
	{font-family:"Franklin Gothic Book";
	panose-1:2 11 5 3 2 1 2 2 2 4;}
 /* Style Definitions */
 p.MsoNormal, li.MsoNormal, div.MsoNormal
	{margin:0cm;
	margin-bottom:.0001pt;
	font-size:10.0pt;
	font-family:"Times New Roman";}
a:link, span.MsoHyperlink
	{color:blue;
	text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
	{color:purple;
	text-decoration:underline;}
span.EmailStyle17
	{font-family:"Franklin Gothic Book";
	color:windowtext;
	font-weight:normal;
	font-style:normal;
	text-decoration:none none;}
@page Section1
	{size:595.3pt 841.9pt;
	margin:72.0pt 90.0pt 72.0pt 90.0pt;}
div.Section1
	{page:Section1;}
-->
</style>

</head>

<body lang=3DEN-GB link=3Dblue vlink=3Dpurple>

<div class=3DSection1>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>Following =
the very helpful
replies I had last week about =91forgetting=92 widgets and then
recalling them, I wrote Perl code to implement these answers.=A0 In case =
this is
of any help to others I have attached this below.</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'># this =
tests the
forget for a grid widget</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>use =
Tk;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>use strict =
&quot;vars&quot;;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>my =
($mw_Main, );</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>my =
($CellA_Entry, $CellB_Entry,
$CellC_Entry);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>my =
($CellA_forgot,
$CellB_forgot, $CellC_forgot);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>my =
($FrameA_Frame,
$FrameB_Frame);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>my =
($FrameA_forgot);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>my =
(%cella_data, %cellb_data,
%cellc_data);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>my =
($CellA_Text, $CellB_Text,
$CellC_Text);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>my =
(%framea_data);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>my =
($FrameA_Query_Label,
$CellA_Query_Label);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'># forget =
call backs</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>sub =
forget_FrameA_cb()
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>my ($item, =
$item_mod);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'># you can =
only
forget a widget if it is visible otherwise the gird data is not =
available and
the ecall fails</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>if($FrameA_Frame-&gt;ismapped())
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'># the =
'grid' data
is read at this point since it is 'forgotten' when girdForget is =
used</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 %framea_data
=3D $FrameA_Frame-&gt;gridInfo();</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 =
$FrameA_Frame-&gt;gridForget();</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'># =
widget_forgot is
set to yes so that the recall sub will bring the widget =
back</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 $FrameA_forgot
=3D 'yes'; </span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>sub =
forget_CellA_cb()
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>my ($item, =
$item_mod);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'># you can =
only
forget a widget if it is visible otherwise the gird data is not =
available</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>if =
($CellA_Entry-&gt;ismapped())
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 %cella_data
=3D $CellA_Entry-&gt;gridInfo();</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 =
$CellA_Entry-&gt;gridForget();</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 $CellA_forgot=A0
=3D 'yes';</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>} =
</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>sub =
forget_CellB_cb()
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>if =
($CellB_Entry-&gt;ismapped())
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 %cellb_data
=3D $CellB_Entry-&gt;gridInfo();</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 =
$CellB_Entry-&gt;gridForget();</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 $CellB_forgot=A0
=3D 'yes';</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>sub =
forget_CellC_cb()
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>if =
($CellC_Entry-&gt;ismapped())
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 %cellc_data
=3D $CellC_Entry-&gt;gridInfo();</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 =
$CellC_Entry-&gt;gridForget();</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 $CellC_forgot=A0
=3D 'yes';</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'># recall =
call backs</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>sub =
recall_FrameA_cb()
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>if =
($FrameA_forgot=A0
eq 'yes') {</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 =
$FrameA_Frame-&gt;grid(-padx
=3D&gt; $framea_data{-padx}, -pady =3D&gt; $framea_data{-pady}, -row =
=3D&gt; $framea_data{-row},
-column =3D&gt; $framea_data{-column});</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 $FrameA_forgot=A0
=3D 'no';</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>sub =
recall_CellA_cb()
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>if =
($CellA_forgot=A0 eq
'yes') {</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 =
$CellA_Entry-&gt;grid(-padx
=3D&gt; $cella_data{-padx}, -pady =3D&gt; $cella_data{-pady}, -row =
=3D&gt; $cella_data{-row},
-column =3D&gt; $cella_data{-column});</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 $CellA_forgot=A0
=3D 'no';</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#$CellA_Entry-&gt;configure(-text
=3D&gt; $CellA_Text);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>sub =
recall_CellB_cb()
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>if =
($CellB_forgot=A0 eq
'yes') {</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 =
$CellB_Entry-&gt;grid(-padx
=3D&gt; $cellb_data{-padx}, -pady =3D&gt; $cellb_data{-pady}, -row =
=3D&gt; $cellb_data{-row},
-column =3D&gt; $cellb_data{-column});</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 $CellB_forgot=A0
=3D 'no';</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>sub =
recall_CellC_cb()
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>if =
($CellC_forgot=A0 eq
'yes' ) {</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 =
$CellC_Entry-&gt;grid(-padx
=3D&gt; $cellc_data{-padx}, -pady =3D&gt; $cellc_data{-pady}, -row =
=3D&gt; $cellc_data{-row},
-column =3D&gt; $cellc_data{-column});</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 $CellC_forgot=A0
=3D 'no';</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'># =
visibility query
call backs</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>sub =
visq_FrameA_cb
() {</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>if($FrameA_Frame-&gt;ismapped())
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 =
$FrameA_Query_Label-&gt;configure(-text
=3D&gt; &quot;Frame is Visible&quot;);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>} else =
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 =
$FrameA_Query_Label-&gt;configure(-text
=3D&gt; &quot;Frame is NOT Visible&quot;);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>} =
</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>sub =
visq_CellA_cb
() {</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>if($CellA_Entry-&gt;ismapped())
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 =
$CellA_Query_Label-&gt;configure(-text
=3D&gt; &quot;Left Entry Box is Visible&quot;);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>} else =
{</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0=A0 =
$CellA_Query_Label-&gt;configure(-text
=3D&gt; &quot;Left Entry Box is NOT Visible&quot;);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>} =
</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'># sub =
gui-set</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'># this =
sets up a
gui with Entry boxes, forget buttons and recall =
buttons</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>sub =
gui_set() {</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'>$mw_Main =
=3D MainWindow-&gt;new;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$FrameA_Frame =3D $mw_Main-&gt;Frame(-borderwidth
=3D&gt; 3, -relief =3D&gt; &quot;raised&quot;)-&gt;grid(-padx =3D&gt; =
10, -pady =3D&gt;
10, -row =3D&gt; 0, -column =3D&gt; 0);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$CellA_Entry =3D $FrameA_Frame-&gt;Entry(-width
=3D&gt; 6, -text =3D&gt; 'AAA')-&gt;grid(-padx =3D&gt; 10, -pady =3D&gt; =
10,-row =3D&gt;
0, -column =3D&gt; 0);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$CellB_Entry =3D $FrameA_Frame-&gt;Entry(-width
=3D&gt; 6, -text =3D&gt; 'BBB')-&gt;grid(-padx =3D&gt; 10, -pady =3D&gt; =
10,-row =3D&gt;
0, -column =3D&gt; 1);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$CellC_Entry =3D $FrameA_Frame-&gt;Entry(-width
=3D&gt; 6, -text =3D&gt; 'CCC')-&gt;grid(-padx =3D&gt; 10, -pady =3D&gt; =
10,-row =3D&gt;
0, -column =3D&gt; 2);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'># =
widget_forgot is
set to no so that attempts to recall the widget beofre it has been =
forgotten
will fail</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic Book"'># this is =
necessay
otherwise detials of th gird setting will not be =
available</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$CellA_forgot=A0 =3D
'no';</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$CellB_forgot =3D
'no';</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$CellC_forgot =3D
'no';</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$FrameA_forgot =3D 'no';</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$FrameB_Frame =3D $mw_Main-&gt;Frame(-borderwidth
=3D&gt; 3, -relief =3D&gt; &quot;groove&quot;)-&gt;grid(-padx =3D&gt; =
10, -pady =3D&gt;
10,-row =3D&gt; 1, -column =3D&gt; 0);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$FrameB_Frame-&gt;Button(-text
=3D&gt; &quot;Forget Frame&quot;, -command =3D&gt; =
\&amp;forget_FrameA_cb)-&gt;grid(-padx
=3D&gt; 10, -pady =3D&gt; 10,-row =3D&gt; 0, -column =3D&gt; =
0);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$FrameB_Frame-&gt;Button(-text
=3D&gt; &quot;Recall Frame&quot;,-command =3D&gt; =
\&amp;recall_FrameA_cb)-&gt;grid(-padx
=3D&gt; 10, -pady =3D&gt; 10,-row =3D&gt; 1, -column =3D&gt; =
0);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$FrameB_Frame-&gt;Button(-text
=3D&gt; &quot;Is Frame Visible? (answer is given below)&quot;,-command =
=3D&gt;
\&amp;visq_FrameA_cb)-&gt;grid(-padx =3D&gt; 10, -pady =3D&gt; 10,-row =
=3D&gt; 2,
-column =3D&gt; 0);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$FrameA_Query_Label
=3D $FrameB_Frame-&gt;Label(-text =3D&gt; &quot;Query =
Result&quot;)-&gt;grid(-padx
=3D&gt; 10, -pady =3D&gt; 10,-row =3D&gt; 3, -column =3D&gt; =
0);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$FrameB_Frame-&gt;Button(-text
=3D&gt; &quot;Forget Left Entry Box at Top&quot;, -command =3D&gt; =
\&amp;forget_CellA_cb)-&gt;grid(-padx
=3D&gt; 10, -pady =3D&gt; 10,-row =3D&gt; 4, -column =3D&gt; =
0);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$FrameB_Frame-&gt;Button(-text
=3D&gt; &quot;Forget Middle Box at Top&quot;, -command =3D&gt; =
\&amp;forget_CellB_cb)-&gt;grid(-padx
=3D&gt; 10, -pady =3D&gt; 10,-row =3D&gt; 4, -column =3D&gt; =
1);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$FrameB_Frame-&gt;Button(-text
=3D&gt; &quot;Forget Right Box at Top&quot;, -command =3D&gt; =
\&amp;forget_CellC_cb)-&gt;grid(-padx
=3D&gt; 10, -pady =3D&gt; 10,-row =3D&gt; 4, -column =3D&gt; =
2);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$FrameB_Frame-&gt;Button(-text
=3D&gt; &quot;Recall Left Entry Box at Top&quot;, -command =3D&gt; =
\&amp;recall_CellA_cb)-&gt;grid(-padx
=3D&gt; 10, -pady =3D&gt; 10,-row =3D&gt; 5, -column =3D&gt; =
0);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$FrameB_Frame-&gt;Button(-text
=3D&gt; &quot;Recall Middle Entry Box at Top&quot;,-command =3D&gt; =
\&amp;recall_CellB_cb)-&gt;grid(-padx
=3D&gt; 10, -pady =3D&gt; 10,-row =3D&gt; 5, -column =3D&gt; =
1);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$FrameB_Frame-&gt;Button(-text
=3D&gt; &quot;Recall Right Entry Box at Top&quot;,-command =3D&gt; =
\&amp;recall_CellC_cb)-&gt;grid(-padx
=3D&gt; 10, -pady =3D&gt; 10,-row =3D&gt; 5, -column =3D&gt; =
2);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$FrameB_Frame-&gt;Button(-text
=3D&gt; &quot;Is Left Entry Box Visible? (answer is given =
below)&quot;,-command
=3D&gt; \&amp;visq_CellA_cb)-&gt;grid(-padx =3D&gt; 10, -pady =3D&gt; =
10,-row =3D&gt;
6, -column =3D&gt; 0);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>$CellA_Query_Label
=3D $FrameB_Frame-&gt;Label(-text =3D&gt; &quot;Query =
Result&quot;)-&gt;grid(-padx
=3D&gt; 10, -pady =3D&gt; 10,-row =3D&gt; 7, -column =3D&gt; =
0);</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>MainLoop;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>}</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>############## in
line code #########################</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>gui_set()</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Franklin Gothic Book"><span
style=3D'font-size:10.0pt;font-family:"Franklin Gothic =
Book"'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Times New Roman"><span =
style=3D'font-size:
10.0pt'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3DArial><span =
style=3D'font-size:10.0pt;
font-family:Arial'>Best regards</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Times New Roman"><span =
style=3D'font-size:
10.0pt'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3DArial><span =
style=3D'font-size:10.0pt;
font-family:Arial'>Henry Merryweather</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Times New Roman"><span =
style=3D'font-size:
10.0pt'>&nbsp;</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3DArial><span =
style=3D'font-size:10.0pt;
font-family:Arial'>Telephone: +44 (0) 1225 859051</span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3DArial><span =
style=3D'font-size:10.0pt;
font-family:Arial'>Web: <a =
href=3D"http://www.merryweathersolutions.co.uk">www.merryweathersolutions=
.co.uk</a></span></font></p>

<p class=3DMsoNormal><font size=3D2 face=3D"Times New Roman"><span =
style=3D'font-size:
10.0pt'>&nbsp;</span></font></p>

</div>

</body>

</html>
<BR>

<P><FONT SIZE=3D2>No virus found in this outgoing message.<BR>
Checked by AVG Free Edition.<BR>
Version: 7.5.487 / Virus Database: 269.13.21/1012 - Release Date: =
16/09/2007 18:32<BR>
</FONT> </P>

------=_NextPart_000_000F_01C7F917.D0D3E460--


--===============2588101580921625235==
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

--++**==--++**==--++**==--++**==--++**==--++**==--++**==
ptk mailing list
[email protected]
https://mailman.stanford.edu/mailman/listinfo/ptk


--===============2588101580921625235==--