TStringgrid Zellen sperren

[Z32]

Hallo,

ich habe eine Frage zu der Komponete TStringgrid:

Ist es möglich einzelne Zellen zu sperren, also das die nicht mehr selectiert werden können?

So in der Art stringggrid1.cells[x,y].enabled:=false; //geht natürlich nicht :wink:

[marabu]

Hallo,

du kannst im Ereignis OnSelectCell() verhindern, dass eine Zelle besucht wird.

Grüße vom marabu

[Z32]

Zitat:

Zitat von marabu

Hallo,

du kannst im Ereignis OnSelectCell() verhindern, dass eine Zelle besucht wird.

Grüße vom marabu

aha...und wie genau?

hat das was mit der variablen CanSelect zu tun? aber wie kann ich die einsetzen?

[marabu]

Vielleicht so?

Delphi-Quellcode:

procedure TDemoForm.StringGridSelectCell(Sender: TObject; Col, Row: Longint; var CanSelect: Boolean);
begin
  CanSelect := not ((Col = x) and (Row = y));
end;

[Z32]

Also so richtig klappen tut das noch nicht. Mein Code:

Delphi-Quellcode:

CanSelect := not (stringgrid1.Col = 1);

Ich möchte, dass man in der Spalte 1 keine Zelle anwählen kann. Wie lässt sich das realisieren?

[Klaus01]

Hat Achim doch geschrieben:

Delphi-Quellcode:

procedure TDemoForm.StringGridSelectCell(Sender: TObject; Col, Row: Longint; var CanSelect: Boolean); 
begin 
  CanSelect := not (Col = 1); 
end;

Grüße
Klaus

[Z32]

Zitat:

Zitat von Klaus01

Hat Achim doch geschrieben:

Delphi-Quellcode:

procedure TDemoForm.StringGridSelectCell(Sender: TObject; Col, Row: Longint; var CanSelect: Boolean); 
begin 
  CanSelect := not (Col = 1); 
end;

Grüße
Klaus

Hab ich gesehen, aber da bekomme ich eine Fehlermeldung:

[Pascal Fehler] Unit1.pas(96): E2003 Undefinierter Bezeichner: 'Col'

[Zacherl]

Kann aber nicht sein, da Col ganz klar einer der Methodenparameter ist ..

[Z32]

Zitat:

Zitat von Florian Bernd

Kann aber nicht sein, da Col ganz klar einer der Methodenparameter ist ..

Ja aber komischerweise nicht bei mir :gruebel:

Delphi-Quellcode:

procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol, ARow: Integer;
  var CanSelect: Boolean);
begin
//
CanSelect := not (Col = 1);
//
end;

Was kann ich denn jetzt machen..einfach dazuschreiben oder wie... :wiejetzt:

[Klaus01]

Schreib das anstatt Col ACol dann sollte es gehen.

Grüße
Klaus