Ver Mensaje Individual
  #2  
Antiguo 22-06-2006
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Reputación: 22
Caro Va por buen camino
Holas

Lo he conseguido con esta funcion del stringGrid -> MouseToCell que nos devuelve fila y columna en donde se encuentra las coordenadas X y Y que le pasaremos de nuestro evento MouseMove de nuestro stringGrid, sin esta función solo me devolvia los hint de las celdas pero no de las celdas que eran Fixed, habra que aumentar condiciones para que solo salga los hint en las filas y columnas fixed.

Algo que he notado es que tarda un poco en desaparecer el hint cuando me voy a otra celda que se sera?, si a alguien se le acurre el porque y como solucionar este retardo le estare muy agradecida.

Código Delphi [-]
procedure TForm1.StringGrid2MouseMove(Sender: TObject; Shift: TShiftState;
  X, Y: Integer);
var
  ACol, ARow : Integer;
begin
  StringGrid2.ShowHint := True;
 
  //Obtenemos la columna y fila de la posicion X y Y
  StringGrid2.MouseToCell(X, Y, ACol, ARow);  
 
  StringGrid2.Hint:=StringGrid2.Cells[ACol,ARow];
end;

Saludos y que tengan un bonito dia
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita