Einzelnen Beitrag anzeigen

Benutzerbild von baumina
baumina

Registriert seit: 5. Mai 2008
Ort: Oberschwaben
1.275 Beiträge
 
Delphi 11 Alexandria
 
#14

AW: Textfeld auf Zahl prüfen

  Alt 6. Nov 2014, 15:07
Die Variable "Zahl" würde ich
1. in die Procedure mit reinnehmen, damit ist sie nur lokal innerhalb der procedure gültig und
2. als Extended oder Double deklarieren, denn eine Zahl ist eine Zahl und kein String

Das Ganze würde dann so aussehen:

Delphi-Quellcode:
procedure TForm1MSP.Edit1MasseChange(Sender: TObject);
Var
 zahl:Extended;

begin
  if not TryStrToFloat(Edit1Masse.text, zahl)
     then showmessage('FEHLER')
end;
Hinter dir gehts abwärts und vor dir steil bergauf ! (Wolfgang Ambros)
  Mit Zitat antworten Zitat