Проблема с RadioGroup

@Оленька · Регистрация: 11.04.2008

Студворк — интернет-сервис помощи студентам

У меня есть RadioGroup, в нем 4 записи.При выборе пользователем одной изи записи мне необходимо данную запись занести в таблицу,а при редактировании, необходимо чтобы данные из таблицы отобразились в RadioGroup, т.е. выделилась нужная строка.
Первое я сделала, а как можно сделать вторую часть????? Также необходимо, что бы при повторном открытии формы RadioGroup не был заполнен (выделен), как можно это сделать?????

@MAcK · 03.09.2008, 11:21

Второе тоже не трудно, нужно проверить текст всех записей с редактируемой строкой и выделить нужную

Добавлено через 1 минуту 16 секунд
Какой компенент используете для отображения текста?

@Оленька · 03.09.2008, 11:33 **[ТС]**

Какой компенент используете для отображения текста?[/quote]

Какой текст????? Мне надо выбрать в RadioGroup нужное и занести его в таблицу. Например у меня в RadioGroup содержится: основной, вспомогательный, вспомогательный(мультиэнергетика) и субабоненты. в таблице в виде цеха записываются соответствующие записи, теперь мне надо из таблицы в RadioGroup передать эти данные(чтобы выделилось именно то, что написано в таблице).
Использую только RadioGroup и больше ничего.

@Lord_Voodoo · 03.09.2008, 11:55

просто организуйте поиск по Items RadioGroup и заданный отметьте, что сложного, есть даже метод для Items IndexOf - возвращает индекс элемента по передаваемому в качестве параметра тексту...

@Angry_Bobo · 03.09.2008, 11:58

Сообщение от Оленька

Какой текст????? Мне надо выбрать в RadioGroup нужное и занести его в таблицу. Например у меня в RadioGroup содержится: основной, вспомогательный, вспомогательный(мультиэнергетика) и субабоненты. в таблице в виде цеха записываются соответствующие записи, теперь мне надо из таблицы в RadioGroup передать эти данные(чтобы выделилось именно то, что написано в таблице).
Использую только RadioGroup и больше ничего.

А что в таблице сохранено RadioGroup.Items.Strings[RadioGroup.ItemIndex] или RadioGroup.ItemIndex?

Если ItemIndex, то все просто RadioGroup.ItemIndex := <значение из таблицы>;
Если сохраняется текст, то пробежать циклом от 0 до RadioGroup.Items.Count - 1 и сравнивать RadioGroup.Items.Strings[i] с значением из таблицы.

@Оленька · 03.09.2008, 12:12 **[ТС]**

Я пишу строку:
Form2.RadioGroup1.ItemIndex:=Form4.Table 1.FieldByName('VID').Value;

на что мне выдается ошибка:
Could not convert variant of type (String) into type (Boolean)

@Lord_Voodoo · 03.09.2008, 12:14

а что это ты делаешь, если не секрет? надо писать примерно так:

Code
1
2
Form2.RadioGroup1.ItemIndex:=
Form2.RadioGroup1.Items.IndexOf(Form4.Table1.FieldByN ame('VID').AsString);

@Оленька · 03.09.2008, 12:22 **[ТС]**

тогда получается и эта строчка не рпавильная:
Form4.Table1.FieldByName('VID').Value:=F orm2.RadioGroup1.ItemIndex;
Он мне передает в таблицу только номер выбранного RadioGroup, а мне надо значение.

И все равно при редактировании, из таблицы в RadioGroup не передается значение, мне надо, чтобы RadioGroup выделялся маркером, а он пустой:'(

@Lord_Voodoo · 03.09.2008, 12:25

ну почитайте вы справку хоть раз, ItemIndex - возвращает индекс маркированного элемента, а сами надписи хранятся в свойстве Items...

Code
1
2
Form4.Table1.FieldByName('VID').Value:=
Form2.Radio Group1.Items.Strings[Form2.Radio Group1.ItemIndex];

@Оленька · 03.09.2008, 12:32 **[ТС]**

Code
1
2
Form2.RadioGroup1.ItemIndex:=
Form2.RadioGroup1.Items.IndexOf(Form4.Table1.FieldByName('VID').AsString);

[/quote]

