escribiendo en dbgrid

[ecfisa]

Empezado por deivi

Lo he intentado, pero me dice que no puedo hacer eso en un dataset abierto, y como el campo no es persistente, no puedo asignarle el valor antes de abrir el dataset, por eso había pensado en capturar la longitud del campo que estoy escribiendo en el momento.

Hola deivi.

Por lejos creo que la opción mas simple es crear el campo persistente y configurar la propiedad Size desde el Field Editor o usando el código que te sugirió duilioisola, pero ignoro por que no podes hacerlo.

Sin embargo, podrías hacer:

Código Delphi [-]
const
  THE_COLUMNN   = 1; // Columna del campo en cuestión
  ALLOWED_CHARS = 2; // ( Cantidad de caracteres permitidos - 1 )

procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
  with TDBGrid(Sender) do
    if (EditorMode) and (SelectedIndex = THE_COLUMNN) then
      if (Length(TInPlaceEdit(Controls[0]).Text) > ALLOWED_CHARS) and (Key<>#8) then
        Key:= #0;
end;

Saludos