Ver Mensaje Individual
  #2  
Antiguo 22-06-2011
Avatar de defcon1_es
defcon1_es defcon1_es is offline
Miembro
 
Registrado: mar 2004
Ubicación: Cuenca - España
Posts: 533
Reputación: 21
defcon1_es Va por buen camino
Hola.
El error está en que tienes una variable porce de tipo real, e intentas acceder a una supuesta propiedad/metodo llamado text. Seguramente porque tienes un componente tEdit o similar con ese nombre, pero el compilador toma la variable local del procedimiento.

Renombra la variable o el componente para evitar confusiones.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var porcentaje:real;
const Num=250;
begin
  porcentaje:= strtoint(porce.text); // ¿conviertes el dato de string a integer?
  porcentaje:= Num*0.15;
  Label2.caption:='El Resultado es: '+inttostr(porcentaje); //pierdes la precision decimal
// El porcentaje siempre es FormatFloat('#,###.##', porcentaje);
end;

end.

¿Ya leiste la guia de estilo?

Para poner código fuente y que se lea bien, usa las etiquetas CODE
__________________
Progress Openedge
https://abevoelker.com/progress_open...dered_harmful/


Delphi forever...

Última edición por defcon1_es fecha: 22-06-2011 a las 09:00:22.
Responder Con Cita