![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#10
|
||||
|
||||
|
Prueba con esto
![]() Código:
procedure TForm1.Button1Click(Sender: TObject);
begin
Label2.Caption:=FormatFloat(',0.00',
( StrToFloat(Label1.Caption) *
(StrToFloat(Edit1.Text) /100)) *
((100-StrToFloat(Edit2.Text)) /100) );
end;
Cita:
Te felicito porque aun sin ser programador te tiras al ruedeo como un buen torero. Me gustaria ver tu manual.
__________________
Saludos desde la tierra del tequila y las mujeres hermosas |
|
|
|