![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
#2
|
||||
|
||||
|
Prueba con esto:
Código:
procedure TForm1.Button1Click(Sender: TObject);
var
MiFloat:Double;
begin
try
MiFloat:=StrToFloat(Edit1.Text);
except
ShowMessage('Tipo de datos incorrectos.');
end;
end;
__________________
Guía de Estilo de los Foros Cita:
|
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|