Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.62/13: Рейтинг темы: голосов - 13, средняя оценка - 4.62
 Аватар для terri
8 / 8 / 4
Регистрация: 12.05.2014
Сообщений: 233

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

28.05.2014, 18:14. Показов 3237. Ответов 40
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Привет всем. Можно ли сделать так, чтобы таблица была статической на форме делфи, а содержание было динамическим?
Например: Есть кнопка "Продавцы" и при нажатии открывается таблица "Продавцы" и там все написано про продавцов, но есть еще кнопка "Закупщики", которая должна открывать таблицу "Закупщики". Вот меня интересует момент такой:
вместо открытия новой таблица "Закупщики" в старой таблице "Продавцы" должны измениться столбцы под те названия, кот. есть в "Закупщики".
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
28.05.2014, 18:14
Ответы с готовыми решениями:

Возможно ли сделать так, чтобы таблица в Excel была связана с таблицей в Аксесе?
А может и нет. Скажите, подалуйста, а возможно ли сделать так, чтобы таблица в Excel была связана с таблицей в Аксесе. Первая таблица...

Как сделать так, чтобы можно было выводить текст в форме
1. Как сделать так, чтобы можно было выводить текст в форме ? Например, как в калькуляторе - ты нажал button и оно вывело цифру, которая...

Есть ли способ сделать так, чтобы ссылки на youtube открывались не в браузере а в VLC ?
https://www.youtube.com/watch?***** большинство линков начинаются на именно так, если их скопировать и вставить в проигрыватель, то он...

40
 Аватар для terri
8 / 8 / 4
Регистрация: 12.05.2014
Сообщений: 233
30.05.2014, 20:47  [ТС]
Студворк — интернет-сервис помощи студентам
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
smemo1.Show;sdbgrid1.Show;
smemo2.Show; sbitbtn8.Show;
With sDBGrid1 do begin
DataSource :=DataSource2;
Columns[1].Title.Caption := 'Тип';
Columns[2].Title.Caption := 'Имя';
Columns[3].Title.Caption := 'Описание';
  ControlPanel.ADOQuery1.active:=false;
  ControlPanel.ADOQuery1.Close;
  ControlPanel.ADOQuery1.SQL.Clear;
   ControlPanel.ADOQuery1.SQL.Text:='Select * from [Пользователи] where [Логин]=:pLogin';
   ControlPanel.ADOQuery1.Parameters.ParamByName('pLogin').Value := login.login1.text;
    ControlPanel.ADOQuery1.Open;
    ControlPanel.ADOQuery1.active:=true;
0
Эксперт Pascal/Delphi
 Аватар для droider
4892 / 2825 / 866
Регистрация: 04.10.2012
Сообщений: 10,270
30.05.2014, 21:35
Цитата Сообщение от terri Посмотреть сообщение
sdbgrid1.Show;
а это зачем?
0
 Аватар для terri
8 / 8 / 4
Регистрация: 12.05.2014
Сообщений: 233
30.05.2014, 21:40  [ТС]
А это нужно. У меня дизайн такой. Без него никак. Да и не влияет же это
0
Эксперт Pascal/Delphi
 Аватар для droider
4892 / 2825 / 866
Регистрация: 04.10.2012
Сообщений: 10,270
30.05.2014, 21:43
Цитата Сообщение от terri Посмотреть сообщение
У меня дизайн такой
к дизайну это не имеет никакого отношения.
DataSource2 привязан к ADOQuery1?
0
 Аватар для terri
8 / 8 / 4
Регистрация: 12.05.2014
Сообщений: 233
30.05.2014, 21:52  [ТС]
Да, привязан
0
Эксперт Pascal/Delphi
 Аватар для droider
4892 / 2825 / 866
Регистрация: 04.10.2012
Сообщений: 10,270
30.05.2014, 21:56
terri, 8-ю и 14-ю строчки тоже уберите
0
 Аватар для terri
8 / 8 / 4
Регистрация: 12.05.2014
Сообщений: 233
30.05.2014, 21:58  [ТС]
Ничего не изменилось. Не выводит результат
0
Эксперт Pascal/Delphi
 Аватар для droider
