Problem mit Funktion

[Problemmacher]

Schönen Tag euch!

Schreibe gerade eine Funktion, doch ich erhalte ganze Zeit den
Fehler "Deklaration erwartet, aber 'CASE' gefunden" - Woran kann
das liegen? Ebenso danach "Deklaration erwartet, aber Bezeichner
'Result' gefunden.

Delphi-Quellcode:

function Zahl(Auswahl : Integer) : Integer;
var umfang : Integer;

case Auswahl of
     1: umfang := Random(4)+1;
     2: umfang := Random(6)+1;
     3: umfang := Random(8)+1;
end;

Result := umfang;

end;

Danke schonmal falls ihr mir weiterhelfen könntet !

[Balu der Bär]

Da fehlt ein begin.

[Problemmacher]

Oh Ok Danke *g ... ich als Laie überseh gerne mal sowas

[Problemmacher]

Hätte noch eine Frage, wofür ich jetzt nicht unbedingt einen
neuen Thread aufmachen will, da die Frage sicherlich nicht dessen
Wert ist *g!

Wenn ich die Funktion 2x laufen lasse, also folgendermaßen

ZahlA := ZufallsZahl(Eingabe);
ZahlB := ZufallsZahl(Eingabe);

Wie bekomme ich dann beide in ein Label? Also ich möchte dass
die generierten Zufallswerte dann im Label nebeneinaner einfach
angezeigt werden. Bisher, wenn ich ZahlA oder so in ' ' setze,
dann gibt der mir nur den Bezeichner bzw. die Variable aus und
nicht den Wert - Wie mache ich es richtig?

[SirThornberry]

Mach bitte für die neue Frage einen neuen Thread auf Möglichst mit aussagekräftigerem Titel

*** LOCKED ***