Ver Mensaje Individual
  #2  
Antiguo 08-09-2006
Avatar de marceloalegre
[marceloalegre] marceloalegre is offline
Miembro Premium
 
Registrado: abr 2005
Ubicación: Mar del Plata - Argentina
Posts: 448
Reputación: 20
marceloalegre Va por buen camino
Post

Cita:
Empezado por JesusG
procedure TForm1.Button1Click(Sender: TObject);
begin
form1.Label1.Caption:=floattostr(23/7+sqrt(2));
end;

Claro que no funciona, sucede lo siguiente: (voy a comentar tu codigo)
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
s: string;
begin
s:=form1.Edit1.Text; //aqui asignas a una variable string un string... esta correcto, no se si es necesario, pero es correcto.
form1.Label1.Caption:=floattostr(s);//el problema esta aca... ya que floattostr convierte de float a string, y s ya es un string!... donde no necesita conversión. 
end;

Ademas no es tan simple hacer que en el edit se maneje cualquier expresion, ya que aparte de las cuestiones tecnicas, si es usuario escribe mal la expresion no funciona, crea procedimientos/func. con los que quieras realizar en tu programa.


Saludos!

Última edición por marceloalegre fecha: 08-09-2006 a las 15:31:43.
Responder Con Cita