Ver Mensaje Individual
  #26  
Antiguo 02-02-2008
Avatar de ContraVeneno
ContraVeneno ContraVeneno is offline
Miembro
 
Registrado: may 2005
Ubicación: Torreón, México
Posts: 4.738
Reputación: 24
ContraVeneno Va por buen camino
Cita:
Empezado por BuRtOn Ver Mensaje
Jejee lo dices por mi contraveneno ?...
si lo digo por ti... pero me refería a esto:
Código Delphi [-]
lblEdit1: TEdit;
pones prefijo de Label cuando es un Edit
Código Delphi [-]
procedure Tfrmsegundo.icoRestaClick(Sender: TObject);
var x,y : real;
begin
x := strtofloat(lblEdit1.text);
y := strtofloat(lblEdit2.text);
resul := (x-y);

end;
Utilizas variables que no son necesarias. Lo único que hacen es estorbar y ocupar memoria.
Código Delphi [-]
procedure Tfrmsegundo.icoRestaClick(Sender: TObject);
begin
 Resul := strtofloat(edtOperando1.text) - strtofloat(edtOperando2.text));
end;

Cita:
Empezado por BuRtOn Ver Mensaje
...ojala puedeas ayudarme o darme una manito con eso....
No, no, yo no le hago a esas cochinadas ....
__________________


Última edición por ContraVeneno fecha: 02-02-2008 a las 19:16:16.
Responder Con Cita