Einzelnen Beitrag anzeigen

Benutzerbild von Störtebeker
Störtebeker

Registriert seit: 9. Jul 2007
398 Beiträge
 
#1

Statusbar: "INS" und "OVR"

  Alt 18. Nov 2008, 20:26
Hi,

bin gerade dabei, für meinen Editor in der Statusbar den Zustand des Schreibmodus anzugeben. Kennt man ja.

Doch
Delphi-Quellcode:
procedure TForm10.SynEdit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  If Key = #45 then // #45 = VK_INSERT
begin
  Statusbar1.Panels[2].Text := 'OVR';
end
else
begin
  Statusbar1.Panels[2].Text := 'INS';
  end
end;
funzt nicht. Ist es den überhaupt im KeyDown-Ereignis richtig? Oder doch im KeyPress?

MfG
Störtebeker
"And he piled upon the whale´s white hump - a sum of all the rage and hate felt by his whole race.
If his chest had been a cannon, he would have shot his heart upon it."
  Mit Zitat antworten Zitat