Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Error en delphi (https://www.clubdelphi.com/foros/showthread.php?t=74474)

llSnakell 22-06-2011 06:21:27

Error en delphi
 
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 22-06-2011 08:46:18

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] 22-06-2011 12:36:54

Lo dicho. Enlace.

llSnakell 22-06-2011 15:23:26

Cita:

Empezado por defcon1_es (Mensaje 404457)
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 22-06-2011 15:32:33

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 22-06-2011 15:33:25

Cita:

Empezado por llSnakell (Mensaje 404484)
[..] 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.


La franja horaria es GMT +2. Ahora son las 12:29:20.

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