DB Structure: What fields to put into your own table

procedure TfmAppDBHTML.BtnLoadClick(Sender: TObject);
var
  wp:TwhPage;
  a1:string;
begin
  inherited;
  with pWebApp, table1 do begin
    close;
    DatabaseName:=editPath.text;
    open;
    //
    first;
    while not EOF do begin
      if fieldByName('Type').asString='Page' then begin
        a1:=fieldByName('ChunkID').asString;
        // add to the app's pages list.
        Pages.add(a1+'='+a1+',,,The '+a1+' web page.');
        // note that the page sections will set themselves up
        end;
        next;
      end;
    end;

end;