Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 05-05-2011
ZiriusB ZiriusB is offline
Miembro
 
Registrado: oct 2010
Posts: 86
Poder: 16
ZiriusB Va por buen camino
Ok planteare el problema completo...

Tengo 4 radiobutton y 1 te edit... en el TEDIT me mostrara el numero que seleccione en los radiobutton que van del 1 al 4...

Supongamos que mi seleccion sea el radiobutton 3, me colocara el 3 en el TEDIT

Código Delphi [-]
edit1.Text:=IntToStr(AdvOfficeRadioGroup1.ItemIndex + 1);

A ese TEDIT yo quiero sacarle el porcentaje "X" supongamos que el porcentaje que quiero sacarle a ese especificamente es el 15%

Matematicamente seria algo asi: 3*15/100 = 0.45
__________________
"Ningun precio es alto por el privilegio de ser uno mismo..."
Responder Con Cita
  #2  
Antiguo 05-05-2011
Avatar de oscarac
[oscarac] oscarac is offline
Miembro Premium
 
Registrado: sep 2006
Ubicación: Lima - Perú
Posts: 2.015
Poder: 22
oscarac Va por buen camino
y el porcentaje? donde lo tienes? o lo asignas directamente
__________________
Dulce Regalo que Satanas manda para mi.....
Responder Con Cita
  #3  
Antiguo 05-05-2011
ZiriusB ZiriusB is offline
Miembro
 
Registrado: oct 2010
Posts: 86
Poder: 16
ZiriusB Va por buen camino
El porcentaje sera un valor fijo para siempre, mi idea era asignárselo en el mismo código... ¿que recomiendas?
__________________
"Ningun precio es alto por el privilegio de ser uno mismo..."
Responder Con Cita
  #4  
Antiguo 05-05-2011
Avatar de oscarac
[oscarac] oscarac is offline
Miembro Premium
 
Registrado: sep 2006
Ubicación: Lima - Perú
Posts: 2.015
Poder: 22
oscarac Va por buen camino
yo te recomendaria que el porcentaje no sea fijo (lo unico fijo que existe en la vida es la muerte)

y podrias hacerlo asi como te dije, colocar el porcentaje en otro edit

Código Delphi [-]
 
lblPorcentaje.Caption := inttostr(StrtoInt(edtNumerox.text) * strtoint(edtPorcentajeY.Text) / 100)
__________________
Dulce Regalo que Satanas manda para mi.....
Responder Con Cita
  #5  
Antiguo 05-05-2011
ZiriusB ZiriusB is offline
Miembro
 
Registrado: oct 2010
Posts: 86
Poder: 16
ZiriusB Va por buen camino
Código Delphi [-]
label1.Caption := inttostr(StrtoInt(edit1.text) * strtoint(edit5.Text) / 100)

Me salta este error:
"[DCC Error] Unit1.pas(50): E2250 There is no overloaded version of 'IntToStr' that can be called with these arguments"

Lo del porcentaje es un porcentaje fijo para cada item...por eso digo que sera asi, igual tomare tu sugerencia.

Si le quito el InttoStr me salta este error:

[DCC Error] Unit1.pas(50): E2010 Incompatible types: 'string' and 'Extended'
__________________
"Ningun precio es alto por el privilegio de ser uno mismo..."
Responder Con Cita
  #6  
Antiguo 05-05-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Código Delphi [-]
  Label1.Caption := FloatToStr(StrToFloat(Edit1.text) * StrToFloat(Edit5.Text) / 100);

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
  #7  
Antiguo 05-05-2011
Avatar de oscarac
[oscarac] oscarac is offline
Miembro Premium
 
Registrado: sep 2006
Ubicación: Lima - Perú
Posts: 2.015
Poder: 22
oscarac Va por buen camino
Cita:
Empezado por ecfisa Ver Mensaje
Hola.


Código Delphi [-]
Label1.Caption := FloatToStr(StrToFloat(Edit1.text) * StrToFloat(Edit5.Text) / 100);





Saludos.
por eso dije... algo parecido...
__________________
Dulce Regalo que Satanas manda para mi.....
Responder Con Cita
  #8  
Antiguo 05-05-2011
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 27
Caral Va por buen camino
Hola
Código Delphi [-]
var v1,v2,v3 : Real;
begin
v1:= StrToFloat(Edit1.Text);
v2:= StrToFloat(Edit5.Text);
v3:= 100;
Label1.Caption := FloatToStr(v1 * v2 / v3);
end;
Saludos
PD: Vaciaciones sobre el mismo tema.
__________________
Siempre Novato
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
calculo del iva en porcentaje? jirbert Varios 13 15-04-2008 07:23:08
calculo de porcentaje valiant_crps SQL 10 07-04-2008 08:16:52
Porcentaje de uso del CPU OSKR C++ Builder 2 13-07-2006 01:23:53
Pasar el valor de un TEdit dentro de un StringGrid a otro TEdit que está fuera atirado Varios 4 11-09-2004 19:13:48
Porcentaje en un ProgressBar silviodp OOP 1 15-04-2004 06:41:41


La franja horaria es GMT +2. Ahora son las 21:05:47.


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