Gruppen

Top Gruppen: Windows 7; Windows Vista; Windows XP; Textverarbeitung; Excel; DSL; Internet Browser; E-Mail/Outlook
Betriebsysteme: Windows classik; Linux; BS-Sonstige
Software: Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; SW-Sonstige
Hardware: Mainboard/CPU; Grafikkarten; Peripherie; Laptop/Notebook; HW-Sonstiges
Netzwerk: Telefon,ISDN,Modem; W-Lan; NW-Sonstiges
Programmierung: PHP,ASP,Perl...; Java,C++...; Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke; SN Intern; Test

/ Forum / Anwendungen(Java,C++...)

Anwendungen(Java,C++...)

Fragevon waffdaff vom 09.08.2021, 00:04 Options

Prüfen, ob der Variable ein Wert zugewiesen ist (delphi)

procedure TForm1.Button1Click(Sender: TObject);
var a: real;
begin
a := StrToFloat(Edit1.Text);

Wie kann ich prüfen, ob der Variable a ein Wert zugewiesen wurde?

Antwort schreiben

Antwort 1 von Supermax vom 09.08.2021, 07:12 Options

Die Variable hat immer einen Wert, wenn in Edit1.Text keine gültige Zahl eingegeben wurde hat a den Wert 0 oder eventuell auch NaN (Not A Number), es kann auch sein daß eine "Exception" ausgelöst wird wenn sich die Zeichenkette in Edit1.Text nicht in eine Zahl konvertieren läßt.

Antwort 2 von son_quatsch vom 10.08.2021, 07:48 Options

Es wird eine Exception ausgelöst, die man entsprechend abfangen muss:

procedure TForm1.Button1Click(Sender: TObject);
var
  a: real;
begin
  try
    // Text kann konvertiert werden
    a:= StrToFloat(Edit1.Text);
  except
    // Text konnte nicht konvertiert werden, also 0 zuweisen
    a:= 0;
  end;
end;

Siehe auch http://www.delphibasics.co.uk/RTL.asp?Name=StrToFloat.

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Tipp einschicken

News einschicken