Форум: "Основная";
Текущий архив: 2003.05.22;
Скачать: [xml.tar.bz2];
ВнизДелаю тест Найти похожие ветки
← →
Михайлов Антон (2003-05-10 16:40) [0]Привет, мастера!
Мне вот поручили написать программулину (тест по истории)
Дык вот... я сначала делал для одного теста отдельную прогу, патом решил, что лучше одну прогу, в которую будут подгружаться тесты...
Так вот в чём вопрос:
1)Я когда создаю динамически Радиобуттоны, я не могу знать их имена, тоесть немогу проверить какой из них отмечен правильно
Я так понял, что работать надо с Findcomponent...
Как найти радиобуттон по его кэпшену и узнать чекед он или нет?
2)Я немогу удалить со скролбокса все компоненты (они все созданы динамически)
Пробывал так:
For i:=0 to scrollbox1.ComponentCount do
scrollbox1.Components[i].Free;
Что-то вообще никакой реакции :(
Помогите пожалуйста!
← →
Pat (2003-05-10 16:50) [1]>Я когда создаю динамически Радиобуттоны, я не могу знать их имена
Так назначай имена при создании:
RB[i].name:="RB"+inttostr(i)
>Как найти радиобуттон по его кэпшену и узнать чекед он или нет
см. выше. Искать примерно так:
if TRadioButton(FindComponent("RB"+inttostr(i))).checked then
>Я немогу удалить со скролбокса все компоненты
Опять же см. выше
FindComponent("RB"+inttostr(i)).free
← →
jack128 (2003-05-10 17:46) [2]а как ты создаешь компоненты?
Все компонеты хранятся в массиве Сomponents своего владельца, так что если у тя код. например, такой
TRadioButton.Create(nil).Parent := Form1;
то этот компонент ты негде не найдешь.
Лудше объяви дин массив радио баттонов и создовай их так :
var RBArray : array of TRadioButton;
begin
for i := 0 to Length(RDArray) do RDArray[i].Free;
SetLength(RDArray,10);
for i:= 0 to 9 do
begin
RDArray[i] := TRadioButton.Create(чего хочешь);
RDArray.Parent := Form1; // Показываем радиобаттон
end;
end; // и соответственно всегда имеешь доступ к этим радиобаттонам
← →
jack128 (2003-05-10 17:47) [3]Моя хроническая ошибка
for i := 0 to Length(RDArray) -1 do RDArray[i].Free;
← →
mukha (2003-05-11 13:06) [4]Удалено модератором
Примечание: Личная переписка
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.05.22;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.008 c