ZConnection1.HostName:='localhost';
ZConnection1.Database:='db.s3db';
ZConnection1.Protocol:='sqlite-3';
ZConnection1.Connect;
ZQuery1.SQL.Text:='select * from Tabella;';
SpiderTable1.DataSet:= ZQuery1; {assegno il dataset di nome ATable all'oggetto}
ZQuery1.Open;
Response.Add(SpiderTable1.Contents); {Stampo la tabella con dentro i dati del dataset}
ZQuery1.Close;
ZConnection1.Disconnect;
Program project1;
Uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
CThreads,
{$ENDIF}{$ENDIF}
main{, zcomponent}
{ add your units here };
begin
DataModule1:= TDataModule1.Create(nil)
end.