Selectieren über Tastenkürzel

Barret · Beiträge: 156 Erhaltene Danke: 1 Win XP D7 Ent

hi!
Mein Problem liegt darin, dass ich ein EditFeld hab auf dem ich alle Tasten gesperrt hab sprich es ist "readonly". Bei bestimmten Tastenkürzeln soll es aber reagieren. Das Funktioniert auch soweit, das einzige Problem das ich habe ist das er über den Tastenkürz. STRG + A nicht reagiert. Mein Quellcode siht jetzt so aus:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

if (Key = VK_Control) then
  begin
    if (Key = 43) then
      begin
      end
      else
        if (Key = 41) then
          begin
            Edit1.SelectAll;
          end;
  end;

Key = 43 ist für STRG + C die Funktion daführ steht schon an einer anderen stelle, nich das ihr euch noch wundert.
Die ganze Sache steht natürlich in einer OnKeyDown-Procedure.
Moderiert von Peter Lustig: Code- durch Delphi-Tags ersetzt.

_________________
Wir könnten ja, wenn wir wollten aber wir wollen ja nicht.
It´s not a bug, it´s a feature.

Barret · Beiträge: 156 Erhaltene Danke: 1 Win XP D7 Ent

also.... ich hab jetzt rausbekommen, dass mein quellcode stimmt. Das Problem das ich jetzt noch habe, ist das bei SelectAll in meinem Edit feld nur im Hintergrund selectirt wird. Für mich ist die sache jetzt klar aber ich brauch die ganze Sache mit einer farbigen Hintergrundbelegung, also so als wenn man etwas mit einer Maus selectiert.

Ich hab dann noch versucht das über CutToClipboard und PastFromClipboard zu realisieren, aber bei der Sache wird auch der Inhalt meines Editfeldes selectiert.

Kann mir jemand noch einen Tip geben???

_________________
Wir könnten ja, wenn wir wollten aber wir wollen ja nicht.
It´s not a bug, it´s a feature.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme