letzte gedrückte taste im Stringgrid abfragen

[schlock]

Hallo,
ich habe ein Problem mit den Stringgrid. Ich brauche in der Validierungsroutine meines Stringgrids die Information welche Taste zuletzt gedrückt wurde und ob es eine Maustaste war oder nicht.
Ein Ansatz den ich hier im Forum gefunden habe war folgender:

Delphi-Quellcode:

procedure TfrmJournal.KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  pLastKey:= Key
end;

procedure TfrmJournal.MouseDown(Sender: TObject; Button: TMouseButton;
                              Shift: TShiftState; X, Y: Integer);
begin
  pLastKey:= 0;
end;

// Das Validierungsevent in dem ich die zuletzt gedrückte Taste brauche
procedure TfrmJournal.CellValidate(Sender: TObject; ACol, ARow: Integer;
                                   var Value: string; var Valid: Boolean);
begin
  inherited;
  if (pLastKey <> 0) then
  begin
    // Mach irgedwas
  end;
end;

Leider geht das so nicht, da das Validierungsevent vor den beiden anderen Events aufgerufen wird und
ich dann immer die vorletzt gedrückte Taste erhalte.
Hat irgendjemand eine Idee ??