Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.07.25;
Скачать: CL | DM;

Вниз

TRadioGroup и файл   Найти похожие ветки 

 
Norfolk   (2004-07-09 18:13) [0]

Доброго времени суток.
Проблема в следующем:
Имеется файл в котором находится запись:

TSettings = record
   Name1, Name2, Name3, Name4, Name5, Name6: string[30];
   Way1, Way2, Way3, Way4, Way5, Way6, Password: string[255];
   Active1, Active2, Active3, Active4, Active5, Active6: boolean;
 end;

Также на форме имеестся элемент типа TRadioGroup в который загружаются элементы Name1..Name6 из файла. Но при этом если Active1 = False, то Name1 не загружается в список и т.д.
Далее при нажатии на кнопку другой форме передаётся содержимое Way (т.е. если выбрано Name1, то передаётся Way1).
А вопрос собственно такой: как передать Way соответствующего номера (Name1 -> Way1) если один из Active имеет значение False (например Active3, тогда этого элемента не будет в TRadioGroup и ItemIndex = 2 будет содержать Name4)?
У кого возникли мысли по этому вопросу просьба поделиться.


 
clickmaker ©   (2004-07-09 19:49) [1]

я бы начал с того, что

TSettings = record
 Name: array[0..5] of string;
 Way: array[0..5] of string;

и т.д.

так будет проще


 
Norfolk ©   (2004-07-09 20:00) [2]

Так в том-то и вся запарка, что структуру изменять нельзя.


 
Sheng   (2004-07-09 21:04) [3]

Есть идейка такая...
Создать запись
TSettings = record
  Names: array [1..6] of String[30];
  Ways: array [1..6] of String[255];
  Password: String[255];
  Actives: array [1..6] of Boolean;
end;
Загрузить в неё в цикле, и потом скопировать эту запись в запись того типа. Теоретически, должно сработать...



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

Текущий архив: 2004.07.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.74 c
14-1089085236
jb
2004-07-06 07:40
2004.07.25
Чего бы плохого шефу сделать


3-1088360583
Zlod3y
2004-06-27 22:23
2004.07.25
Что быстрее BDE, ODBC или ADO?


3-1088503541
SergeyV
2004-06-29 14:05
2004.07.25
ADOConnection теряет соединение


8-1084306993
Рома
2004-05-12 00:23
2004.07.25
Уменьшение битмапа


14-1088727892
xAnjel
2004-07-02 04:24
2004.07.25
Ув. Мастера. Нужен клиент для вашево чата (искал но не нашол).