Error en delphi

[llSnakell]

Ola llevo tiempo sin trabajar en delphi , y lo poco q sabia se me olvido
estoy trabajando de nuevo en esto y creando programas simples en delphi
y me aparece error y no se por que !

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
porce:real;
const
Num=250;
begin
porce:= strtoint(porce.text);
porce:= Num*0.15;
Label2.caption:='El Resultado es: '+inttostr(porce);
end;

end.

Me podrian decir cual es el error ! por favor

[defcon1_es]

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

[Neftali [Germán.Estévez]]

Lo dicho. Enlace.

[llSnakell]

Empezado por defcon1_es

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.

bueno me equivoque en vez de real es integer
el ejercicio muestra al presionar un boton ,el porcentaje de de un numero constante en este caso 2500 eso es todo

var porc:integer; //
const num=2500;
begin
porc:=num*0.15;
label1.caption:='el resultado es : '+inttostr(porc);
end;

no entiendo muy bien
estoy iniciandome en object pascal

[llSnakell]

Otra cosa
me gustaria si me podria dar informacion y ayudar
desde lo mas basico hasta lo mas complejo sobre
mysql y sql server por favor

Muchas ggracias !!!

[Casimiro Notevi]

Empezado por llSnakell

[..] no entiendo muy bien estoy iniciandome en object pascal

Bueno, aunque no entiendas, seguro que sabes leer y cumplir nuestras normas, como ya te han indicado los otros compañeros, gracias por tu colaboración.