Работа с StringGrid1

← →
Александр1 (2004-02-27 19:59) [0]

Так можно удалить строчку с заданным номером! А как удалить ВЫДЕЛЕННУЮ строчку из таблицы???

procedure SGDeleteRow(SG:TStringGrid; RowToDelete:Integer);
var i: Integer;
begin
with SG do begin
if (RowToDelete>=0) and (RowToDelete<RowCount) then begin
for i:=RowToDelete to RowCount-2 do
Rows[i].Assign(Rows[i+1]);
RowCount:= RowCount-1;
end;
end;

SGDeleteRow(StringGrid1,4);

end;

← →
Тимохов © (2004-02-27 20:01) [1]

SGDeleteRow(StringGrid1,StringGrid1.row);

← →
Александр1 (2004-02-27 20:57) [2]

Тимохов - снова работает!!! Тимохов - Ты золото!!! Супер!!!

← →
Александр1 (2004-02-28 14:54) [3]

А как не удалить выделенную строку, а просто очистить????

← →
MBo © (2004-02-28 14:57) [4]

Хелп нужно читать вдумчиво.
Rows[i].Text:="";

← →
Александр1 (2004-02-28 15:07) [5]

MBo - спасибо!
Да я бы не против почитать help но он у меня по ангийски, а переводчик такую лабудень неперевёл, что......

А как сделать та, чтобы когда выбираешь строчку мышкой, переменной i присваивалось значение равное номеру выделенной строки???

← →
MBo © (2004-02-28 15:16) [6]

Ты надеешься, что всю жизнь толкователи хелпа будут под рукой?

← →
Opuhshii © (2004-02-28 15:18) [7]

Выкидываем такой переводчик, покупаем англо-русский словарь, ищем слово "выделение", находим, ищем в справке найденое в словоре слово в контексте StringGrid-а,

Selection это,..

← →
Александр1 (2004-02-28 15:20) [8]

Я просто ещё не программист, а только учусь!
MBo - А разве этот сайт не для помощи создан????
MBo - Ну тк вё таки как сделать та, чтобы когда выбираешь строчку мышкой, переменной i присваивалось значение равное номеру выделенной строки???
Помоги пожалуйста!!!!!! Очень надо!

← →
Александр1 (2004-02-28 15:34) [9]

Opuhshii - Сегодня уже позно бижать за словарём. Ну чё вам стоит хватит меня мучить напешитие пожалуйста как сделать та, чтобы когда выбираешь строчку мышкой, переменной i присваивалось значение равное номеру выделенной строки???
Пожалуйста!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

← →
SeZam (2004-02-28 15:51) [10]

Так подойдет:
procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
ARow: Integer; var CanSelect: Boolean);
begin
RowNum:=ARow;
Edit1.Text:=IntToStr(RowNum);
end;

← →
Александр1 (2004-02-28 16:00) [11]

SeZam - спасибо тебе большое!!!!!!! Хоть кто-то нашёлся знающий и понимающий проблемы начинающих программистов. А ведь всегда так трудно НАЧИНАТЬ.........

выделенных строчек может быть много,..

>выделенных строчек может быть много,..
Options.RangeSelect:=false;

To Александр1:
Я тут немного не в тему, но я слышала, что ты разобрался с печатью StringGrid"a - ты не мог бы выложить код?

Работа с StringGrid1 Найти похожие ветки