Hi!
Du musst folgendes schreiben:
Delphi-Quellcode:
procedure TTaetigkeiten.Button1Click(Sender: TObject);
begin
if strtoint(mo_std_1.Text) > 15 then
ShowMessage('Über 15 nicht erlaubt');
end;
Also den String zu einem Integer umwandeln und die Anführungszeichen um die 15 weglassen!
// untested
Ciao fkerber