Если не секрет, что эта строчка делает????? У меня она вообще не действует, после ее выполнения у меня RadioGroup вообще пустой (не одна запись не выделена маркером)

@Lord_Voodoo · 03.09.2008, 12:35

ну вообще это поиск по надписям RadioGroup, а какое значение в Form4.Table1.FieldByName('VID').AsString хранится? тут надо потрассировать, какие значения приходят

@Оленька · 03.09.2008, 12:54 **[ТС]**

Сообщение от WooDooMan

а какое значение в Form4.Table1.FieldByName('VID').AsString хранится?

Значения те же что и в RadioGroup: Основной цех
Вспомогательный цех
Вспомогательный цех (Мультиэнергетика)
Субабоненты

@Lord_Voodoo · 03.09.2008, 12:56

так ты пошагово смотрела, что конкретно хранится на этапе выполнения?

@Оленька · 03.09.2008, 13:04 **[ТС]**

Сообщение от WooDooMan

так ты пошагово смотрела, что конкретно хранится на этапе выполнения?

он мне не показывает, что происходит...

@Lord_Voodoo · 03.09.2008, 13:05

это как? неужели в дельфи нет пошагового выполнения и средств для дебага, вроде бы были... покажи вообщем этот кусок проги, надо глянуть, что ты там наваяла...

@Оленька · 03.09.2008, 13:25 **[ТС]**

Пошагово он делает. Ставлю точку останова на строчке:
Form2.RadioGroup1.ItemIndex:=Form2.Radio Group1.Items.IndexOf(Form4.Table1.FieldB yName('VID').AsString);
до формы 4 он все выполняет, а на 4 глючится, и комп мне повесил.

вот сам код программы на кнопку "Редактировать":

Code
1
2
3
4
5
6
7
8
9
10
procedure TForm4.Button3Click(Sender: TObject);
begin
  Form2.Edit1.Text:=Form4.Table1.FieldByName('KOD').Value;
  Form2.Edit2.Text:=Form4.Table1.FieldByName('NAME').Value;
  Form2.RadioGroup1.ItemIndex:=Form2.RadioGroup1.Items.IndexOf(Form4.Table1.FieldByName('VID').AsString);
  Form2.Button2.Visible:=false;
  Form2.Button4.Visible:=true;
  Form2.Show;
  Form4.Hide;
end;

Добавлено через 6 минут 43 секунды
Можно сказать почти работает, выделяет почти все, но когда я хочу отредактировать 3 вид цеха, он мне его не выделяет, а с остальными проблем нет)))

@Lord_Voodoo · 03.09.2008, 13:37

Сообщение от Оленька

Можно сказать почти работает, выделяет почти все, но когда я хочу отредактировать 3 вид цеха, он мне его не выделяет, а с остальными проблем нет)))

это ты про что? можно подробнее - не понял...

@Оленька · 03.09.2008, 13:45 **[ТС]**

Сообщение от WooDooMan

можно подробнее

У меня в RadioGroup 4 варианта, т.е. в таблицу я заношу записи и в поле "VID" заносятся данные из RadioGroup. Таблица находится на 4 форме. Форма заполнения, на которой RadioGroup на 2. Затем я открываю таблицу (форму 4) выбираю любую запись, нажимаю кнопку "Редактировать" и автоматически попадаю на форму заполнения (форма 2), где данные строки таблицы, которую я хочу отредактировать занесены по эдитам и в RadioGroup. С 1,2 и 4 записью RadioGroup это работает, но стоит выбрать в таблице строку, где в поле 'VID' находится значение 3 записи RadioGroup, то RadioGroup на 2 форме не выделяется маркером, а вообще в RadioGroup ничего не выделено (пусто).

Надеюсь понятно

старалась, как могла

@Lord_Voodoo · 03.09.2008, 13:48

а может действительно они отличаются в написании? если с остальными работает, а вообще я бы на твоем месте динамически формировал бы этот радиогруп, запросом выбирал все значения поля вид и заполнял бы в конструкторе формы элементы радиогруп, так уж точно все названия будут совпадать...

@Оленька · 03.09.2008, 13:51 **[ТС]**

Сообщение от WooDooMan

