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!!!
Kamikaze.
P.D.:
Código PHP:
[color=black]Variables globales:[/color]
[color=black]var
Cliente_Ogame: TCliente_Ogame;
Posicion:longint;[/color]
[color=black]procedure TCliente_Ogame.ClientSocket1Read(Sender: TObject;
Socket: TCustomWinSocket);[/color]
[color=black]var
str : AnsiString;[/color]
[color=black] Cadena:string;
Cadena2:string;[/color]
[color=black]begin[/color]
[color=black] str := Socket.ReceiveText;
memo1.Lines.Add(str);[/color]
[color=black] Cadena:='session=';
Cadena2:='123456789012';[/color]
[color=black] Posicion:=Pos(Cadena,Memo1.Text)+7;[/color]
[color=black] with Memo1 do
begin
SelStart:=Posicion;
SelLength:=Length(Cadena2);
SetFocus;
end;
end;
[/color]
[color=black]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.[/color]
[color=black]end;[/color]
[color=black][/color]