Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > StringGrid

Автор: lider07 10.8.2003, 05:54

как в каждой строке в колонке №2 убрать последние четыре символа

Автор: Vit 10.8.2003, 07:16

Что-то типа такого

For i:=0 to StringGrid.rowcount-1 do
StringGrid.cells[i,1]:=copy(StringGrid.cells[i,2],1, length(StringGrid.cells[i,2])-4)

Код писал навскидку, скорее всего есть ошибки, но принцип уловишь

Автор: lider07 10.8.2003, 10:25

Цитата

неработает твой код он удоляет вторуб строку

Автор: p0s0l 10.8.2003, 11:41

Vit немного перепутал местами ряд и колонку...

Код

For i:=0 to StringGrid.rowcount-1 do
StringGrid.cells[1,i]:=copy(StringGrid.cells[1,i],1, length(StringGrid.cells[1,i])-4)

Автор: Vex 10.8.2003, 11:42

Надо просто поменять 2 и i местами, я тоже так часто путаю

Код


for i:=1 to StringGrid1.rowcount-1 do 
   StringGrid1.Cells[2,i]:=copy(StringGrid1.Cells[2,i],1,Length(StringGrid1.Cells[2,i])-4);

З.Ы. Одновременно писали