Delphi Tastenkombinationen Block -> oder <-

[Tau]

Hallo Leute


mir steht ein Haufen Überarbeitung vom älteren Code bevor.

Ich weis das es einige Tastenkombinationen gibt im Editor.

Weis jemand auf die schnelle wie man einen ganzen Block nach rechts verschieben kann.

Wie das unten angeführte Beispiel.

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject); 
begin 
  RegisterHotKey(Form1.Handle, 1, MOD_Alt, Ord('A'));    I
  RegisterHotKey(Form1.Handle, 2, MOD_Alt, Ord('B'));    I
  RegisterHotKey(Form1.Handle, 3, MOD_Alt, Ord('C'));    I
  RegisterHotKey(Form1.Handle, 4, MOD_Alt, Ord('D'));    I
  RegisterHotKey(Form1.Handle, 5, MOD_Alt, Ord('E'));    I  ---> rechts rücken
  RegisterHotKey(Form1.Handle, 6, MOD_Alt, Ord('F'));    I
  RegisterHotKey(Form1.Handle, 7, MOD_Alt, Ord('G'));    I
  RegisterHotKey(Form1.Handle, 8, MOD_Alt, Ord('H'));    I
  RegisterHotKey(Form1.Handle, 9, MOD_Alt, Ord('I'));    I
end;

schöne Grüsse
Tau