а может действительно они отличаются в написании? если с остальными работает, а вообще я бы на твоем месте динамически формировал бы этот радиогруп, запросом выбирал все значения поля вид и заполнял бы в конструкторе формы элементы радиогруп, так уж точно все названия будут совпадать...

а у меня как???? Разместила на форме RadioGroup, и в свойствах Items написала 4 названия.... с 1,2 и 4 названием прога нормально работает, а с 3 не хочет...

Я же в таблицу в поле "Вид" заношу из RadioGroup... как они могут не совпадать?????

Все я разобралась, почему 3 надпись не работала, это я немного ступила))))))

А как можно очистить RadioGroup, чтобы при открытии формы в ней не было маркеров????

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»	SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .

@Оленька 24 / 24 / 1 Регистрация: 11.04.2008 Сообщений: 541

	Проблема с RadioGroup 03.09.2008, 11:08. Показов 10459. Ответов 28 Метки нет (Все метки) У меня есть RadioGroup, в нем 4 записи.При выборе пользователем одной изи записи мне необходимо данную запись занести в таблицу,а при редактировании, необходимо чтобы данные из таблицы отобразились в RadioGroup, т.е. выделилась нужная строка. Первое я сделала, а как можно сделать вторую часть????? Также необходимо, что бы при повторном открытии формы RadioGroup не был заполнен (выделен), как можно это сделать????? 0

@MAcK Комбайнёр 1606 / 704 / 77 Регистрация: 27.05.2008 Сообщений: 2,535
	03.09.2008, 11:21
	Второе тоже не трудно, нужно проверить текст всех записей с редактируемой строкой и выделить нужную Добавлено через 1 минуту 16 секунд Какой компенент используете для отображения текста? 1

@Оленька 24 / 24 / 1 Регистрация: 11.04.2008 Сообщений: 541
	03.09.2008, 11:33 [ТС]
	Какой компенент используете для отображения текста?[/quote] Какой текст????? Мне надо выбрать в RadioGroup нужное и занести его в таблицу. Например у меня в RadioGroup содержится: основной, вспомогательный, вспомогательный(мультиэнергетика) и субабоненты. в таблице в виде цеха записываются соответствующие записи, теперь мне надо из таблицы в RadioGroup передать эти данные(чтобы выделилось именно то, что написано в таблице). Использую только RadioGroup и больше ничего. 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	03.09.2008, 11:55
	просто организуйте поиск по Items RadioGroup и заданный отметьте, что сложного, есть даже метод для Items IndexOf - возвращает индекс элемента по передаваемому в качестве параметра тексту... 0

@Оленька 24 / 24 / 1 Регистрация: 11.04.2008 Сообщений: 541
	03.09.2008, 12:12 [ТС]
	Я пишу строку: Form2.RadioGroup1.ItemIndex:=Form4.Table 1.FieldByName('VID').Value; на что мне выдается ошибка: Could not convert variant of type (String) into type (Boolean) 0

@Оленька 24 / 24 / 1 Регистрация: 11.04.2008 Сообщений: 541
	03.09.2008, 12:22 [ТС]
	тогда получается и эта строчка не рпавильная: Form4.Table1.FieldByName('VID').Value:=F orm2.RadioGroup1.ItemIndex; Он мне передает в таблицу только номер выбранного RadioGroup, а мне надо значение. И все равно при редактировании, из таблицы в RadioGroup не передается значение, мне надо, чтобы RadioGroup выделялся маркером, а он пустой:'( 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	03.09.2008, 12:35
	ну вообще это поиск по надписям RadioGroup, а какое значение в Form4.Table1.FieldByName('VID').AsString хранится? тут надо потрассировать, какие значения приходят 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	03.09.2008, 12:56
	так ты пошагово смотрела, что конкретно хранится на этапе выполнения? 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	03.09.2008, 13:05
	это как? неужели в дельфи нет пошагового выполнения и средств для дебага, вроде бы были... покажи вообщем этот кусок проги, надо глянуть, что ты там наваяла... 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	03.09.2008, 13:48
	а может действительно они отличаются в написании? если с остальными работает, а вообще я бы на твоем месте динамически формировал бы этот радиогруп, запросом выбирал все значения поля вид и заполнял бы в конструкторе формы элементы радиогруп, так уж точно все названия будут совпадать... 0