Taschenrechner mit Grundrechenarten

[Dannyjoe]

Zitat von Ultimator:

Du kannst im OnKeyDown des Edits mit

Delphi-Quellcode:

begin
if chr(Key=',') then
  begin
   if (Key in Edit3.Text) then
    Key:=#0;
   end;
end;

Ungetestet.

Dann sagt er mir:

Zitat:

[Fehler] Main1.pas(217): Inkompatible Typen
[Fehler] Main1.pas(219): Operator ist auf diesen Operandentyp nicht anwendbar
[Fehler] Main1.pas(220): Inkompatible Typen: 'Word' und 'Char'
[Fataler Fehler] TRechner.dpr(5): Verwendete Unit 'Main1.pas' kann nicht compiliert werden