type
  Tx = record
    GameName   : string  ;
    lid   : integer ; 
  end;
  Px = ^Tx;然后在使用的时候procedure TmyForm.Get2Click(Sender: TObject);
var
  sx: Px;
begin
  sx.GameName := 'xxxxx';
  sx.lid := 880;
  showmessage(sx.GameName);
end;出现错误,请问如何解决?