TListBox og AddObject - mærkelige tegn

Det kan jeg godt forstå.
Koden vil kun virke hvis IPAdresse er en global variabel som du aldrig ændrer efter at du har tilføjet den til listboxen.
Men jeg gætter på at den enten er en lokal variabel og så går den ud af scope på et tidspunkt og Delphi fjerne den og genbruger hukommelsen, eller du flere gange tildeler ny værdi til strengen så den bliver gendannet et andet sted i hukommelsen.
I begge tilfælde vil din pointer TObject(IPAdresse) lige pludselig pege på et sted i hukommelsen hvor der ligger garbage fordi det er blevet overskrevet af noget andet.
Løsning:
Gem ipaddressen som en integer værdi (hvis vi snakker ipv4) eller definer en klasse med en streng variabel til at indeholde din streng. Hver gang du skal tilføje til listboxe skal du lave en instans af klassen, tilføj strengen til objektet og addere objektet i listboxens Object-parameter.
Ved at bruge en klasse til at indeholde strengen, vil strengen ikke gå ud af scope.
Klassen kan se sådan ud:
type
  TIPAdresse = class
    IPAdresse: string;
  end;

var
  ip: TIPAdresse;
begin
  ip := TIPAdresse.Create;
  ip.IPAdresse := IPAdresse;
  lbGames.Items.AddObject(Spillernavn+' ('+Spiltype+')', ip);
end;

procedure TfrmMain.lbGamesClick(Sender: TObject);
begin
if lbGames.ItemIndex <> -1 then
  ShowMessage(TIPAdresse(lbGames.Items.Objects[lbGames.ItemIndex]).IPAdresse);
end

Totalt utestet.

Husk at Free objekterne når de ikke skal bruges mere, ellers får du en memory-leak.

Synes det med scopes er lidt svært, men nu har jeg noget jeg kan gå videre med. Tak for svaret!