Crear y recorrer una tabla

[Investment]

En la ayuda de Delphi tienes un ejemplo de como craer una tabla:
Mira CreateTable del componente TTable

Otra forma de hacerlo es mediante un asentencia SQL:
CREATE TABLE ...

Para recorrer una tabla:
Table1.Open

while not Table1.Eof do
  Table1.Next;