Re: TZF - KeyMaker with Virtual File

Marie Vihonsky <[email protected]>
Newsgroups gmane.comp.lang.delphi.topaz
Message-ID <[email protected]>
Hi Phil,

Since a virtual file is handled the same as a regular file (I think), 
the following should work:

{Define Tags for Indexes for each database}
Const
    VIDCARDTags: array[0..1] of TTagInfo = (
           (name: 'IDKEY'; keyexpr: 'member_id + dog_id'; forexpr: '';
                        descending: FALSE; unique: FALSE),
           (name: ''; keyexpr: ''; forexpr: '';
                        descending: FALSE; unique: FALSE));

      if not VIDCARD.Active then begin
        VIDCARD.DbfFileName := tempath + 'vidcard.dbf';
        VIDCARD.Exclusive := true;
        VIDCARD.Active := True;
        VIDCARD.MakeIndex(@VIDCARDtags,'');
        VIDCARD.SetIndexTo('');
        VIDCARD.SetOrderToTag('idkey');
        VIDCARD.GoTop;
    end;

Marie

[email protected] wrote:
> Hello,
> 
> I did this once before but I can't remember how. I want to define my own 
> key for a virtual file. I am using Topaz 7.51 and have read the addendum 
> to the manual and am still confussed.
> 
> Does anyone have a simple example of how to define my own key for a 
> virtual file?
> 
> Thanks.
> 
> Phil Kidder

==^================================================================
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
==^================================================================
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.