Перейти к содержанию
  • 0
Mazzay

Как в TStringGrid или TGrid зафиксировать первый столбец

Вопросы

Есть хоть какая-нибудь возможность зафиксировать первый столбец, чтобы он не прокручивался?

То есть нужен аналог свойства FixedCols из VCL,

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

Рекомендуемые сообщения

  • 0

Сделал в результате два грида: левый — с одним столбцом, правый — с остальными. Прокрутку синхронизировал:

void __fastcall TMainForm::Grid2ViewportPositionChange(TObject *Sender, const TPointF &OldViewportPosition, const TPointF &NewViewportPosition,
					const bool ContentSizeChanged)
{
	Grid1->ViewportPosition = TPointF(Grid1->ViewportPosition.X, Grid2->ViewportPosition.Y);
}

void __fastcall TMainForm::Grid1ViewportPositionChange(TObject *Sender, const TPointF &OldViewportPosition, const TPointF &NewViewportPosition,
					const bool ContentSizeChanged)
{
	Grid2->ViewportPosition = TPointF(Grid2->ViewportPosition.X, Grid1->ViewportPosition.Y);
}

 

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить на вопрос...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.


  • Похожий контент

    • От BelovAlex
      Приветствую!
      Изменить цвет фона или текста заголовка tstringgrid можно на событии DrawColumnHeader. Но хотелось сделать это с помощью стилей в designtime. Есть ли такая возможность?
      Добавление стилей headeritem приводит в конечном счете к полному обвалу 10.2. При изменении свойств headeritem сначала выскакивает ошибка Intrerface not supported, ну, а потом, любимый access violation в fmx250.bpl. В 10.3 ошибка повторилась
    • От AlexM
      Win10
      Delphi 10.3.1
      необходимо реализовать редактирования ячейки TGrid, на котором есть LiveBindings
      нужна маска редактирования и шрифт

      пробовал OnCreateCustomEditor
      procedure TForm1.Grid1CreateCustomEditor(Sender: TObject;   const Column: TColumn; var Control: TStyledControl); var   tmpEdit: TEdit; begin   tmpEdit := TEdit.Create(self);   tmpEdit.MaxLength := 3;   tmpEdit.Font.Style := tmpEdit.Font.Style + [TFontStyle.fsUnderline];   Control := tmpEdit; end; MaxLength работает ок, но хотелось бы всё-таки маску
      жирный шрифт не устанавливается
      введенное значение не сохраняется, по окончании редактирования восстанавливается старое значение, даже если tmpEdit в LiveBindings привязать к LinkFillControlToField
    • От Morfi
      Доброго времени суток.
      Нашел проблему при написании кастомного грида, который наследуется от TCustomGrid:
      При использовании LiveBindings  между кастомным гридом и набором данных, после закрытия среды вываливается AV:

       

       
      Подскажите, что я упустил?
       
      Минимальный код кастомного грида:
       
    • От Алиса Романец
      Доброго времени суток всем!
      В VCL была возможность скрыть полосы прокрутки на TStringGrid. Оно не отключало скролл, но оно позволяло спокойно сделать таблицу с n-ым количеством колонок одинаковой ширины без появления горизонтальной полосы проркрутки. Есть ли что-то подобное в FireMonkey, а в особенности отключение не всех сразу, а лишь одной (горизонтальной) полосы прокрутки?
    • От SIARHEI RAHOUSKI
      Здравствуйте, у меня возник вопрос Как базу данных подключить к TGrid? Я использую Delphi XE3 и База данных Accsess: ADOConnection + ADOQuery + DataSource. И вот как отобразить в TGrid Таблицу бд ?
    • От niddarun
      На форме стоит tgrid при прокрутке есть заддержка. не большая но все равно не приянто. программа под windows. И еще при прокрутке идет нагрузка на процессор. 
    • От Sashar333
      Здравствуйте!
      Помогите разобраться пожалуйста.
      Delphi 10.1 и 10.2, Windows
      Программа прекрасно работала и программировалась.
      Добавил две колонки в StringGrid:

      сразу понял что не красиво и попытался их удалить(ничего в программе больше не менял и не добавлял!?) таким образом:

      но после нажатии кнопки "Delete" получил сообщение:

      дальше программировать, данный проект, нет возможности из таких сообщений и дальнейших разрушительных сбоев
      при новой загрузке проекта в DELPHI все работает и запускается, Project1.exe из Debug'а тоже работает.
      Но стоит только в DELPHI попытать что то сделать(бывает достаточно навести курсор мыши) с именно этим StringGrid то сразу выдает ошибки:


      помогает полное удаление StringGrid но так как 
      это не в первый раз и в разных версиях это сильно напрягает
      переустановки delphi не помогают
      может кто знает в чем дело?
      Заранее спасибо за ответ...
    • От GoldenEalge
      Всем привет, подскажите как организовать MultiSelect в grid
      Нашел статью ,но как понимаю она уже не очень актуальна
      Поиск по форуму тоже не дал результатов
    • От Павел Караваев
      Добрый вечер, форумчане! Возможно ли менять ширину разделительных линий в StringGrid'е, гугол мне с этим не помог. Мне необходимо каждую пятую вертикальную и каждую пятую горизонтальную линию чуть шире остальных.(Delphi 10.2, Windows)
    • От Павел Караваев
      Люди добрые, помогите) Я не понимаю, как закрасить ячейки в зависимости от информации в данной ячейке. Если в ячейке 1, то нужно покрасить белым, если 0, то чёрным. Имеющиеся на форуме ответы не помогают, ячейки не красятся=(
  • Последние посетители   0 пользователей онлайн

    Ни одного зарегистрированного пользователя не просматривает данную страницу

×
×
  • Создать...