Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.338 Beiträge
 
Delphi 12 Athens
 
#1

TMemo um Standard-Tastenkombinationen erweitern

  Alt 19. Dez 2008, 07:18
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
Ein Therapeut entspricht 1024 Gigapeut.
  Mit Zitat antworten Zitat