Как удалить строку в StringGrid ??
Просто проблема в 2 типах
Код:
1 2 3 4 5 6 7 | type
TMotor=record
name:String;
price:integer;
tuning: Set of (CD, Alarm, Condition);
end;
|
Сделал такую процедуру
Код:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | procedure Del_element(StringGrid1:TStringGrid);
var
x,y : Integer;
begin
x := StringGrid1.Selection.Left;
y := StringGrid1.Selection.Top;
StringGrid1.Cells[1, y] := '';
MotList[y].name := '';
StringGrid1.Cells[2, y] := '';
StringGrid1.Cells[3, y] := '';
end;
|
Строка очищается. Но сделано так, что при нажатии на строчку данные из строк передаются в едит.
Эта строка очищает первый столбик (0-й столбик цифры от 0 до 10)
Код:
1 2 | StringGrid1.Cells[1, y] := '';
MotList[y].name := '';
|
Как сделать для 2 и 3 столбиков. Чтоб информация удалялась из массива. А не просто из строчек StringGrid ??
Помогите! Я ламо ((