Trunc Funktion

Anisas · Beiträge: 29 Win XP Professional Delphi 7

Hallo!

Ich habe ein grooßes Problem und zwar:

Ich habe eine mathematische Folge geschrieben (oder so) nennt sich jedenfalls Ulam. Ich möchte dem Programm sagen, wenn in dem Editfeld ein Buchstabe oder eben Text steht soll er eine messagebox schicken mit dem Text: Bitte schreiben Sie Zahlen!

Hab einen Tipp erhalten das mit der TRUNC Funktion zu machen, nur hab ich keine Ahnung wie. Kann mir das jemand erklären bzw. ein Beispiel geben?

Wäre sehr dankbar

LG

Saskia

Marc. · Verfasst: Sa 25.11.06 20:45

Es gibt verschiedene Möglichkeiten dies zu realisieren.
Wie's mit Trunc funktionieren soll weiß ich nicht, aber mit folgenden Funktionen ist es möglich:

• TryStrToInt
• StrToIntDef

schau dir dazu am besten die Onlinehilfe an oder such hier im Forum nach diesen Begriffen

grüße marc

Dragonclaw · Beiträge: 196 Windows Vista Delphi 7 Prof.

Naja, beim kompilierten Delphiprogramm, zeigt der dann einfach einen fehler an, dass das kein gültiger Integerwert ist.

zongo-joe · Beiträge: 134 win xp prof D3, D4, D7

ich darf mal vermuten, dass Du einfach nur Zahlen im Editfeld zulassen willst:
dann kannst Du mit

markieren

Delphi-Quelltext

1:
2:
3:
4:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (key  in[#48..#57,#8]) then key:=#0; //nur tasten 0..9 und rückschritt sind erlaubt
end;

alle anderen Eingaben einfach ausschliessen.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme