Criar tabela MySQL em tempo de execução

03/11/2003

0

Como faço para criar uma tabela em tempo de execução, seus arquivos, etc... ??

Como, por exemplo, uma tabela parecida com esta abaixo, que esta em Paradoxx:

--------------------------
if not FileExists (Diretorio + ´\dados\cliente_´ + codigo + ´.db´) then
begin
Table1.Close;
Table1.TableName := ´cliente_´ + codigo + ´.db´;
Table1.TableType := ttDefault;
Table1.FieldDefs.Clear;
Table1.FieldDefs.Add(´Codigo´, ftString, 20, False);
Table1.FieldDefs.Add(´Evento´, ftString, 40, False);
Table1.FieldDefs.Add(´Tipo´, ftSmallint, 0, False);
Table1.FieldDefs.Add(´Prioridade´, ftSmallint, 0, False);
Table1.FieldDefs.Add(´Programado´, ftSmallint, 0, False);
Table1.FieldDefs.Add(´IdPainel´, ftSmallint, 0, False);
Table1.IndexDefs.Clear;
Table1.IndexDefs.Add(´PrimaryIndex´, ´Codigo´, [ixPrimary, ixUnique]);
Table1.CreateTable;
end;
--------------------------
Ai é criado um arquivo .db com a estrutura indicada acima...
como faço a mesma coisa, só q com o MySQL ??
Estou usando o componente ZeosLib e nao achei os comandos ´TableType´ e nem ´CreateTable´, sendo esse último essencial para a criação do arquivo.

Espero que alguem possa me ajudar a agradeço desde ja,

Renato Mendes


Renato_mendes

Renato_mendes

Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar