TStringGrid Inplace Editor und Cursor Left/Right

DocShoe

Hallo nochmal,

habe ein weiteres kleines Problem mit dem TStringGrid Inplace Editor:
Ich möchte mit den Cursor Tasten durch das Grid navigieren können, aber bestimmte Spalten dabei überspringen.
Im OnSelect Handler setze ich das CanSelect Flag der gesperrten Spalten auf false, damit die nächste Zelle nicht angesprungen werden kann. Stattdessen soll der Fokus auf die übernächste Zelle gesetzt werden, um die gesperrte Zelle zu überspringen. Dazu habe ich im OnKeyDown Handler eine Überprüfung, ob VK_RIGHT gedrückt wurde:

void __fastcall MyForm::OnKeyDownGrid( TObject* Sender, WORD& Key, TShiftState State )
{
   if( Key == VK_RIGHT && Grid->Col == 2 )
   {
      // Wechsel aus Spalte 2 in Spalte 4
      Grid->Col = 4;

      // Key schlucken
      Key = 0;
   }
}

Dummerweise kann ich nun im Text des Inplace Editors nicht mehr mit der Cursor Right Taste arbeiten, um mich im Text zu bewegen, da dann in Spalte 4 gesprungen wird.
Ich brauche also eine Unterscheidung, ob ich mich im Text des Editors nach rechts bewege oder ob die Cursor Right Taste tatsächlich einen Spaltensprung nach rechts bewirken soll.
Kennt sich da jemand aus?

Jansen

TStringGrid::EditorMode abfragen!?

DocShoe

Jau, hat geklappt, danke!

Edit:
Ne, klappt doch nicht. Da das Grid das Flag goAlwaysShowEditor hat ist EditorMode immer true.

Jansen

Ich denke, du musst den Mode explizit setzen?

DocShoe

Den Schnipsel in meinen dritten Posting habe ich von irgendeiner Delphi Seite, aber es hat sich herausgestellt, dass ich das Flag nicht setzen muss, wenn das Grid die Option goAlwaysShowEditor hat.
Das Grid soll sich grob wie ein Excel Sheet verhalten, inklusive Cursor Navigation, daher muss ich das goAlwaysShowEditor Flag benutzen.