Entwickler-Ecke

Sonstiges (Delphi) - TMaskEdit: suche maske um nur zahlen zuzualssen


Lemartes - Do 04.05.06 14:21
Titel: TMaskEdit: suche maske um nur zahlen zuzualssen
suche eine maske oder einen anderen weg, um in einem dit nur zahlen zuzualssen. zulässig sind eigentlich alle zahlen zwischen -unendlich bis +unendlich, auch kommazahlen.

gibt es da einen weg? (ok, eigentlich nicht unendlich, eher bis zur wurzel des zahlenbereichs von real zahlen ^^)

außerdem bräcuhte ich ne funktion, die mehr nen real wert auf 3 stellen hinter dem komma rundet.


Xion - Do 04.05.06 14:30

Hi

die function ist einfach so:

Zahl*1000, runden, Zahl/1000 :wink:


Lemartes - Do 04.05.06 14:47

schön, hab ich mir auch schon gedacht, aber ich hab den namen der runden funktion vergessen...


Horschdware - Do 04.05.06 14:52

1) Nimm Ein normales edit feld und schreibe in die OnKeyPress Routine:


Delphi-Quelltext
1:
2:
3:
4:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if not (key in [#8#48..#57#44]) then key := #0;
end;


2) Ich schätze mal du willst die Rundung wegen der Ausgabe haben.
Probiers mal so:


Delphi-Quelltext
1:
   Label1.Caption:=FloatToStrF(eZahl1,ffFixed,7,3);                    



Die Suche hätte hier im übrigen alle Probleme lösen können.


Lemartes - Do 04.05.06 16:32

wunderbar.
musste nur das - noch einfügen, aber den wert dafür hab ich dank der suche gefunden.

wofür ist die 7 bei dem zweitem quelltext? hab leider in der delphi hilfe nicht verstanden, da steht ja nur, dass man die 7 nehmen soll...