Editfeld Eigenschaft Kommazahl ?

[r2c2]

Ich nehme mal an, der User soll weder n Komma noch Text eingeben können, dann schreib doch einfach:

Delphi-Quellcode:

if not (Key in ['0'..'9', #8]) then
begin
  Beep;
  Key := #0;
end;

Copy&Paste muss du dann natürlich auch noch abfangen.

mfg

Christian

[ibp]

bei den Schweizern gibt es eine Lösung auch für C&P ...Edit nur mit Zahlen

[Vader]

hallo,


leider es funzt nicht, es wird trozdem eine zahl mit kommastelle eingelesen !

mfg vader

[alzaimar]

Zitat von Vader:

welche eigenschaft muß ich ändern bei einen editfeld wenn ich keine kommazahlen möchte ?

Nicht die Eigenschaft ändern, sondern das Control, nimm doch TSpinEdit.

Oder sowas:

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if not (key in ['0'..'9',#8]) then key := #0;
end;

[ltiefland]

Schau Dir mal di vorletzte Komponente auf dieser Seite an. Dort kannst Du den Datentyp einstellen. Ist zwar eigentlich für Delphi 2 bis 4, funktioniert aber eventuell auch mit neueren Versionen. Ich habe es selber noch nicht getestet.

[Vader]

tut mir leid männer, aber der letzte code funzt auch nicht, und die komponente finde ich nicht ?

mfg vader

[ltiefland]

Sorry, direktes Linken auf eine Seite geht wohl nicht. So was blödes! Daher:

Gehe auf http://gd.tuwien.ac.at/softeng/delphi/, klicke dann links auf "Delphi 2.0". Im oberen, rechten Frame klickst Du unter der Rubrik "Freeware" auf "Improved Componentes". Im unteren Frame klickst Du dann so lange auf den Pfeil nach rechts, bis Du auf Seite 7 (die URL von meinem vorherigen Post) bist. Diese Datei beginnt mit "rich_tv.zip" als erste Komponente und endet mit "tframe.zip". Die Komponente, die ich meine steht genau darüber und hat den Namen "textedit.zip"!

[Vader]

hallo,

hab die komponente gefunden werd's mir einmal anschauen !

danke mfg vader