Hola de nuevo, Otra pregunta mas
Como quito todo esto que me desagrada usando try, execpt o algo asi, ya que como vereis uso demasiados if, si no, no me da el resultado que busco.
En el caso de Case of, no lo entiendo bien por eso no lo uso.
Hago esto:
Código Delphi
[-]
if ComboBox3.Text = 'Multiplicar' Then
Edit2.Text := FloatToStr(StrToFloat(ComboBox1.Text) * StrToFloat(ComboBox2.Text));
If Edit1.Text <> Edit2.Text Then
Label1.Caption:= 'Tu Respuesta es Incorrecta';
If Edit1.Text <> Edit2.Text Then
Image1.Visible:= False;
If Edit1.Text <> Edit2.Text Then
Image2.Visible:= True;
If Edit1.Text <> Edit2.Text Then
Image3.Visible:= False;
If Edit1.Text <> Edit2.Text Then
Button2.Visible:= False;
If Edit1.Text = Edit2.Text Then
Label1.Caption:= 'Bien Hecho Respuesta Correcta';
If Edit1.Text = Edit2.Text Then
Image1.Visible:= True;
If Edit1.Text = Edit2.Text Then
Image2.Visible:= False;
If Edit1.Text = Edit2.Text Then
Image3.Visible:= False;
If Edit1.Text = Edit2.Text Then
Button2.Visible:= False;
Como veis es una repeticion de lo mismo, pero si no lo hago el if solamente ve el primer dato y obvia los demas.
Ya se codigo de principiante.
Saludos y Gracias
Saludos