ich post die Frage einfach mal hier rein
ich versuche im mom ein Prog zum Umwandeln von zB Meter in Fuß/Meter in CM/etc...
Aber da ja bei Groß/Kleinbuchstaben unterschieden wird sieht das ganze jetzt so aus (siehe unten)
normal müsste das doch mit lower case gehen?!
If (lowercase(Einheit)='cm') and (lowercase(Umwandeln)='m') then.....
Delphi-Quellcode:
var Eingabe, Ergebnis : real;
Einheit, Einheitneu:string;
begin
Eingabe:=strtoint(Edit1.text);
Einheit:=(Edit2.Text);
EInheitneu:=Edit3.Text;
If (Einheit='cm') and (einheitneu='m')
then Ergebnis:=Eingabe /100;
If (Einheit='CM') and (einheitneu='m')
then Ergebnis:=Eingabe /100;
If (Einheit='Cm') and (einheitneu='m')
then Ergebnis:=Eingabe /100;
If (Einheit='cM') and (einheitneu='m')
Is da irgendwo ein Fehler drin?
Mfg, Excalibur
Die 10 Gebote zählen 279 Wörter, die Unabhängigkeitserklärung der 13 nordamerikanischen Staaten 1776 zählt 300 Wörter, die EU-Verordnung über den Import von Karamel-Bonbons 1981 besteht aus 25 911 Wörtern.