Distinguir registros no consecutivos para alternar colores en dbgrid.

[amadis]

Que tal Colegas.

hace tiempo ando dando vueltas con el tema de Colorear de forma alternada de un dbgrid.

lo he hecho de maravilla manejando el evento DrawColumnCell

Pero el tema del post radica en que todos los métodos que he visto utilizan el RecordNumber, y dependiendo si este es par o impar colorea la fila correspondiente.
Eso funciona si los numeros de registros son consecutivos. las tablas tienen que ser secuenciales exactas para que funciona. Y hablando de sistemas que funcionen del lado del cliente eso torna muy lenta una aplicación de muchos registros.

A alguien se le ocurre una forma que no sea utilizar tecnologia cliente/servidor? y habilitar desde el lado del servidor la secuencialidad de la tabla.

Saludos y veremos que sale de aquí.

[Casimiro Notevi]

Empezado por amadis

Pero el tema del post radica en que todos los métodos que he visto utilizan el RecordNumber, y dependiendo si este es par o impar colorea la fila correspondiente. Eso funciona si los numeros de registros son consecutivos. las tablas tienen que ser secuenciales exactas para que funciona.

Lo normal de controlar si el registro actual es par o impar, además de cómodo, es muy eficiente. Y precisamente se hace el local con los registros devueltos.
O sea, que es eso precisamente lo que necesitas.

[amadis]

Eso es lo que vengo haciendo y quiero evitar. Traté de dejarlo en claro antes.

No quiero usar la propiedad Row del Tstringrid que hace referencia al valor del la propiedad DataSet.RecNo.
Y todo esto genera problemas cuando se tienen consecutivos varios registros pares o impares.
Esa es una de las cuestiones por la que generé este post.

[Casimiro Notevi]

¿Pero cómo lo quieres hacer?

[amadis]

Nose , busco alguna idea aunque sea descabellada para probar algo nuevo. Como vos bien decias, lo normal es tomar el numero de registro y comparar. Pero a nadie se le ocurrió plantearse ¿que pasa si por ej se eliminan algunos registros y quedan consecutivos pares o impares??.
Algo se debe poder hacer.

[ecfisa]

Empezado por amadis

Nose , busco alguna idea aunque sea descabellada para probar algo nuevo. Como vos bien decias, lo normal es tomar el numero de registro y comparar. Pero a nadie se le ocurrió plantearse ¿que pasa si por ej se eliminan algunos registros y quedan consecutivos pares o impares??.
Algo se debe poder hacer.

Hola amadis.

Código Delphi [-]
type
  TDBGridEx = class(TDBGrid);

procedure TForm1.DBGridDrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
const
  COLORS : array[Boolean] of TColor = (clYellow, clMoneyGreen);
begin
  with TDBGridEx(Sender as TDBGrid) do
  begin
    Canvas.Brush.Color := COLORS[Odd(Rect.Top div DefaultRowHeight)];
    DefaultDrawColumnCell(Rect, DataCol, Column, State);
  end;
end;

Saludos

[Casimiro Notevi]

Empezado por amadis

Nose , busco alguna idea aunque sea descabellada para probar algo nuevo. Como vos bien decias, lo normal es tomar el numero de registro y comparar. Pero a nadie se le ocurrió plantearse ¿que pasa si por ej se eliminan algunos registros y quedan consecutivos pares o impares??.
Algo se debe poder hacer.

Todo eso está controlado con la "forma normal de hacerlo"