PDA

Ver la Versión Completa : Pasar de string a integer o viceversa. ¿Es posible?


Kamikaze
06-07-2005, 22:49:08
Hola a todos foreros y programadores de Delphi.
Tengo un pequeño problema:
Tengo una variable integer y quiero convertirla en otro
apartado de mi programa a string o viceversa.

Pongo el codigo fuente para facilitar las cosas:

Muchas gracias por adelantado!!!:D

Kamikaze.

P.D.:


Variables globales:
var
Cliente_Ogame: TCliente_Ogame;
Posicion:longint;


procedure TCliente_Ogame.ClientSocket1Read(Sender: TObject;
Socket: TCustomWinSocket);
var
str : AnsiString;
Cadena:string;
Cadena2:string;
begin
str := Socket.ReceiveText;
memo1.Lines.Add(str);
Cadena:='session=';
Cadena2:='123456789012';
Posicion:=Pos(Cadena,Memo1.Text)+7;

with Memo1 do
begin
SelStart:=Posicion;
SelLength:=Length(Cadena2);
SetFocus;
end;
end;


procedure TCliente_Ogame.Button4Click(Sender: TObject);
begin
ShellExecute(Cliente_Ogame.Handle,nil,Pchar ('http://ogame192.de/game/index.php?session='+ posicion),'','',SW_SHOWNORMAL); //El codigo falla aqui poniendo que integer es incompatible con string.
end;

marcoszorrilla
06-07-2005, 22:51:54
Precisamente hoy mismo se ha tocado el tema:
IntToStr/StrToInt

Un Saludo.

Delphius
07-07-2005, 08:02:59
IntToStr/StrToInt
Creo que las funciones hablan por si mismas pero bueno, no está de mas un ejemplo:

Varstring := IntToStr(123);
Varinteger := StrToInt('456');

De todas maneras lee un poco de la ayuda sobre estas funciones y otras similares.

Saludos,

Kamikaze
07-07-2005, 15:37:48
:D Muchas Gracias!!!!:D


P.D.:Marcoszorrilla dijo que se habia tocado ya, he buscado con
el buscador de temas de los foros y no me aparece.....

BlueSteel
07-07-2005, 15:38:34
Hola Kamikazeveo que la cadena que quieres convertir tiene 12 digitos..

Cadena2:='123456789012'

el Integer solo hacepta hasta 10 dígitos...

Integer -2147483648..2147483647 signed 32-bit

puede que por ahí tengas problemas...

Kamikaze
07-07-2005, 15:44:57
Gracias por el consejo BlueSteel.:)

Lo tomaré en cuenta.;)