<html><body bgcolor="#FFFFFF"><div>Can't remember the component name but there Is a free one out there, maybe Jedi that mimics that fully including stacking and decent event driven clicking. It works well<br><br>Regards,<div>Kyley</div><div>021-671821</div></div><div><br>On Nov 9, 2007, at 2:37 PM, "John Bird" &lt;<a href="mailto:johnkbird@paradise.net.nz">johnkbird@paradise.net.nz</a>&gt; wrote:<br><br></div><div></div><blockquote type="cite"><div>

<div><font face="Arial" color="#0000ff" size="2"><span class="154222201-09112007">Anyone 
looked at the little popup windows from Outlook/Skype messaging/Antivirus 
programs/Google news alerts/, you know the little windows that slide into a 
corner of the screen and/or fade in and out and thought "I would like to be able 
to do that"?</span></font></div>
<div><font face="Arial" color="#0000ff" size="2"><span class="154222201-09112007"></span></font>&nbsp;</div>
<div><font face="Arial" color="#0000ff" size="2"><span class="154222201-09112007">I 
wrote a simple function in a standalone unit that can be called to 
provide&nbsp;several such simple form effects - can be called for any form 
instead of calling the show or hide methods.&nbsp; I thought I would do it as a 
free giveaway, and for anyone to suggest any possible 
improvements.</span></font></div>
<div><font face="Arial" color="#0000ff" size="2"><span class="154222201-09112007"></span></font>&nbsp;</div>
<div><font face="Arial" color="#0000ff" size="2"><span class="154222201-09112007">It 
does not do sounds on show/hide yet, but I may add that 
later.</span></font></div>
<div><font face="Arial" color="#0000ff" size="2"><span class="154222201-09112007"></span></font>&nbsp;</div>
<div><font face="Arial" color="#0000ff" size="2"><span class="154222201-09112007">Anyone 
interested? either email me or I can post it here in email, its not very 
long.&nbsp; And it looks pretty cool.</span></font></div>
<div><font face="Arial" color="#0000ff" size="2"><span class="154222201-09112007">(I 
have a full test program for it as well.)</span></font></div>
<div><font face="Arial" color="#0000ff" size="2"></font>&nbsp;</div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">here 
is the description of the parameters</font></span></div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2"></font></span>&nbsp;</div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2"></font></span>&nbsp;</div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">(*<br>Form Effects</font></span></div>
<div>&nbsp;</div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">Freeware from JBCL - John Bird<br>A function unit - code only (no form 
attached) that can be called<br>to provide some pretty form 
effects.</font></span></div>
<div>&nbsp;</div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">Call 
by function<br>jFormEffect(</font></span></div>
<div>&nbsp;</div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">&nbsp; 
aForm&nbsp;&nbsp; TForm or descendent</font></span></div>
<div><font face="Arial" color="#0000ff" size="2"></font>&nbsp;</div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">&nbsp; 
aShowfl&nbsp;&nbsp;&nbsp; one of jfeShow jfeShowModal jfeHide 
jfeClose</font></span></div>
<div><font face="Arial" color="#0000ff" size="2"></font>&nbsp;</div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">&nbsp; 
//from here to simplify parameters are in alphabetic order<br>&nbsp; Note you 
can call using numbers, or if you prefer using the<br>&nbsp; constant values 
defined below, as they are in scope -<br>&nbsp; eg for aShowfl can be 1 (show) 
or you can use 
jfeShow<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
Hide form can be 3 or jfeHide</font></span></div>
<div><font face="Arial" color="#0000ff" size="2"></font>&nbsp;</div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">&nbsp; 
aBorderfl&nbsp; Borderstyle of 
form<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 0=no 
change<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
jfeStd&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
(bsSizeable)<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
jfeToolwin&nbsp; 
(bsToolWin)<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
jfeNone<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
NOTE! only change this when form is not visible</font></span></div>
<div><font face="Arial" color="#0000ff" size="2"></font>&nbsp;</div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">&nbsp; 
acolorfl&nbsp; 0=no set color of 
form<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 1=set to 
aColorval folowing<br>&nbsp; aColorval&nbsp; if set sets color of 
form.</font></span></div>
<div><font face="Arial" color="#0000ff" size="2"></font>&nbsp;</div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">&nbsp; 
aFadefl&nbsp;&nbsp; 
0=None<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 1=Fade 
in/out<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Form becomes 
gradually less transparent as 
shows,<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; and more 
transparent as hidden, (fades out gradually).</font></span></div>
<div><font face="Arial" color="#0000ff" size="2"></font>&nbsp;</div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">&nbsp; 
aPosfl&nbsp;&nbsp; 0=No Move - use form 
position<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 1=Position at 
point on screen, no 
movement<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
2=Moveout/Hide into border</font></span></div>
<div><font face="Arial" color="#0000ff" size="2"></font>&nbsp;</div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">&nbsp; 
aPosVal&nbsp;&nbsp;&nbsp; 0=none (ie as 
defined)<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
rest correspond to clock hour 
positions<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
eg 1= 1 O'Clock is top border, on right 
side<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
2=right border, at top&nbsp; up to 12=middle top 
border<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
13=Centre<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
for Show, this is where form ends 
up<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
for Hide, this is where form will disappear 
to<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
eg aPosFl=2 and aPosVal=1 means Form slides down when 
shown<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
or slides up into on Hide to or from 1 O'Clock position on 
screen<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
in the case of 1 O'Clock slides down from top right 
hand<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
corner of screen to occupy top right hand corner of 
screen.<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
and so on for the other 12 clock 
positions<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
eg 2 O'Clock is same position, but slides in 
from<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
the right screen border on 
show,<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
and off to the right on hide.</font></span></div>
<div><font face="Arial" color="#0000ff" size="2"></font>&nbsp;</div>
<div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">&nbsp; 
aRollfl&nbsp;&nbsp;&nbsp; 
0=None<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 1=Roll 
down/Roll up<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
that is the form drops down from the title bar as shown, 
and<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; rolls up 
into the title bar as 
hidden.<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Can be 
used along with the position function as well.</font></span></div>
<div><font face="Arial" color="#0000ff" size="2"></font>&nbsp;</div><span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">
<div><br>&nbsp; aSmoothfl&nbsp;&nbsp; one of jfeLow jfeMed jfeHigh&nbsp; how 
many iterations done</div>
<div>&nbsp;</div>
<div>&nbsp; aTimeval&nbsp;&nbsp;&nbsp;&nbsp; time in Milliseconds to take - 
default 1000</div>
<div>&nbsp;</div>
<div><br>Note form show ends at transparency,pos and height of form as set when 
called.<br>after disappears, set to original values so that show and hide do 
valid things...</div>
<div>&nbsp;</div>
</font><div><font face="Arial" color="#0000ff" size="2">Note - to avoid windows UI bugs, do not change forms border type while 
the<br>form is visible, only when not visible (does not repaint 
correctly).<br>*)<br></font></div>
<div><font face="Arial" color="#0000ff" size="2"></font>&nbsp;</div>
<div class="Section1">
<p class="MsoAutoSig" align="left">John<span class="154222201-09112007"><font face="Arial" color="#0000ff" size="2">&nbsp;</font></span></p>
<p class="MsoAutoSig" align="left"><span class="154222201-09112007">&nbsp;</span></p></div>
</span></div></blockquote><blockquote type="cite"><div><span>_______________________________________________</span><br><span>NZ Borland Developers Group - Delphi mailing list</span><br><span>Post: <a href="mailto:delphi@delphi.org.nz"><a href="mailto:delphi@delphi.org.nz">delphi@delphi.org.nz</a></a></span><br><span>Admin: <a href="http://delphi.org.nz/mailman/listinfo/delphi"><a href="http://delphi.org.nz/mailman/listinfo/delphi">http://delphi.org.nz/mailman/listinfo/delphi</a></a></span><br><span>Unsubscribe: send an email to <a href="mailto:delphi-request@delphi.org.nz">delphi-request@delphi.org.nz</a> with Subject: unsubscribe</span></div></blockquote></body></html>