Fórum DELPHI 7 - SELEÇÃO DE RADIOGROUP #607713
24/01/2020
0
Ex: Tenho um Radiogroup, aonde tenho 4 itens nele, sendo alternativa (A) ..... , (B) ...... , (C)..... , (D)......., e queria que a pessoa seleciona-se apenas uma questão e fosse para o próximo FORM. Por quê estou querendo a pessoa selecionar uma questão? É por conta que fiz um procedimento de contagem e cada vez que a pessoa seleciona uma alternativa, é contado 1 ponto e exibido no EDIT. Tenho conhecimentos básicos no delphi e estou querendo criar um quiz que conte os pontos em cada alternativa sendo as erradas 0 e os acertos 1.
Yago Centenaro
Curtir tópico
+ 0Post mais votado
24/01/2020
Ex: Tenho um Radiogroup, aonde tenho 4 itens nele, sendo alternativa (A) ..... , (B) ...... , (C)..... , (D)......., e queria que a pessoa seleciona-se apenas uma questão e fosse para o próximo FORM. Por quê estou querendo a pessoa selecionar uma questão? É por conta que fiz um procedimento de contagem e cada vez que a pessoa seleciona uma alternativa, é contado 1 ponto e exibido no EDIT. Tenho conhecimentos básicos no delphi e estou querendo criar um quiz que conte os pontos em cada alternativa sendo as erradas 0 e os acertos 1.
Cara, por padrão o RadioGroup já permite selecionar apenas uma opção... A dúvida é em como chamar o próximo Form?
Nomad
Gostei + 1
Mais Posts
24/01/2020
Fernando Ito
Ex: Tenho um Radiogroup, aonde tenho 4 itens nele, sendo alternativa (A) ..... , (B) ...... , (C)..... , (D)......., e queria que a pessoa seleciona-se apenas uma questão e fosse para o próximo FORM. Por quê estou querendo a pessoa selecionar uma questão? É por conta que fiz um procedimento de contagem e cada vez que a pessoa seleciona uma alternativa, é contado 1 ponto e exibido no EDIT. Tenho conhecimentos básicos no delphi e estou querendo criar um quiz que conte os pontos em cada alternativa sendo as erradas 0 e os acertos 1.
Fala Yago, blz?
Vc pode fazer da seguinte maneira no evento onClick do radiogroup:
procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
// aqui vai seu método para usar um contador para somar os pontos se a pessoa acertar
RadioGroup1.Enabled := False;
// e aqui a chamada para o novo form
end;
Espero ter ajudado, se não for isso, nos passe mais informações de como vc fez a programação para que possamos lhe ajudar melhor ok!
Um Abraço,
ITO
Gostei + 1
24/01/2020
Yago Centenaro
Como sou novo no Delphi 7, estou seguindo os passos deste site, com a mesma programação. Se puder dar uma olhada.
http://www.cpscetec.com.br/adistancia/jogos_delphi/
Só que o problema é quando a pessoa seleciona uma opção, ela tem como mudar, só que aí fica contando a cada click que a pessoa dá.
E queria que ela pudesse selecionar apenas uma vez que já resolvia o problema.
Mas se quiserem me passar dicas de como eu crio um jogo de perguntas no delphi, vou seguir a dica de vocês, é difícil encontrar alguém que entende como cria um quiz no delphi com quantidade de acertos e erros.
Gostei + 0
24/01/2020
Yago Centenaro
E depois dentro da Datamodule na propriedades events, coloquei que o acerto e erro receberiam valor de 0, para começarem a contar.
meu código está assim:
Begin
If pergunta1.ItemIndex= 2 then
begin
showmessage('Você acertou');
inc(dtm.acertos);
end
else
begin
showmessage('Você errou');
inc(dtm.erros);
end;
edt1.Text:=IntToStr(dtm.acertos);
edt2.Text:=IntToStr(dtm.erros);
end;
Gostei + 0
24/01/2020
Nomad
E depois dentro da Datamodule na propriedades events, coloquei que o acerto e erro receberiam valor de 0, para começarem a contar.
meu código está assim:
Begin
If pergunta1.ItemIndex= 2 then
begin
showmessage('Você acertou');
inc(dtm.acertos);
end
else
begin
showmessage('Você errou');
inc(dtm.erros);
end;
edt1.Text:=IntToStr(dtm.acertos);
edt2.Text:=IntToStr(dtm.erros);
end;
Verifique se isso te ajuda:
http://www.planetadelphi.com.br/download/4273/arquivo/super-quiz-(jogo)
Gostei + 1
Clique aqui para fazer login e interagir na Comunidade :)