Hallo und Willkommen in der
DP 
,
beides wäre mit globalen Zählern zu erreichen. Das können globale Variablen sein (werden gern genommen, sind aber nur in speziellen Fällen die bessere Wahl) oder private Felder (damit würde ich das machen). Das könnte beispielsweise so aussehen:
Delphi-Quellcode:
type TDeinForm = class(TForm)
...
private
FLevel,
FGesamt,
FWurf: integer;
procedure NeuesLevel;
procedure Punkte(iPunkte: integer);
...
end;
...
procedure TDeinForm.NeuesLevel;
begin
//Level hochzählen
FLevel := FLevel + 1;
//Wurfvariable zurücksetzen
FWurf := 0;
end;
procedure TDeinForm.Punkte(iPunkte: integer);
begin
//Gesamtpunkte aufaddieren
FGesamt := FGesamt + iPunkte;
end;