Taschenrechner

[SimStar001]

Hallo und Herzlich Willkommen!

Also als erstes einmal ist es schlecht deine variablen a, b, c als lobal zu deklarieren. Davon gehe ich mal aus, da du keine Deklaration mitgeschickt hast.
1. Vermeide also Globale Variablen. Deklariere sie entweder in der Prodedure.

2. oder schreibe dir doch gleich eine Function wie diese:

Delphi-Quellcode:

Function Addiere (const A : Integer; const B : Integer) : Integer;
begin
  result := A + B;
end;

3. Vielleicht machst du für den Anfang lieber zwei Eingabefelder, in die du jeweils eine zahl eintragen kannst, und dann per Button auswählst, welche Aktion durchgeführt werden soll.
Später kannste dich dann damit beschäftigen , alles in ein Feld einzugeben, inklusive der zeichen und dann das ganze filtern und ausrechnen, unter beachtung der Vorzeichen...



4. füge speziell Überprüfung auf Null z.B. bei der Division hinzu

Delphi-Quellcode:

Function Division (const Divisor : double; const Divident : double) : double;
begin
  if Divident = 0 then
    begin
    result := 0;
    messagegld('Division durch Null ist nicht erlaubt',mterror,[mbok],0);
    end
      else
        result := Divisor / Divident;
end;

Ich hoffe ich habe dir ersteinmal ein Paar nützliche hinweise gegeben!

LG marco!