Einzelnen Beitrag anzeigen

Benutzerbild von 3_of_8
3_of_8

Registriert seit: 22. Mär 2005
Ort: Dingolfing
4.129 Beiträge
 
Turbo Delphi für Win32
 
#19

Re: Editfelder für Buchstaben sperren

  Alt 26. Nov 2006, 23:17
Aaalso...

Double ist einfach ein Gleitkommatyp, also eine Zahl mit Nachkommastellen. Dummy ist eine Variable, die man einfach braucht, um sie als var-Parameter an die Funktion TryStrToInt zu übergeben.

Wenn du jetzt die Zahlenwerte von edit1 und edit2 addieren willst, geht das so:

showmessage(inttostr(strtointdef(edit1.text, 0)+strtointdef(edit2.text, 0))); Das bedeutet, dass versucht wird, die Zahlenwerte der beiden Edits zu addieren. Wenn ein Edit keine Zahl enthält, wird der Wert als 0 angenommen.

Delphi-Quellcode:
var a, b: Integer;
begin
  if not (trystrtoint(edit1.text, a) and trystrtoint(edit1.text, b)) then
    showmessage('Bitte geben sie gültige Zahlenwerte ein.')
  else
    showmessage(inttostr(a+b));
end;
Das bedeutet, dass die Zahlenwerte der Edits addiert werden, wenn sie gültig sind. Ansonsten wird eine Fehlermeldung ausgegeben.


CheckEdit rufst du am besten in OnChange auf und machst dann irgendne Spielerei wie das Edit rot färben, wenn es keinen gültigen Wert enthält.
Manuel Eberl
„The trouble with having an open mind, of course, is that people will insist on coming along and trying to put things in it.“
- Terry Pratchett
  Mit Zitat antworten Zitat