Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Intergerwert kleiner als in Label anzeigen (https://www.delphipraxis.net/90738-intergerwert-kleiner-als-label-anzeigen.html)

iron 23. Apr 2007 07:10


Intergerwert kleiner als in Label anzeigen
 
Hallo,

ich hab gesucht und nichts gefunden, vielleicht auch übersehen. Ganz einfach Ich möchte das in einem Edit feld eine Zahl eingegeben wird, beträgt dieser Wert kleiner als 1500 soll in einem Label ein Text ausgegeben werden.

habs schon so probiert
Delphi-Quellcode:
if Edit1.Text <1500 then IntToStr(Label15.Caption :='NA MHz');
Nun meckert er immernoch wegen Inkompatible Typen:String und Integer.
Wo hab ichs wieder falsch gemacht, hab schon so einiges versucht nur komm ich nicht drauf. Vielleicht hat ja einer einen hilfreichen Tip

mkinzler 23. Apr 2007 07:14

Re: Intergerwert kleiner als in Label anzeigen
 
.Text ist ja ein String und kein Integer. Du mußt also den String zuerst in einen Integer umwandeln:
StrToInt(), TryStrToInt(), Val()

turboPASCAL 23. Apr 2007 07:20

Re: Intergerwert kleiner als in Label anzeigen
 
Zitat:

Zitat von iron
Hallo,

ich hab gesucht und nichts gefunden, vielleicht auch übersehen. Ganz einfach Ich möchte das in einem Edit feld eine Zahl eingegeben wird, beträgt dieser Wert kleiner als 1500 soll in einem Label ein Text ausgegeben werden.

habs schon so probiert
Delphi-Quellcode:
if Edit1.Text <1500 then IntToStr(Label15.Caption :='NA MHz');
Nun meckert er immernoch wegen Inkompatible Typen:String und Integer.
Wo hab ichs wieder falsch gemacht, hab schon so einiges versucht nur komm ich nicht drauf. Vielleicht hat ja einer einen hilfreichen Tip


Ne, das wird ja so nix.
Code:
if [color=#ff0000]Edit1.Text[/color] <1500 then [color=#ff0000]IntToStr[/color](Label15.Caption [color=#ff0000]:='NA MHz'[/color]);
Fällt was auf ?
Delphi-Quellcode:
if IntToStr(Edit1.Text) < 1500 then Label15.Caption := 'NA MHz';

iron 23. Apr 2007 07:26

Re: Intergerwert kleiner als in Label anzeigen
 
Ja Danke Euch beiden hab es jetz so gelöst

Delphi-Quellcode:
if StrToInt(Edit1.Text)<1500  then Label15.Caption :='NA MHz';

DP-Maintenance 23. Apr 2007 13:41

DP-Maintenance
 
Dieses Thema wurde von "Phoenix" von "Programmieren allgemein" nach "Sonstige Fragen zu Delphi" verschoben.
Delphi-Frage


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:18 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz