Curtis,
try something like this
procedure TForm1.DoForm3Close(Sender: TObject;
var Action: TCloseAction);
begin
//form3 can close
Action := caFree;
//activate self
Activate;
end;
procedure TForm1.ShowForm3(sender : TObject);
{
Do in here whatever you do to make form3 active
I generally make forms on the fly and remove them when
done
Set Form3's OnClose event to Form1's DoForm3Close
}
begin
Form3.OnClose := DoForm3Close;
Form3.Activate;
end;
Mick.
BTW would ALL correspondants please, oh please trim
their posts. mja
Message: 7
Date: Thu, 11 Aug 2005 07:47:01 -0700 (PDT)
From: Curtis cloud <[EMAIL PROTECTED]>
Subject: How to get the name of the previous form.
Here is my problem.
I have three forms total: form1, form2, and form3.
Form1 and form 2 has
the ability to call form3.
Also, form 1 and 2 has timers that are triggered when
they receive
focus. Form3 has a close event associated to it.
After form3 has been called by form1 or form2, then
closes form3 should
revert back to the form that called it which, by
design, should
activate its timer.
Does anyone know how to do this....
If I can get the previous form's name, that will do it
for me..
R/Kurt..
____________________________________________________
Do you Yahoo!?
Try Yahoo! Photomail Beta: Send up to 300 photos in one email!
http://au.photomail.mail.yahoo.com
------------------------ Yahoo! Groups Sponsor --------------------~-->
<font face=arial size=-1><a
href="http://us.ard.yahoo.com/SIG=12hv21rmj/M=362335.6886445.7839731.1510227/D=groups/S=1705115362:TM/Y=YAHOO/EXP=1123810669/A=2894361/R=0/SIG=13jmebhbo/*http://www.networkforgood.org/topics/education/digitaldivide/?source=YAHOO&cmpgn=GRP&RTP=http://groups.yahoo.com/";>In
low income neighborhoods, 84% do not own computers. At Network for Good, help
bridge the Digital Divide!</a>.</font>
--------------------------------------------------------------------~->
-----------------------------------------------------
Home page: http://groups.yahoo.com/group/delphi-en/
To unsubscribe: [EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/delphi-en/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
