AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Inkompatible Typen: Char und String

Ein Thema von Delp · begonnen am 2. Mär 2014 · letzter Beitrag vom 2. Mär 2014
 
Delp

Registriert seit: 2. Mär 2014
6 Beiträge
 
#9

AW: Inkompatible Typen: Char und String

  Alt 2. Mär 2014, 19:36
Hab da noch eine Frage zu den Fehler: [Fehler] Unit1.pas(61): E2012 Ausdruckstyp muss BOOLEAN sein

Meine Plus-Taste:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var eingabe,loesung: string;
ergebnis: double;
zeichen: char;
begin
eingabe:=edit1.text;
if edit2.Text:='then
begin
edit2.Text:=edit1.Text+'+';
edit1.text:=''
end
else
ergebnis:=0;
loesung:= edit2.text;
zeichen:= copy(loesung,length(loesung),1)[1];
delete(loesung,length(loesung),1);
case zeichen of
'+': ergebnis:=strtofloat(loesung)+strtofloat(eingabe);
'-': ergebnis:=strtofloat(loesung)-strtofloat(eingabe);
'*': ergebnis:=strtofloat(loesung)*strtofloat(eingabe);
'/': ergebnis:=strtofloat(loesung)/strtofloat(eingabe);
end;
case zeichen of
'+': edit2.Text:=floattostr(ergebnis)+ '+';
'-': edit2.Text:=floattostr(ergebnis)+ '-';
'*': edit2.Text:=floattostr(ergebnis)+ '*';
'/': edit2.Text:=floattostr(ergebnis)+ '/';
end;
edit1.Text:=floattostr(ergebnis);
end;
Wie ihr vielleicht schon mitbekommen habt, will ich einen Rechner mit 2 Edit-Feldern programmieren. (ähnlich dem Windows-Rechner)

Nun soll geprüft werden, ob in den oberen Feld bereits eine Zahl mit Operator steht. Wenn ja, dann soll mit einem erneuten drücken eines Operators bereits das Ergebnis in das untere Feld eingetragen werden.

Ich glaube das Programm dürfte somit laufen, nur wie bekomme ich diese Zeileif edit2.Text:='then so hin, dass kein Fehler mit Boolean auftritt?

Edit: Habs selber hinbekommen. Einfach ne Variable drauß gemacht

Geändert von Delp ( 2. Mär 2014 um 19:47 Uhr)
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 04:44 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-2025 by Thomas Breitkreuz