Сбросить значение с компонента (Delphi)

Статус
В этой теме нельзя размещать новые ответы.

rafic

Местный житель
Регистрация
14 Май 2008
Сообщения
477
Реакции
24
Я выбираю с компа картинку и отправляю ее на компонент Image. И мне нужно сделать кнопку которая сбрасывала бы значение для этого Image.
Так же нужно сбрасывать значение с RadioGroup, ибо я когда по второму кругу прохожу по программе (она в виде тестовых вопросов) у меня видны ответы которые я давал на первом кругу. Как реализовать?
 
1) Процедура Free. Например: Image1.Free;
2) Свойство ItemIndex. Например: RadioGroup1.ItemIndex:=-1;
 
1) Image1.Visible := False;
Если на каком-то этаме опять понадобится картинка,
то подгружается картинка и
Image1.Visible := True;

2) как предложил выше noisiaman: RadioGroup1.ItemIndex:=-1;
 
На очистку картинки я
вот это использовал.
А радиогруп не очищяется:( я сделал на кнопкут "далее"
procedure TQuest1.Image3Click(Sender: TObject);
begin
if Otvet.ItemIndex=2 then unit1.ocenka:=unit1.ocenka+4;
Quest2.Show;
Quest1.Visible:=false;
end;
эту процедуру и вставил как вы и сказали
procedure TQuest1.Image3Click(Sender: TObject);
begin
if Otvet.ItemIndex=2 then unit1.ocenka:=unit1.ocenka+4;
Otvet.ItemIndex=-1;
Quest2.Show;
Quest1.Visible:=false;
end;
но не пашет
 
сделай так:

Код:
procedure TQuest1.Image3Click(Sender: TObject);
begin
if Otvet.ItemIndex=2 then unit1.ocenka:=unit1.ocenka+4;
Otvet.ItemIndex=-1;
[B]Otvet.Refresh;[/B]
Quest2.Show;
[B]Quest2.Refresh;[/B]
Quest1.Visible:=false;
end;
 
неа не хочет сбивать точечку отмеченую...
там типа надо так: ответил... оно подсчитало к переменной ocenk 4 балла или не подсчетало, и сбило точечку каторая там отметелась... и все это по событию онКлик к кнопке. но она не сбивает
 
что такое quest1 и quest2? Это экземпляры формы? Может, ты не к той радиогруппе обращаешься? Если радиогруппа лежит на форме quest2, то тогда надо делать так:

Код:
quest2.Otvet.ItemIndex := -1;
 
Статус
В этой теме нельзя размещать новые ответы.
Назад
Сверху