Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   trackbar con numeros reales (https://www.clubdelphi.com/foros/showthread.php?t=5173)

delphi.com.ar 19-11-2003 22:59:38

Fíjate que en una de las instrucciones divides el valor por 10, pero cuando le pasas el valor no lo multiplicas por 10 como lo habíamos visto anteriormente.

Saludos!

haffo 19-11-2003 23:46:49

El problema es que cuando pongo:

LMDTrackBar1.Position:=StrToIntDef(edit3.text, LMDTrackBar1.Position)*10;

En el track bar solo me permite poner valores 0,1 ó 2. Y en el edit solo me reconoce el 0 el 1 y el 3.

haffo 20-11-2003 00:26:18

Estoy haciendo mal la operacion de multiplicar ???

haffo 20-11-2003 00:53:54

Una ayudita por favor

delphi.com.ar 20-11-2003 14:41:16

Cita:

haffo comentó:
LMDTrackBar1.Position:=StrToIntDef(edit3.text, LMDTrackBar1.Position)*10;
Si el valor es correcto, esta bien que multiplique el valor del Edit por 10, pero si es incorrecto y multiplica la posició por 10, mmmmm.....

Piensalo detenidamente, no es nada complicado, solo es un poco de lógica.

Saludos!

haffo 20-11-2003 22:36:19

¿A qué te refieres con un valor correcto?. Si quiero introducir un 1,3, al pulsar el 1, la barra se me pone en el 1, pero al pulsar la coma se me va al 2.

haffo 04-12-2003 18:39:03

Por favor necesito vuestra ayuda, no puedo arreglar esto. El código es el siguiente, probarlo a ver si a ustedes si os funciona.

procedure TForm1.LMDTrackBar1Change(Sender: TObject);
begin
edit3.text:=floattostr((LMDTrackbar1.position)/10);
ganancia:=LMDtrackbar1.Position;

procedure TForm1.Edit3Change(Sender: TObject);
begin

LMDTrackBar1.Position:=StrToIntDef(edit3.text, LMDTrackBar1.Position);
ganancia := LMDTrackBar1.Position;
end;

donde ganancia es: integer porque este valor lo mando a un programa en 'C' donde allí ya lo divido por 10.

Gracias de antemano. Saludos.

Casimiro Notevi 12-12-2017 16:23:18

Cita:

Empezado por LuisHatake (Mensaje 523331)
hola!

Bienvenido, por favor, lee nuestra guía de estilo, gracias.

LuisHatake 12-12-2017 18:10:06

Hola Casimiro Notevi, muchas gracias por la recomendación. me encuentro leyendo la guía y espero acostumbrarme pronto a realizar las preguntas de la mejor manera, de antemano muchas gracias por la observación.

Casimiro Notevi 12-12-2017 18:14:01

Gracias a ti, por tu colaboración ^\||/


La franja horaria es GMT +2. Ahora son las 15:08:13.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi