Activar form endbgrid en renglon

[roman]

Sólamente tienes que ajustar las propiedades Left y Top del formulario para colocarlo donde quieras.

// Saludos

[eldonfsr]

Bueno Roma es una buena idea pero el problema es como saber la posicion del renglon en la pantalla para pasar ese valor a Top de la nueva ventana.

DBGParts.CellRect(Column.Index+1,SQLQPartArt.RecNo+1);

me trae el cuadro de la column del Dbgird.

gracias, saludos.

[ecfisa]

Hola.

Algo que se me ocurrió es:

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

procedure PosicionarForm(AGrid: TDBGrid; AFormClass: TFormClass);
var
  i,L: Integer;
  P: TPoint;
begin
  with TDBGridExt(AGrid) do
  begin
    L:= ColWidths[0];
    for i:= 1 to Col-1 do L:= L + ColWidths[i];
    P.X:= L + 4;     // + 4 por que me gusta más... 
    P.Y:= RowHeights[0] + Row * DefaultRowHeight + 4;
    P:= ClientToScreen(P);
    with AFormClass.Create(Application) do
    try
      Left:= P.X;
      Top:=  P.Y;
      ShowModal;
    finally
      Free;
    end;
  end;
end;

Llamada:

Código Delphi [-]
    PosicionarForm(DBGrid1, TForm2);

Pero si hay una mejor manera de hacerlo, sin dudas que román la conocerá.

Un saludo.

[eldonfsr]

Mil Gracias amigo le batalle algo por las declaraciones y en donde ponerlas ya que como lo tengo es algo diferente pero despues de todo pude arreglarlo, faltan algunos detalles pero hay los voy corrigiendo o agregandoselos lo mas importante ya esta... gracas mil gracias....


saludos.
fernando