Entwickler-Ecke
Grafische Benutzeroberflächen (VCL & FireMonkey) - Markieren eines Memofeldes mit STRG-A
Arakis - Mo 07.10.02 01:15
Titel: Markieren eines Memofeldes mit STRG-A
Hi,
wie kann man eigentlich dafür sorgen, dass ein Memofelt beim Drücken von STRG-A markiert wird?
Bis dann
LCS - Mo 07.10.02 08:33
Hi
Markieren kannst du den Text in einem Memofeld so:
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:
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
Arakis - Mo 07.10.02 09:12
Aha, jetzt weiß ich endlich warum fast jedes Programm einen "Alles Markieren STRG-A" im Bearbeiten endhält: Ist ja viel einfacher
Ich entscheide mich für die Tastenkombination im Menü, man möchte ja nicht jedem dämlichen Memofelt ein Event zuweisen :wink:
Bis dann
Klabautermann - 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 - Mo 07.10.02 09:38
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
Arakis - Mo 07.10.02 10:03
Danke Klabautermann, so was hab ich gesucht :D
Bis dann
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!