Ver Mensaje Individual
  #6  
Antiguo 09-05-2011
Avatar de newtron
[newtron] newtron is offline
Membrillo Premium
 
Registrado: abr 2007
Ubicación: Motril, Granada
Posts: 3.474
Reputación: 21
newtron Va camino a la fama
Cita:
Empezado por jhonalone Ver Mensaje
...esto sirve para una tabla ya creada.
Negativo, con el database desktop puedes crear o modificar tablas ya creadas, de todas formas lo ideal es hacer tú mismo la gestión de tus tablas desde la aplicación.

Te he preparado un ejemplo de como se crea una tabla con un índice primario y otro secundario, espero que te sirva.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
with TTable.create(self) do
begin
  DatabaseName := 'C:\TEMP';
  TableName := 'Clientes';
  TableType := ttParadox;
  with FieldDefs do begin
    Add('CODIGO', ftInteger, 0, True);
    Add('FECHA1', ftDate, 0, False);
    Add('FECHA2', ftDate, 0, False);
  end;
  IndexDefs.Add('Primario','ID', [ixPrimary, ixUnique]);
  IndexDefs.Add('Secundario','FECHA1;FECHA2', []);
  CreateTable;
end;

Recuerda que tienes que añadir al "uses" del formulario las unidades "dbtables" y "db".

Saludos
Responder Con Cita