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!