grazie per la pazienza.
mi diresti che ne pensi di questo codice?
visto che le celle della griglia sono più piccole dedl contenuto delle stesse avevo pensato di trovare una procedura che mostrasse AUTOMATICAMENTE il contenuto di una cella quando il mousevi passava sopra...codice:procedure TMainForm.Griglia(Sender: TObject; Shift: TShiftState; X, Y: Integer); var R, C: Integer; begin if (chkHint.Checked=true) then //serve per far partire o meno la procedura begin griglia.ShowHint:=true; griglia.MouseToCell(X, Y, C, R); with grigli do begin if ((Row<>R)or(Col<>C)) then begin if (R>RowCount) or (C>ColCount) then exit; If (r=0) then exit; Row:=R; Col:=C; Application.CancelHint; griglia.Hint:=griglia.Cells[c,r]; end; end; end else griglia.ShowHint:=false; end;
il checkbutton all'inizio cel'ho messo perchè altrimenti è scomodo inserire il testo e dunque attiva/disattiva la procedura...
per il resto non riesco a capire cosa sia a generare l'errore...
![]()
e grazie

Rispondi quotando