TMemo um Standard-Tastenkombinationen erweitern

[himitsu]

Strg+Z Undo (Rückgängig)
Strg+C Copy (Kopieren)
Strg+X Cut (Ausschneiden)
Strg+V Paste (Einfügen)
Entf * Delete (Löschen)
Strg+A SelectAll (Alles markieren)

einfach nur diesen Code (in die Zwischenablage) kopieren
und auf der Form einfügen (Form anklicken und Strg+C)

Code:

object ActionList1: TActionList
  Left = 16
  Top = 16
  object EditUndo1: TEditUndo
    Category = 'Bearbeiten
    Caption = '&R'#252'ckg'#228'ngig
    Hint = 'R'#252'ckg'#228'ngig|Letzte Aktion r'#252'ckg'#228'ngig machen
    ImageIndex = 3
    ShortCut = 16474
  end
  object EditCopy1: TEditCopy
    Category = 'Bearbeiten'
    Caption = '&Kopieren'
    Hint = 'Kopieren|Markiertes Objekt in die Zwischenablage kopieren'
    ImageIndex = 1
    ShortCut = 16451
  end
  object EditCut1: TEditCut
    Category = 'Bearbeiten'
    Caption = '&Ausschneiden'
    Hint = 'Ausschneiden|Markiertes Objekt in die Zwischenablage verschieben'
    ImageIndex = 0
    ShortCut = 16472
  end
  object EditPaste1: TEditPaste
    Category = 'Bearbeiten'
    Caption = '&Einf'#252'gen'
    Hint = 'Einf'#252'gen|Inhalt der Zwischenablage einf'#252'gen'
    ImageIndex = 2
    ShortCut = 16470
  end
  object EditDelete1: TEditDelete
    Category = 'Bearbeiten'
    Caption = '&L'#246'schen'
    Hint = 'L'#246'schen|Auswahl l'#246'schen'
    ImageIndex = 5
    ShortCut = 46
  end
  object EditSelectAll1: TEditSelectAll
    Category = 'Bearbeiten'
    Caption = 'Alles &markieren'
    Hint = 'Alles markieren|Markiert das gesamte Dokument'
    ShortCut = 16449
  end
end

Inhalt:

Code:

ActionList:

EditUndo1: TEditUndo
  Category = Bearbeiten
  Caption  = &Rückgängig
  Hint     = Rückgängig|Letzte Aktion rückgängig machen
  ShortCut = Strg+Z

EditCopy1: TEditCopy
  Category = Bearbeiten
  Caption  = &Kopieren
  Hint     = Kopieren|Markiertes Objekt in die Zwischenablage kopieren
  ShortCut = Strg+C

EditCut1: TEditCut
  Category = Bearbeiten
  Caption  = &Ausschneiden
  Hint     = Ausschneiden|Markiertes Objekt in die Zwischenablage verschieben
  ShortCut = Strg+X

EditPaste1: TEditPaste
  Category = Bearbeiten
  Caption  = &Einfügen
  Hint     = Einfügen|Inhalt der Zwischenablage einfügen
  ShortCut = Strg+V

EditDelete1: TEditDelete
  Category = Bearbeiten
  Caption  = &Löschen
  Hint     = Löschen|Auswahl löschen
  ShortCut = Entf

EditSelectAll1: TEditSelectAll
  Category = Bearbeiten
  Caption  = Alles &markieren
  Hint     = Alles markieren|Markiert das gesamte Dokument
  ShortCut = Strg+A