Se essa é sua primeira visita, não esqueça de ler com cuidado as Regras Gerais clicando no link. Você deverá se registrar antes de poder postar: clique no link de registro acima para proceder.
[Tutorial]Criando show do milhao Delphi7 (com tempo pra responder)!
Abra o delphi 7 e inicie um novo projeto!
Adicione os seguintes componentes:
2Buttons
2Label
1Edit
1Timer
1ProgressBar
Agora renomeie o caption do button1 para:
Qual a pergunta?
Button2 para:
OK
Label 1 para:
(Aqui voce coloca sua pergunta , no meu caso...)Qual a marca do seu mouse?
Label 2 Para:
Tempo
Agora vamos mudar as propriedades !
Label1 :
Mude visible para false!
Label2 :
Mude visible para false!
Button2 :
Mude visible para false
Timer1 :
Altere o intervalo para 30000(30segundos) e deixa enabled false
Organize +ow - assim:
Agora vamos aos codigos!
Clique 2x no button1(estara com o caption 'Qual a pergunta?') e adicione esse codigo (leia o codigo e veja o que ele faz , nao simplismente copie e cole)
timer1.Enabled:=true;
edit1.Enabled:=true;
button2.Visible:=true;
button2.Enabled:=true;
button1.Enabled:=false;
label1.visible:=true;
edit1.Visible:=true;
Agora clique 2x no button2 e add este codigo:
if Edit1.Text = 'aqui voce coloca a sua resposta' then
begin
ShowMessage('Acertou !');
button2.enabled:=false;
timer1.enabled:=false;
end
else begin
ShowMessage('Errou');
end;
Adicionem esse codigo no timer1:
progressbar1.Position:=10;
progressbar1.Position:=20;
progressbar1.Position:=30;
progressbar1.Position:=40;
progressbar1.Position:=50;
progressbar1.Position:=60;
progressbar1.Position:=70;
progressbar1.Position:=80;
progressbar1.Position:=90;
progressbar1.Position:=100;
button2.Enabled:=false;
timer1.Enabled:=false;
Agora se voce quer fazer mais perguntas no seu show do milhao e so voce repetir esses codigos!!
E se alguem tiver mais ideias , por favor , poste no topico para que eu possa adicionar!
Source para os preguiçosos e para que nao conseguiu fazer:
Para visualizar o link é necessário se Registrar GRÁTIS! Clique aqui
Scan:
Para visualizar o link é necessário se Registrar GRÁTIS! Clique aqui
Creditos:
soureidosnoobs
Permissões de Postagem
Search Engine Optimization by vBSEO 3.5.2
LinkBack URL
About LinkBacks
