Zeoslib Portal

Delphi 7 Zeos7
I create a ado database with this code
Function Tdata.createadodatabase(filename: string):string;
Var
Cat:olevariant;
Begin
Result := '';
Try
Cat := createoleobject('adox.catalog');
Cat.create ('provider=Microsoft.jet.oledb.4.0;datasource='+filename+'jet oledb:engine type=4');
Cat := null;
Except
On e : exception do result := e.message;
End;
End;


Now how can I create a table named table1 with two fields field1 and field2 in this table1 using zeos lib 7
Thank you...