RE: TZF - Set Carry On - CLONE RECORD

I tried out your code in D7 and it worked fine for me. I used a TtzDbf 
and a DataSource with the Movie.dbf demo that came with Topaz. I ended 
up with the following code:
 
  with TzDbf1 do
  begin
    oldRec := RecNo;
    SetIndexTo( '' );
    Go( oldRec );
    SKIP( 0 );
    IF ALock THEN
      AppendRec;
    Go( oldRec );
  end;

[email protected] wrote:
> 
> The Topaz Book says you can accomplish the equivalent of
> the dBase's "Set Carry On" by not doing a ClearRecord before
> the AppendRec.
> 
> This implies to me that if you find a record you want to clone, then
> do an AppendRec - you will have that record in the database twice.
> Do it again, and it will be three times, etc etc.
> 
> This does not work, as far as I can tell.  Rather than repeat the
> record you are on, successive AppendRec will repeat record
> number 1 in the database.  I have altered the code to include 
> a Skip(0), which did not help.  Then I decided it should
> not be indexed, and altered it ... this did not help either.
> 
> My present code (not working) looks like this:
<snip>
> 
> Can anyone explain this to me?  Or is it a bug in the Topaz software?
> 
> Thanks for any help,
> Bob Watson

--^----------------------------------------------------------------
This email was sent to: [email protected]

EASY UNSUBSCRIBE click here: http://topica.com/u/?clvXPN.a5kvff.Z2NsZHQt
Or send an email to: [email protected]

TOPICA - Start your own email discussion group. FREE!
http://www.topica.com/partner/tag02/create/index2.html
--^----------------------------------------------------------------