Markieren eines Memofeldes mit STRG-A

Arakis · Beiträge: 344

Hi,
wie kann man eigentlich dafür sorgen, dass ein Memofelt beim Drücken von STRG-A markiert wird?

Bis dann
user defined image

_________________
Mit dem Computer löst man Probleme, die man ohne ihn nicht hätte.
Entwickler von SpaceTrek: The New Empire - Siehe Hompage!

LCS · Verfasst: Mo 07.10.02 08:33

Hi
Markieren kannst du den Text in einem Memofeld so:

markieren

Quelltext

1:
2:

memo.SelStart := 0;
memo.SelLength := Length(memo.Text);

Für die Ausführung bei STRG+A musst du selbst sorgen. Entweder verwendest du einen Menüeintrag mit dem entsprechenden ShortCut, oder du verwendest KeyDown:

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (Shift = [ssCtrl]) and (Key = VK_A) then begin
    memo.SelStart := 0;
    memo.SelLength := Length(memo.Text);
  end;
end;

Gruss Lothar

_________________
Der BH ist für die Brust, der Plan ist für'n Ar...

Arakis · Beiträge: 344

Aha, jetzt weiß ich endlich warum fast jedes Programm einen "Alles Markieren STRG-A" im Bearbeiten endhält: Ist ja viel einfacher user defined image

Ich entscheide mich für die Tastenkombination im Menü, man möchte ja nicht jedem dämlichen Memofelt ein Event zuweisen :wink:

Bis dann

_________________
Mit dem Computer löst man Probleme, die man ohne ihn nicht hätte.
Entwickler von SpaceTrek: The New Empire - Siehe Hompage!

Klabautermann · Verfasst: Mo 07.10.02 09:34

Hallo,

noch einfacher geht es mit einer ActionList (die noch viel mehr schöne dinge kann):
1. Action List auf das Formular.
2. ActionList auf dem Formular doppelt clicken.
3. Auf das Pfeilchen neben dem Gelben Zetttelchen und "Neue Standartaktion" wählen.
4. EditSelectAll bzw. tEditSelect all auswählen.
5. Fertig.

Interessant wird die Action List erst wenn du mehr als eine Aktion drin hast. Dazu solltest du aber vorher der Action List noch eine ImageList zuweisen, um auch die schicken Standart Bilder zu haben. Dann kannst du MEnüeinträgen, Toolbars aber auch "normalen" Button eine Action zuweisen und es wird neben der Caption auch das Bild angezeigt, wenn die Komponente auch mit der ImageList verbunden ist.

Gruß
Klabautermann

Arakis · Beiträge: 344

Kennt jemand ein gutes Tutorial zum Thema ActionList? Soll ja ganz gut sein, diese Komponente, aber ich weiß nicht mir ihr umzugehen :cry:

Bis dann

_________________
Mit dem Computer löst man Probleme, die man ohne ihn nicht hätte.
Entwickler von SpaceTrek: The New Empire - Siehe Hompage!

Klabautermann · Verfasst: Mo 07.10.02 10:00

Hallo,

ich weiß nicht ob es gut ist, aber ich habe vor 'ner weile mal was zusammengetippt.

Gruß
Klabautermann

Arakis · Beiträge: 344

Danke Klabautermann, so was hab ich gesucht

Bis dann

_________________
Mit dem Computer löst man Probleme, die man ohne ihn nicht hätte.
Entwickler von SpaceTrek: The New Empire - Siehe Hompage!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme