Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Eingabe in tEdit beschränken

    Delphi
    by SirThornberry, 2. Okt 2003
  if (key = '-') then
  begin
  key := #0;
  if pos('-', Edit1.Text) < 1 then Edit1.Text := '-' + Edit1.Text else Edit1.Text := copy(Edit1.Text, 2, length(Edit1.Text)-1);
  end;
  
  
  Den Code noch mit in die Keypressmethode reinstopfen. Allerdings musst du dann noch den Cursor wieder an die richtige Stelle setzen
  
  @chris: So weit ganz gut, du musst hast aber vergessen das minuszeichen wieder zu...