|
Вопрос # 423/ вопрос открыт / |
|
Приветствую!!!Как в DBGrid-е колонки местами поменять.
 |
Вопрос задал: KilkaMS (статус: Посетитель)
Вопрос отправлен: 23 марта 2007, 00:08
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: Николай Рубан
Вам нужно описать такой тип:
type
THackAccess = class(TCustomGrid);
Далее в секции implementation написать таку процедуру:
procedure MoveDBGridColumns(DBGrid: TDBGrid; FromColumn, ToColumn: Integer);
begin
THackAccess(DBGrid).MoveColumn(FromColumn, ToColumn);
end;
А вот пример использования процедуры:
procedure TForm1.Button1Click(Sender: TObject);
var n,k:integer;
begin
MoveDBGridColumns(DBGrid1, k, n)
MoveDBGridColumns(DBGrid1, n-1, k);
end;
В процедуре меняются n-й и k-й столбцы DBGrid1. Пример взят и переработан с http://www.swissdelphicenter.ch/en/tipsindex.php
Good Luck!!!
 |
Ответ отправил: Николай Рубан (статус: 10-ый класс)
Время отправки: 23 марта 2007, 00:59
Оценка за ответ: 5
|
Мини-форум вопроса
Всего сообщений: 2; последнее сообщение — 24 марта 2007, 10:59; участников в обсуждении: 2.
|
Алиев Шамсидин (статус: Посетитель), 24 марта 2007, 07:31 [#1]:
Если на стадии разработки то очень просто !
Откройте на ObjectTreeView DBGrid далее захвать
курсором колонку и вставить где нужно !
|
|
|
KilkaMS (статус: Посетитель), 24 марта 2007, 10:59 [#2]:
Хорошая шутка.Спасибо но меня интересует во время прогона программы.
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
