Cita:
Empezado por Caral
He cambiado el codigo de egostar en el caso del Case Of por if then y funciona, no se la razon ?.
|
Bueno, el asunto de porque la suma no funciona correctamente es porque al inicio el ComboBox3.ItemIndex tiene un valor de -1, como no has cambiado el ComboBox3.Text este valor no lo reconoce como 0 que en realidad es el ItemIndex de Sumar, lo que hice es lo siguiente:
Código Delphi
[-]
procedure TForm1.FormCreate(Sender: TObject);
begin
Edit1.Clear;
Edit2.Clear;
ComboBox3.ItemIndex := 0; TabSheet2.Caption:= 'Practicas de Sumas';
end;
Con esto ya debe de funcionar como lo soñe
Saludos