Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2002.06.20;
Скачать: [xml.tar.bz2];

Вниз

Как зафиксиовать столбцы   Найти похожие ветки 

 
Андр   (2002-05-16 19:13) [0]

Как сделать 1 либо несколько столбцов фиксированными,т.е.,чтобы при скролинге столбцов они были неподвижными


 
dimis   (2002-05-16 19:35) [1]

свойство DBGrid.Fixedcols


 
Андр   (2002-05-16 20:08) [2]

А как добраться


 
dimis   (2002-05-16 20:32) [3]

ДО ЧЕГО ДОБРАТЬСЯ?
это обычный столбец, обращайся как всегда
Query.FieldByName("..").AsString
он просто всегда будет на экране.


 
Андр   (2002-05-16 20:39) [4]

Как установить DBGrid.Fixedcols,я к этому свойству не мого добраться.Зараннее СПАСИБО.


 
dimis   (2002-05-17 08:49) [5]

виноват
моя ощибка
я использую RXDBGRid и там это свойство есть,я думал оно и в обычном DBGride есть. переходи на него, тем более что у обычных наследников TdrawGrid есть некоторые ошибки(по крайней мере в D5), а в Rx их можно испранить.


 
Vladislav   (2002-05-17 17:04) [6]

Сетки, не предназначенные для работы с данными, имеют свойства FixCols и FixRows, которые не позволяют данным прокручиваться, но эти свойства не были унаследованы TDBGrid.

Обходной путь для TDrawGrid:

TDrawGrid(DBGrid1).FixedCols := 2;


 
nvi   (2002-05-28 11:20) [7]

Все бы хорошо было в RX, да вот, зафиксированные столбцы отражаются тем же цветом, что и заголовки. Попытка изменения цвета зафиксированного столбца ведет к изменению цвета заголовка...


 
dimis   (2002-05-28 12:49) [8]

это обходится
на событие onDrawDataCell вышаешь такой обработчик

procedure RxDBGrid1DrawDataCell(Sender: TObject;
const Rect: TRect; Field: TField; State: TGridDrawState);
iF TRXDBGrid(Sender).DataSource.DataSet.fieldByName("my_fielb").AsInteger=1
Then Begin
TRXDBGrid(Sender).Canvas.Brush.Color:=clSilver;
TRXDBGrid(Sender).Canvas.Font.Color:=clBlack;;
End;
end;

это стандарт раскраски gridов,так даже картинки можно вставлять


 
dimis   (2002-05-28 12:53) [9]

или не так. то что тебе нужно делается так

if Field.FieldNo=0
Then Begin
TRXDBGrid(Sender).Canvas.Brush.Color:=clSilver;
TRXDBGrid(Sender).Canvas.Font.Color:=clBlack;;
End;



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

Форум: "Базы";
Текущий архив: 2002.06.20;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.005 c
14-65219
MisterBin
2002-05-17 21:34
2002.06.20
Без каких программ вы не можете обойтись?


1-65003
@andrew
2002-06-08 13:39
2002.06.20
ПРИВЕТ ВСЕМ!!! Как мне зная УРЛ вернуть содержание страницы?


1-65075
vitall
2002-06-10 13:38
2002.06.20
Как посимвольно прочитать значения из Edit?


1-65150
mixVictor
2002-06-04 02:36
2002.06.20
Невидимая форма


6-65198
VJar
2002-04-07 01:47
2002.06.20
Отправка почты без формы





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский