<table cellspacing="0" cellpadding="0" border="0" ><tr><td valign="top" style="font: inherit;">How about time. You can used time as form name<br>frm.Name := frm.Name + DateTimeToStr(Now);<br><br>=============INTOSOFT============<br>
           ALEXIO CHAOS<br>
   Darmawan_Sugiarto@yahoo.com   <br>
          Yahoo Messager<br>
=================================<br><br>--- On <b>Tue, 2/3/09, Graeme Geldenhuys <i><graemeg.lists@gmail.com></i></b> wrote:<br><blockquote style="border-left: 2px solid rgb(16, 16, 255); margin-left: 5px; padding-left: 5px;"><br>From: Graeme Geldenhuys <graemeg.lists@gmail.com><br>Subject: Re: [Lazarus] creating multiple non-modal form instances<br>To: "General mailing list" <lazarus@lazarus.freepascal.org><br>Date: Tuesday, February 3, 2009, 1:45 AM<br><br><div class="plainMail">On Tue, Feb 3, 2009 at 11:33 AM, Michael Van Canneyt<br><<a ymailto="mailto:michael@freepascal.org" href="/mc/compose?to=michael@freepascal.org">michael@freepascal.org</a>> wrote:<br>>>   { very basic unique name and should probably be improved}<br>>>   frm.Name := frm.Name + IntToStr(Screen.FormCount + 1);<br>><br>> That will break if you have for example 5 forms, close form 4 and then<br>> create a
 new form.<br><br>Yup, I noticed that right after I posted the message. :-)<br><br><br>Regards,<br>  - Graeme -<br><br><br>_______________________________________________<br>fpGUI - a cross-platform Free Pascal GUI toolkit<br><a href="http://opensoft.homeip.net/fpgui/" target="_blank">http://opensoft.homeip.net/fpgui/</a><br>_______________________________________________<br>Lazarus mailing list<br><a ymailto="mailto:Lazarus@lazarus.freepascal.org" href="/mc/compose?to=Lazarus@lazarus.freepascal.org">Lazarus@lazarus.freepascal.org</a><br><a href="http://www.lazarus.freepascal.org/mailman/listinfo/lazarus" target="_blank">http://www.lazarus.freepascal.org/mailman/listinfo/lazarus</a><br></div></blockquote></td></tr></table><br>