(Resolvido) Quiz (perguntas)

[Arrais Júnior]

olá, tipo...

4 radiobutton's e um botão

01 - a pessoa MARCA um dos 4 radiobuttons e clica no BOTAO, o botao irá mostrar a resposta verdadeira (grifando, ocultando as outras, de qualquer forma)

detalhe, eu estava tentando:

radiobutton1.color:= 'cllime';

porém, dava erro.

...inicialmente é isso....se alguém puder postar bem detalhado, explicando bem direitinho eu agradeceria =D, eu nunca utilizei um radiobutton...

obrigado.

[Jhonas]

Se for para um jogo de perguntas e respostas é bem simples

um exemplo:

procedure TForm1.Button1Click(Sender: TObject);
begin
   //  PERGUNTA
   Edit1.Text := 'QUEM DESCOBRIU O BRASIL ?';

   // ALTERNATIVAS
   RadioButton1.Caption := 'CRISTOVÃO COLOMBO';
   RadioButton2.Caption := 'JOÃO DA FONSECA';
   RadioButton3.Caption := 'PEDRO ALVARES CABRAL';
   RadioButton4.Caption := 'PAULO DE BRAGANÇA';

end;

procedure TForm1.Button2Click(Sender: TObject);
begin
   // RESPOSTA CERTA
   if RadioButton3.Checked then
      begin
         RadioButton3.Color := clLime;
         RadioButton1.Enabled := false;
         RadioButton2.Enabled := false;
         RadioButton4.Enabled := false;
      end
   else
      begin
         // MOSTRAR RESPOSTA CERTA MESMO CLICANCO NA ERRADA
         RadioButton3.Color := clLime;
         RadioButton1.Enabled := false;
         RadioButton2.Enabled := false;
         RadioButton4.Enabled := false;
      end;
end;

o resto vai da sua imaginação

abraço

[Arrais Júnior]

muiiito boa a resposta....

esclarecido!