var GRect : TGridRect; begin GRect.Left := 4; // Première colonne selectionner GRect.Top := 1; // Première Ligne selectionner GRect.Right := 4; // Dernière colonne selectionner GRect.Bottom := 1; // Dernière Ligne selectionner StringGrid.Selection := GRect;