Delphi Edit-Feld: nur Zahlen + Kopieren/Einfügen?

Edit-Feld: nur Zahlen + Kopieren/Einfügen?

Ein Thema von romber · begonnen am 2. Mär 2005 · letzter Beitrag vom 3. Mär 2005

romber

Registriert seit: 15. Apr 2004
Ort: Köln
1.167 Beiträge

Delphi 10 Seattle Professional

2. Mär 2005, 20:57

Hallo!

Ich wollte es so machen, daß in einem Edit-Feld nur Zahlen und Backspace erlaubt ist:

Delphi-Quellcode:

			...

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);

begin

if not (key in ['0'..'9',#8]) then key:=#0;

end;

...

Wie kann ich die Kode modernisieren dass auch Kopieren (STRG + C) und Einfügen (STRG + V) funktioniert?

Danke!

Es ist dir nicht erlaubt, neue Themen zu verfassen.

Es ist dir nicht erlaubt, auf Beiträge zu antworten.

Es ist dir nicht erlaubt, Anhänge hochzuladen.

Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.

Smileys sind an.

[IMG] Code ist an.

HTML-Code ist aus.

Refbacks are aus

Gehe zu: