Hallo zusammen,
ich habe einiges probiert, aber mir will es nicht gelingen...
Ich möchte im ShellTreeView beim Betätigen der Entertaste etwas auslösen.
Den ShellTreeView erzeuge ich zur Laufzeit auf einem Panel.
Nur wie kann ich sowas wie ein
OnKeyDown implementieren?
So habe ich ShellTreeView eingebunden:
Delphi-Quellcode:
...
private
{ Private-Deklarationen }
My_ShellTreeViewData: TShellTreeView;
...
procedure TForm1.FormCreate(Sender: TObject);
begin
My_ShellTreeViewData := TShellTreeView.Create(Self);
with My_ShellTreeViewData do
begin
Parent := panelShellTreeViewData;
Align := alClient
end;
end;
procedure TForm1.?????
begin
if (Key = $0D) then //oder VK_Return
begin
ShowMessage('Enter-Taste erfolgreich');
end;
Vielen Dank schon mal vorab!