,,,,,,,,,,,,,∧,,∧　　 ／￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣
〜′,,,,,,,ミ,,ﾟДﾟ彡＜　近頃忙しいっす。
　 UU""" U U　　　＼＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
ﾏｯﾀｸ、ｺｷﾂｶｲｵｯﾃ

>>332
このあたりを見ると幸せになれるかも。
Delphi広場<10356>

右にずらして、その後どうするのかわけわかだけど、

CoｌsはTStringsだからAssignで
ピーコしてからその列の内容を削除したらいいんでないの？

StringGrid1.Cols[X+1].Assign(StringGrid1.Cols[X]);
StringGrid1.Cols[X].Text := '';

こんな感じかしら。
動作環境がないのでわからんけど。