![]() |
>= größer kleiner bin ich zu dumm
ich bin wohl zu dumm irgendwie bekomm ich eine kleine funtion nicht hin
hier ist der code:
Delphi-Quellcode:
if label4.Caption <= label2.caption
then showmessage ('Das Limit ist leider Erreicht.'); was ich mit dieser funktion anstellen will ist ein kleiner vergleich wenn label4(hat z.b. den wert 100) kleiner oder gleich label2(hat z.b den wert 999) dann zeige nachricht das limit ist erreicht irgendwie bekomm ich aber die meldung das limit ist erreicht immer wie kann das sein |
Re: >= größer kleiner bin ich zu dumm
So vergleichst du den inhalt als String und nicht wie gewünscht als Zahl. Strtoint hilft Dir weiter.
Mfg Frank |
Re: >= größer kleiner bin ich zu dumm
Du vergleichst Zeichenketten. Ist jetzt die Frage, ob das sinnvoll ist. Ich würde das vorher in Integers umwandeln und dann vergleichen.
|
Re: >= größer kleiner bin ich zu dumm
Du müsstest die Caption erst mit StrToInt in Integer-Werte umwandeln, bevor du sie vergleichen kannst, denn Stirng-Vergleiche sind in Delphi nicht möglich.
|
Re: >= größer kleiner bin ich zu dumm
Zitat:
|
Re: >= größer kleiner bin ich zu dumm
thx für die schnelle antwort jetzt funtzt auch alles
|
Re: >= größer kleiner bin ich zu dumm
Zitat:
Delphi-Quellcode:
machst vergleichst du ja auch einen String. ;)
if EdtName.Text = 'Mustermann' then...
MfG Pr0g |
Re: >= größer kleiner bin ich zu dumm
So geht's:
Delphi-Quellcode:
if StrToInt(Label4.Caption) <= StrToInt(Label2.Caption) then begin
//... end; Wenn du das ganze ohne StrToInt versuchst, vergleichst du wahrscheinlich, ob der eine Zeiger kleiner ist als der andere, und das kann theoretisch immer so sein. |
Re: >= größer kleiner bin ich zu dumm
Ihr seid einfach zu schnell für mich heute
Mit val() kannst du übrigens auch nach Integer konvertieren.... |
Re: >= größer kleiner bin ich zu dumm
Zitat:
Delphi-Quellcode:
In C/C++ würde das auch nicht funktionieren. Auf der sicheren Seite ist man mit strcmp bzw. CompareStr.
var
str1, str2: PChar; begin str1 := '1234'; str2 := '1234'; if str1 = str2 then begin // dies wird niemals ausgeführt! end; end; |
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:26 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz