Il faut utiliser l'événement
OnSetEditText de ta DrawGrid.
Dans le code que je te donne, pendant la saisie d'un texte dans la drawgrid par l'utilisateur, l'edit1 affiche le texte en cours de saisie, l'edit2 affiche le nombre de caractères du texte saisi, et l'edit3 affiche la longueur du texte en pixels.
procedure TForm1.DrawGrid1SetEditText(Sender: TObject; ACol, ARow: Integer; const Value: String);
begin
Edit1.Text := Value;
Edit2.Text := IntToStr(Length(value));
Edit3.Text := IntToStr(Canvas.TextWidth(value))
end;@+
Bonne Prog'
Nico [
www.ni69.new.fr]
N'oubliez pas de cliquer sur Réponse acceptée lorsque la réponse vous convient ! 