4892 / 2825 / 866
Регистрация: 04.10.2012
Сообщений: 10,270
30.05.2014, 22:01
terri, в любом случае, они лишние

Добавлено через 2 минуты
В каком случае, в Вашей программе, должна меняться информация, отображаемая в гриде?
0
 Аватар для terri
8 / 8 / 4
Регистрация: 12.05.2014
Сообщений: 233
30.05.2014, 22:35  [ТС]
Когда мы нажимаем на другую кнопку. Например, вывода товара. Сделано на одной форме*

Добавлено через 32 минуты
Да.
0
пофигист широкого профиля
4770 / 3206 / 862
Регистрация: 15.07.2013
Сообщений: 18,613
30.05.2014, 23:08
В коде приведенном в #21 не видно присвоения значений свойству Columns[].FieldName
0
 Аватар для terri
8 / 8 / 4
Регистрация: 12.05.2014
Сообщений: 233
30.05.2014, 23:09  [ТС]
И по этому не выводится информация с другой таблицы? Просто пустоту?
0
пофигист широкого профиля
4770 / 3206 / 862
Регистрация: 15.07.2013
Сообщений: 18,613
30.05.2014, 23:14
Естесственно.
0
 Аватар для terri
8 / 8 / 4
Регистрация: 12.05.2014
Сообщений: 233
30.05.2014, 23:28  [ТС]
А можешь пример привести на счет поправки? Что вводить то нужно?
0
пофигист широкого профиля
4770 / 3206 / 862
Регистрация: 15.07.2013
Сообщений: 18,613
30.05.2014, 23:36
Добавлено через 1 минуту
Так сам же уже писал
Цитата Сообщение от terri Посмотреть сообщение
Columns[0].FieldName := 'Название в бд';
1
 Аватар для terri
8 / 8 / 4
Регистрация: 12.05.2014
Сообщений: 233
31.05.2014, 00:55  [ТС]
Cпасибо!! Выручили ребятки

Добавлено через 49 минут
А как сделать, чтобы в DBGRID можно было изменить ширину для столбца? У нас же общий DBGRID, а размер не меняется то. Изменив размер DBGRID для одной таблицы, оно изменится и для другой.
Есть команда
Delphi
1
Form1.DBGrid1.Fields[N].DisplayWidth:=100
Но она не работает корректно.
+ Можно сделать, чтобы автоматически определяло кол-во столбцов?
0
пофигист широкого профиля
4770 / 3206 / 862
Регистрация: 15.07.2013
Сообщений: 18,613
31.05.2014, 01:00
Цитата Сообщение от terri Посмотреть сообщение
А как сделать, чтобы в DBGRID можно было изменить ширину для столбца?
TColumn.Width
Цитата Сообщение от terri Посмотреть сообщение
кол-во столбцов
TDBGrid.Columns.Count
1
 Аватар для terri
8 / 8 / 4
Регистрация: 12.05.2014
Сообщений: 233
31.05.2014, 02:06  [ТС]
Пишу
Delphi
1
DBGrid1.Columns[1].width := 250;
и увеличивается ширина грида двух таблиц, а нужно одной. Как там написать?
Delphi
1
DataSource2.DBGrid1.Columns[1].width := 250
0
пофигист широкого профиля
4770 / 3206 / 862
Регистрация: 15.07.2013
Сообщений: 18,613
31.05.2014, 02:42
Цитата Сообщение от terri Посмотреть сообщение
и увеличивается ширина грида двух таблиц, а нужно одной.
Увеличивается ширина второй колонки DBGrid1. Каких "двух таблиц" если показывается в некий момент времени только одна? Имхо, и ширину столбцов нужно менять при переключении на другую таблицу.
0
 Аватар для terri
