Morgen!
Ich gebe keine Garantie das folgendes funktioniert(dafür ist es zu früh
:
Delphi-Quellcode:
If Key = VK_INSERT then
begin
SBarInfo.Panels[1].Text := 'Insert';
end
else
begin
SBarInfo.Panels[1].Text := 'Override';
end;
Das ganze gehört aber dann in KeyDown/KeyUp da er den Char von KeyPress nicht mit VK_Insert vergleichen kann.
Auch Keypreview auf True stellen sonst reagiert das ganze nicht wenn nicht die Form selbst den Fokus hat.
Gruß,
Max