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); porcentaje:= Num*0.15;
Label2.caption:='El Resultado es: '+inttostr(porcentaje); end;
end.
¿Ya leiste la guia de estilo?
Para poner código fuente y que se lea bien, usa las etiquetas
CODE