Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 15.06.2009, 14:39
Fonoman Fonoman вне форума
Прохожий
 
Регистрация: 12.06.2009
Сообщения: 21
Репутация: 10
Вопрос Тест в RadioGroup

подскажите люди добрые
как сделать
что из текстового файла брался текст
и вставлялся в RadioGroup
Например
0: Вася
1: Петя
2: Маша
Ответить с цитированием
  #2  
Старый 15.06.2009, 21:31
roamer roamer вне форума
Активный
 
Регистрация: 15.04.2009
Сообщения: 369
Репутация: 93
Сообщение

У TRadioGroup есть свойство :

Items : TStrings;

А у TStrings есть метод:

LoadFromFile(...);
Ответить с цитированием
  #3  
Старый 16.06.2009, 14:27
Fonoman Fonoman вне форума
Прохожий
 
Регистрация: 12.06.2009
Сообщения: 21
Репутация: 10
По умолчанию

Ну это я разобрался, спасибо
а как сделать так что бы в одном txt можно было выбирать
а не создовать отдельнее txt

Например

Вася
Петя
Маша
--------
Коля
Саша
Даша
Ответить с цитированием
  #4  
Старый 16.06.2009, 15:36
AlexSku AlexSku вне форума
Специалист
 
Регистрация: 07.05.2007
Адрес: Москва
Сообщения: 884
Репутация: 21699
По умолчанию

Использовать секции ini-файла.
http://www.delphisources.ru/forum/showthread.php?t=8486
Ответить с цитированием
  #5  
Старый 16.06.2009, 15:59
Fonoman Fonoman вне форума
Прохожий
 
Регистрация: 12.06.2009
Сообщения: 21
Репутация: 10
По умолчанию

я читал этот пост

начинаю писать

MyIniFile: TIniFile; \\ в этом месте ругается.

значит чего не хватает наверное function надо какую то (

Последний раз редактировалось Fonoman, 16.06.2009 в 17:12.
Ответить с цитированием
  #6  
Старый 16.06.2009, 16:22
Fonoman Fonoman вне форума
Прохожий
 
Регистрация: 12.06.2009
Сообщения: 21
Репутация: 10
По умолчанию

что за Теги ? Поиском что ли ?
Ответить с цитированием
  #7  
Старый 16.06.2009, 17:01
Аватар для Admin
Admin Admin вне форума
Администратор
 
Регистрация: 03.10.2005
Адрес: Россия, Москва
Сообщения: 1,553
Версия Delphi: Delphi 7
Репутация: выкл
По умолчанию

Цитата:
Сообщение от Fonoman
что за Теги ? Поиском что ли ?
Я про оформление кода. Прекращаем оффтоп )
Ответить с цитированием
  #8  
Старый 16.06.2009, 22:57
Fonoman Fonoman вне форума
Прохожий
 
Регистрация: 12.06.2009
Сообщения: 21
Репутация: 10
По умолчанию

Возник следующий вопрос
я разобрался с TIniFile

Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
inc(b);
case b of
1:
 begin
  IniFile.ReadSection('primer',RadioGroup1.Items);\\ как сделать что бы тут
выбирая правильный ответ из RadioGroup1 прибавлялось 1 пункт 
   end;
Ответить с цитированием
  #9  
Старый 17.06.2009, 12:41
AlexSku AlexSku вне форума
Специалист
 
Регистрация: 07.05.2007
Адрес: Москва
Сообщения: 884
Репутация: 21699
По умолчанию

Код:
if RadioGroup1.ItemIndex = <прав. номер> then Inc(<пункт>);
Это вставить в RG.OnClick или, если дать возможность неуверенному пользователю исправить вариант, то в обработчик какой-нибудь кнопки ("Окончательное решение").
Ответить с цитированием
  #10  
Старый 17.06.2009, 14:22
Fonoman Fonoman вне форума
Прохожий
 
Регистрация: 12.06.2009
Сообщения: 21
Репутация: 10
По умолчанию

Точно а я в Кнопке это всё прописывал
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 00:13.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025