8 / 8 / 4
Регистрация: 12.05.2014
Сообщений: 233
31.05.2014, 15:07  [ТС]
У меня же в DBGRID1 много таблиц... Нажимаем на одну кнопку - одна таблица с определенной шириной, нажимаем на другую кнопку - тот же грид, но другая таблица с той же шириной, что и первая кнопка. Мне нужно изменять ширину столбца в другой таблице так, чтобы размер первой оставался прежним.
0
пофигист широкого профиля
4770 / 3206 / 862
Регистрация: 15.07.2013
Сообщений: 18,613
31.05.2014, 16:11
Либо ты каждый раз при переключении таблиц подгоняешь все параметры грида. Либо кинь на форму столько гридов, сколько у тебя таблиц, настрой каждый грид на свою таблицу и менять при переключении видимость гридов.
Delphi
1
2
DBGrid1.Visible:=True;
DBGrid2.Visible:=False;
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
31.05.2014, 16:11
Помогаю со студенческими работами здесь

Как сделать так чтобы не надо было создавать заново компоненты на второй форме
Имеется 2 формы. На второй вот такое. -OleDbConnection -OleDbDataAdapter -DataSet -DataGridView На второй форме у меня...

Как сделать так, чтобы у картинки в формате .png не было белого фона на форме
Как сделать так, чтобы у картинки в формате .png не было белого фона на форме(картинка изначально без фона)?Или чтобы она принимала в...

Сделать в пользовательской форме так, чтобы можно было добавлять не один товар, а много
Задача такая, я пишу курсовик. Это типа программа для клиента который пришел в пришел в магазин. У меня есть прайс, сотрудники и тд....

Есть ли способ сделать так, чтобы при подключении к сети, онкомпьютер автоматически передал мне свой ip адрес?
У меня есть компьютер, который в скором времени должны забрать. Есть ли способ сделать так, чтобы когда компьютер подключили к сети, он...

Змейка: Как сделать так, чтобы одни яблоки можно было есть, а вторые нет
void PlusJabloko(Game &g) //Функция разброски яблок { int i,x,y; int n = g.gaduka.PCount; do { x = rand() % 56+3; // ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
40
Ответ Создать тему
Новые блоги и статьи
[golang] Угол между стрелками часов
alhaos 12.05.2026
По заданным значениям часа и минуты необходимо определить значение меньшего угла между стрелками аналогового циферблата часов. import "math" func angleClock(hour int, minutes int) float64 { . . .
Debian 13: Установка Lazarus QT5
ВитГо 09.05.2026
Эта инструкция моя компиляция инструкций volvo https:/ / www. cyberforum. ru/ blogs/ 203668/ 10753. html и его же старой инструкции по установке Lazarus с gtk2. . .
Нейросеть на алгоритме "эстафета хвоста" как перспектива.
Hrethgir 06.05.2026
На десерт, когда запущу сервер. Статья тут https:/ / habr. com/ ru/ articles/ 1030914/ . Автор я сам, нейросеть только помогает в вопросах которые мне не известны - не знаю людей которые знали-бы. . .
Асинхронный приём данных из COM-порта
Argus19 01.05.2026
Асинхронный приём данных из COM-порта Купил на aliexpress термопринтер QR701. Он оказался странным. Поключил к Arduino Nano. Был очень удивлён. Наотрез отказывается печатать русские буквы. Чтобы. . .
попытка написать игровой сервер на C++
pyirrlicht 29.04.2026
попытка написать игровой сервер на плюсах с открытым бесконечным миром. возможно получится прикрутить интерпретатор питон для кастомизации игровой логики. что есть на текущий момент:. . .
Контроль уникальности выбранного документа-основания при изменении реквизита
Maks 28.04.2026
Алгоритм из решения ниже разработан на примере нетипового документа "ЗаявкаНаРемонтСпецтехники", разработанного в КА2. Задача: уведомлять пользователя, если указанная заявка (документ-основание). . .
Благородство как наказание
Maks 24.04.2026
У хорошего человека отношения с женщинами всегда складываются трудно. А я человек хороший. Заявляю без тени смущения, потому что гордиться тут нечем. От хорошего человека ждут соответствующего. . .
Валидация и контроль данных табличной части документа перед записью
Maks 22.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru