Tema: conversion de string a entero
Ver Mensaje Individual
  #2  
Antiguo 30-12-2004
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
  
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Reputación: 10
marcoszorrilla Va por buen camino
 
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
Var
S:String;
e:Integer;
begin
s:='125.39';
e:=StrToInt(Copy(s,1,(Pos('.',s))-1));
ShowMessage(IntToStr(e));
end;
Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita