Ver Mensaje Individual
  #2  
Antiguo 04-04-2008
Avatar de jcarteagaf
[jcarteagaf] jcarteagaf is offline
Miembro Premium
 
Registrado: abr 2006
Ubicación: La Paz, Bolivia
Posts: 651
Reputación: 19
jcarteagaf Va por buen camino
dbGrid

Si se puede hacer (si es que te entendi bien).

En realidad la restricción no la colocas al dbGrid sino a la tabla. Es decir:
1. Defines un evento OnNewRecord para tu Tabla en la parte de private de tu forma o datamodule:

Código Delphi [-]
private
  procedure No_Mas_Registros (Dataset : TDataset);

2. En la parte de implementacion del evento simplemente colocas lo siguiente:

Código Delphi [-]
procedure TTuforma.No_Mas_Registros(Dataset : Tdataset);
begin
   Abort;  // que impida cualquier insercion
end;

3. Haces los procesos para llenar tu tabla (generalmente en el evento Onshow de la forma)

Código Delphi [-]
var 
  i : integer;
begin
  Tabla.OnNewRecord := nil;
  for i := 1 to 12 do
  begin
    Tabla.append;
    TablaMES.value := i;
    .... // aca puedes llenar los otros campos
    Tabla.Post;
  end;
  Tabla.OnNewRecord := No_Mas_Registros;  //Que apunte al evento creado;
end;

Espero que sea lo que querias.
Saludos.
Responder Con Cita