Hello, I have a problem with some SteamCallbacks - they does not work
does not work:
SteamCallbacks.OnLeaderboardFindResult
SteamCallbacks.OnNumberOfCurrentPlayers
...and some others (OnIPCountry, OnPlaybackStatusHasChanged)
Source:
procedure OnLeaderboardFindResult(SteamLeaderboard: uint64; LeaderboardFod: uint8); cdecl;
begin
showmessage('Callback: OnLeaderboardFindResult');
end;
procedure TForm2.FormCreate(Sender: TObject);
begin
if not(System_InitWrapper) then
begin
Showmessage('Steam wrapper init error. Please check your steam client and/or steam_appid.txt');
Halt;
end;
SteamCallbacks.OnLeaderboardFindResult:=OnLeaderboardFindResult;
System_RegisterCallbacks(SteamCallbacks);
SteamUserStats_FindOrCreateLeaderboard(PAnsiChar('x'),k_ELeaderboardSortMethodAscending,k_ELeaderboardDisplayTypeNumeric);
Timer1.Enabled := true;
end;
procedure TForm2.Timer1Timer(Sender: TObject);
begin
System_RunCallbacks;
end;
This create a new Leaderboard named "x" (I see it correctly in steamworks web administration), but no callback is called, then I can't use it