Hi ihr,

hab auch mal wieder 'ne Frage.

Ich möchte den Editormodus für einzelne Zellen eines StringGrids verhindern, also so, dass der Zelleninhalt nicht bearbeitet werden kann.
Hab schon über OnKeyUp, OnKeyPress und OnKeyDown versucht Enter und F2 zu blockieren.
OnSelectCell hilft mir auch nichts, da die Zellen immer noch auswählbar sein soll.

Bei einigen der blockierten Zellen soll statt dessen ein neues Fenster zum bearbeiten geöffnet werden. Dieses kann ich aber auch über OnKeyUp erstellen.

Freue mich über eine Antwort, wenn ihr mal ein bissel Zeit habt. (LL)

Du könntest ja die Messages abfangen und nicht weiterleiten.

Hallo himitsu

ich weiß leider nicht was Du unter

Zitat von himitsu:

...OnSelectCell hilft mir auch nichts, da die Zellen immer noch auswählbar sein soll...

verstehst, aber damit

markieren

Delphi-Quellcode:

PROCEDURE TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
   ARow: Integer; VAR CanSelect: Boolean);
BEGIN
   IF ACol IN [1, 2] THEN
      StringGrid1.Options := StringGrid1.Options + [goEditing]
   ELSE
      StringGrid1.Options := StringGrid1.Options - [goEditing];
END;

ist die Zelle mit der Maus anwählbar, aber der Text nicht selektierbar.

Danke APP,

das hilft.

Zitat von APP:

ich weiß leider nicht was Du unter ... verstehst

In OnSelectCell wird doch mit CanSelect := False verhindert das die Zelle ausgewählt werden kann.


Da sich der Editmodus "ständig" ändert, bin ich nicht auf die Idee gekommen den auch noch mal einzeln für jede Zelle zu ändern.

Es gibt jetzt bei mir 3 verschiedene Zustände eines StringGrids:

• Betrachtungsmodus [+goRangeSelect, +goRowSelect, -goEditing]
• Editmodus 1 (Zelle ansehen):
  - Zelleninhalt änderbar [-goRangeSelect, -goRowSelect, +goEditing]
  - Zelleninhalt fest [-goRangeSelect, -goRowSelect, -goEditing]
• Editmodus 2 (Zelleninhalt ändern) [-goRangeSelect, -goRowSelect, +goEditing]
  
  
  andere Zelle wird ausgewählt und kein [goRowSelect]:
  - Zelleninhalt änderbar [+goEditing]
  - Zelleninhalt fest [-goEditing]

So sah es vorher aus:

• Betrachtungsmodus [+goRangeSelect, +goRowSelect, -goEditing]
• Editmodus 1 (Zelle ansehen) [-goRangeSelect, -goRowSelect, +goEditing]
• Editmodus 2 (Zelleninhalt ändern) > hier hing es