RE: TZF - Opening DBF at runtime

I don't want to create a file at runtime, I want to open any ole DBF I 
want to without having to know it's pre-defined structure...


Eitan Gilboa wrote:
> 
> Marie,
> 
> >> I believe you always have to have a structure pre-defined, either using
> a dummy file or in code.
> 
> Not really... You can create, open and use a DBF at run time like so:
> 
> Here's essentially what you need to do in order to create a DBF at run 
> time:
> 
>   {type- must be a valid dBASE type, like:  'C')   }
> 
>    procedure TForm1.Button1Click(Sender: TObject);
>    VAR dbf: TTzDbf;
>    begin
>      dbf := TTzDbf.Create(Application); { create an instance of TTzDbf }
>      try
>        dbf.DbfFields.Clear;
>        dbf.DbfFields.Add('FirstN,C,30,0');    { add the fields }
>        dbf.DbfFields.Add('LasttN,C,30,0');
>        dbf.DbfFields.Add('Phone,C,12,0');
>        dbf.DbfFields.Add('amount,N,10,2');
>        dbf.DbfFilename := 'c:\MyDbf.dbf';
>        dbf.Active := TRUE;
>        dbf.Active := FALSE;  { That's it! }
>      finally
>        dbf.Free;
>      end;
>    end;
> 
> 
> Best wishes,
> 
> Eitan.
> URL: http://perso.wanadoo.fr/eitang
> 
> 

==^================================================================
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
==^================================================================