Полоса прокрутки в DBGrid

← →
Zhekson (2005-10-10 10:46) [0]

SetScrollPos(DBGrid1.Handle, SB_HORZ, 0, true);

- этот код перемещает бегунок в начало, но позиции столбцов остаются неизменными. Почему? И как сделать так, чтобы при определённом условии ScrollBar и DBGrid становились в определённую мной позицию...

← →
Leonid Troyanovsky © (2005-10-10 11:11) [1]

> Zhekson (10.10.05 10:46)

> определённом условии ScrollBar и DBGrid становились в определённую
> мной позицию...

DBGrid.SelectedIndex

--
Regards, LVT.

← →
Zhekson (2005-10-10 11:41) [2]

Leonid Troyanovsky © (10.10.05 11:11) [1]
никак однако...

← →
sniknik © (2005-10-10 11:59) [3]

> никак однако...
однако ошибся при копировании кода в программу... ;)

← →
Leonid Troyanovsky © (2005-10-10 13:23) [4]

> Zhekson (10.10.05 11:41) [2]
> никак однако...

Установлен dgRowSelected?
Попробуй:
type TCrackGrid = class(TDBGrid); procedure TForm1.SpeedButton1Click(Sender: TObject); begin TCrackGrid(DBGrid1).LeftCol := def_pos; end;
--
Regards, LVT.

← →
Zhekson (2005-10-10 17:46) [5]

sniknik © (10.10.05 11:59) [3]
смех, смехом, а " воз и ныне там"

← →
Zhekson (2005-10-10 17:57) [6]

проблема в том, что нужно чтобы dgRowSelected = false, иначе я не смогу редактировать таблиуц...

> Zhekson (10.10.05 17:57) [6]
> проблема в том, что нужно чтобы dgRowSelected = false, иначе
> я не смогу редактировать таблиуц...

Это, как раз, не проблема.
Бо, именно dgRowSelected = true препятствует SelectedIndex.

Так что, действительно, смешно получается.

--
Regards, LVT.

Полоса прокрутки в DBGrid Найти похожие ветки