Action1 zuweisung funktioniert nicht?

[xZise]

Da man den Shortcut einstellen kann, habe ich das so gelöst für 26 Actions:

Delphi-Quellcode:

procedure TfMain.FormCreate(Sender: TObject);
var
  Add : string;
  i : Byte;
begin
  {...}
    Add := ReadString('Shortcuts', 'KofferSC', 'Strg+');
  {...}
  for i := 1 to 26 do begin
    (FindComponent('Action' + IntToStr(i)) as TAction).ShortCut := TextToShortCut(Add + Chr(64 + i));
  end;
end;

Und warum funktioniert dieses Kontrukt nicht?

Code:

Add:              'Strg+'
Chr(64 + i):      'A'
Action1.shortcut: 0
i:                1

Das sagt er mir, wenn ich dort debuge :(

[Steve]

Hm was genau funktioniert denn nicht?

[xZise]

Action.shortcut ist nicht belegt

[Hawkeye219]

Fabian, arbeitest du mit einer englischen Delphi-Version? In diesem Fall mußt du wahrscheinlich "Ctrl+" statt "Strg+" verwenden.

Gruß Hawkeye

[xZise]

Ah thx ;) Das wars :D