Скачать: CL | DM;

StringGrid автопрокрутка   Найти похожие ветки 

← →
8shar ©   (2009-04-11 07:32) [0]

Доброго дня. У меня в StringGrid постоянно выводятся данные с периодичностью раз в секунду.

procedure TForm1.WriteTable;
var
 i : integer;
begin
 i:=Form1.StringGrid1.RowCount;
 Form1.StringGrid1.RowCount:=i+1;
 With Form1.StringGrid1 do
   begin
     Cells[0,i]:="вывод 1";
     Cells[1,i]:="вывод 2";
     Cells[1,i]:="вывод 3";
   end;
end;
Как можно организовать автопрокрутку, чтобы последние значения всегда были на виду?

---

← →
korneley ©   (2009-04-11 08:38) [1]

StringGrid1.TopRow ?

---

← →
8shar ©   (2009-04-11 08:50) [2]

> korneley ©   (11.04.09 08:38) [1]
>
> StringGrid1.TopRow ?

Bingo!!

const
count=7 //сколько строк влазит на экран
begin
 if Form1.StringGrid1.RowCount>count then
 Form1.StringGrid1.TopRow:=i-count-1;
end;


---

← →
korneley ©   (2009-04-11 08:51) [3]

Хотя, хватит и просто .Row := А вобще, F1 почаще жамкать надо.

---

← →
8shar ©   (2009-04-11 17:43) [4]

Злые люди почикали хелпик с моего диска...

---

← →
korneley ©   (2009-04-11 22:55) [5]

> 8shar ©   (11.04.09 17:43) [4]
> Злые люди почикали хелпик с моего диска..

В твоём случае хватило бы нажать Ctrl+Spaсe после точки в StringGrid1.

---

← →
Германн ©   (2009-04-12 01:27) [6]

> 8shar ©   (11.04.09 17:43) [4]
>
> Злые люди почикали хелпик с моего диска...
>

Не верю! :)

---

← →
Кролик Иа-Иа2   (2009-04-12 02:15) [7]

Удалено модератором

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c