Forum: Object-Pascal / Delphi-Language
Delphi
by Hawkeye219,
15. Jan 2007
Hallo Stefan,
die Variable easterstring mußt du im private Teil des Formulars unterbringen, damit ihr Inhalt mehrere Aufrufe der FormKeyPress-Routine überlebt. Der Löschbefehl zu Beginn der Routine schadet auch nur, oder?
Probiere es einmal so:
type
TForm1 = class (TForm)
...
Forum: Object-Pascal / Delphi-Language
Delphi
by Hawkeye219,
14. Jan 2007
char _ist_ ein ordinaler Typ.
case key of
'1': button1.click;
'2': button2.click;
'3': button3.click;
...
',', '.': button11.click;
...
Forum: Object-Pascal / Delphi-Language
Delphi
by Hawkeye219,
14. Jan 2007
Hallo Stefan,
schau dir mal diese Seite an.
Die IF-Anweisungen könntest du übrigens durch eine CASE-Anweisung ersetzen. Eine mögliche Alternative ist die Verwendung der Komponente TAction. Eine Action kann mit mehreren Auslösern (z.B. TButton, TMenuItem) verbunden werden und gestattet auch die Definition eines Shortcuts.
Gruß Hawkeye