<table cellspacing="0" cellpadding="0" border="0" ><tr><td valign="top" style="font: inherit;">Bet you dont remember the sex change operation either :-)<br><br><!--WISESTAMP_SIG_START--> <!--WISESTAMP_SIG_END-->Your problem however, needs more information. If all you are doing is generating the string but not changing it, then a function with two arguments will do it. If you are talking about storage then its another story<br><br>--- On <b>Thu, 10/12/09, Sandeep Chandra <i><sandeep_groups@yahoo.com></i></b> wrote:<br><blockquote style="border-left: 2px solid rgb(16, 16, 255); margin-left: 5px; padding-left: 5px;"><br>From: Sandeep Chandra <sandeep_groups@yahoo.com><br>Subject: Re: [DUG] Make all possible unique combinations<br>To: "NZ Borland Developers Group - Delphi List" <delphi@delphi.org.nz><br>Date: Thursday, 10 December, 2009, 12:28 PM<br><br><div class="plainMail">I don't remember changing my name to Sandra
from Sandeep!<br><br><br><br>----- Original Message ----<br>From: Cameron Hart <<a ymailto="mailto:Cameron.Hart@flowsoftware.co.nz" href="/mc/compose?to=Cameron.Hart@flowsoftware.co.nz">Cameron.Hart@flowsoftware.co.nz</a>><br>To: NZ Borland Developers Group - Delphi List <<a ymailto="mailto:delphi@delphi.org.nz" href="/mc/compose?to=delphi@delphi.org...nz">delphi@delphi.org.nz</a>><br>Sent: Thu, 10 December, 2009 12:20:02 PM<br>Subject: Re: [DUG] Make all possible unique combinations<br><br>Hi Sandra<br><br>Perhaps if you share your existing algorithm we can help you faster.<br><br>Cameron Hart | Development Manager | Flow Software Limited<br>P: +64 9 476 3579 | M: +64 21 222 3569 | E:<br><a ymailto="mailto:cameron...hart@flowsoftware.co.nz" href="/mc/compose?to=cameron.hart@flowsoftware.co.nz">cameron.hart@flowsoftware.co.nz</a><br>PO Box 305-237, Triton Plaza, Auckland 0757, New Zealand |<br>www.flowsoftware.co.nz<br><br>This message is
intended for the addressee named above. It may contain<br>privileged or confidential information. If you are not the intended<br>recipient of this message you must not use, copy, distribute or disclose<br>it to anyone.<br><br>Please consider the environment before printing this email <br><br>-----Original Message-----<br>From: <a ymailto="mailto:delphi-bounces@delphi.org.nz" href="/mc/compose?to=delphi-bounces@delphi.org.nz">delphi-bounces@delphi.org.nz</a> [mailto:<a ymailto="mailto:delphi-bounces@delphi.org.nz" href="/mc/compose?to=delphi-bounces@delphi.org.nz">delphi-bounces@delphi.org.nz</a>]<br>On Behalf Of Sandeep Chandra<br>Sent: Thursday, 10 December 2009 11:47 a.m.<br>To: <a ymailto="mailto:delphi@delphi.org.nz" href="/mc/compose?to=delphi@delphi.org.nz">delphi@delphi.org.nz</a><br>Subject: [DUG] Make all possible unique combinations<br><br>I am looking for ideas to generate all possible combinations for the<br>following arrays. I don't want to
use for.. loops as number of arrays<br>can change.<br><br>const<br> STGR : array[1..2] of string = ('A1', 'A2');<br> STG1 : array[1..4] of string = ('B1', 'B2', 'B3', 'B4');<br> STG2 : array[1..2] of string = ('C1', 'C2');<br> .<br> .<br> STGN : array[1..2] of string = ('N1', 'N2');<br><br><br>I have an algorithm to this but was wondering if there are other<br>simpler/better/quicker ways to do this.<br><br>Regards<br><br>Sandeep<br><br><br> <br><br>_______________________________________________<br>NZ Borland Developers Group - Delphi mailing list<br>Post: <a ymailto="mailto:delphi@delphi.org.nz" href="/mc/compose?to=delphi@delphi.org.nz">delphi@delphi.org.nz</a><br>Admin: <a href="http://delphi.org.nz/mailman/listinfo/delphi" target="_blank">http://delphi.org.nz/mailman/listinfo/delphi</a><br>Unsubscribe: send an email to <a ymailto="mailto:delphi-request@delphi.org.nz"
href="/mc/compose?to=delphi-request@delphi.org.nz">delphi-request@delphi.org.nz</a> with Subject:<br>unsubscribe<br><br>_______________________________________________<br>NZ Borland Developers Group - Delphi mailing list<br>Post: <a ymailto="mailto:delphi@delphi.org.nz" href="/mc/compose?to=delphi@delphi.org.nz">delphi@delphi.org.nz</a><br>Admin: <a href="http://delphi.org.nz/mailman/listinfo/delphi" target="_blank">http://delphi.org.nz/mailman/listinfo/delphi</a><br>Unsubscribe: send an email to <a ymailto="mailto:delphi-request@delphi.org.nz" href="/mc/compose?to=delphi-request@delphi.org.nz">delphi-request@delphi.org.nz</a> with Subject: unsubscribe<br><br><br><br> <br><br>_______________________________________________<br>NZ Borland Developers Group - Delphi mailing list<br>Post: <a ymailto="mailto:delphi@delphi.org.nz" href="/mc/compose?to=delphi@delphi.org.nz">delphi@delphi.org.nz</a><br>Admin: <a
href="http://delphi.org.nz/mailman/listinfo/delphi" target="_blank">http://delphi.org.nz/mailman/listinfo/delphi</a><br>Unsubscribe: send an email to <a ymailto="mailto:delphi-request@delphi.org.nz" href="/mc/compose?to=delphi-request@delphi.org.nz">delphi-request@delphi.org.nz</a> with Subject: unsubscribe<br></div></blockquote></td></tr></table>