Ergebnis der Suchanfrage

• Forum: Multimedia

  AW: SpinEdit.Value manuell verändern

    Delphi
    by Progman, 6. Jan 2011
  Hier mal ein Code, wie ich ihn nutzen würde:
  
  procedure TForm1.FormCreate(Sender: TObject);
  begin
  Spinedit1.MaxValue:=400;
  SpinEdit1.MinValue:=1;
  SpinEdit1.Value:=SpinEdit1.MinValue;
  end;
  
  procedure TForm1.SpinEdit1Change(Sender: TObject);
• Forum: Multimedia

  AW: SpinEdit.Value manuell verändern

    Delphi
    by Progman, 6. Jan 2011
  Den Fehler kannst du verhindern, indem du im OnKeyPress des SpinEdit
  
  if not (Key in '0'..'9') then Key := #0;
  
  eingibst, so werden alle Zeichen, die keine Zahl sind, unterdrückt.