Hi MrFish,
Zitat von
Die OH:
Das Ereignis OnSelectCell tritt ein, bevor eine Zelle im Gitter ausgewählt wird.
type
TSelectCellEvent = procedure (Sender: TObject; ACol, ARow: Longint; var CanSelect: Boolean) of object;
property OnSelectCell: TSelectCellEvent;
Beschreibung
Mit einer Ereignisbehandlungsroutine für OnSelectCell können Sie festlegen, ob eine bestimmte Zelle im Gitter markiert werden kann. Die Parameter Col und Row sind der Spalten- und Zeilenindex der Zelle. Um zu verhindern, daß die Zelle markiert werden kann, weisen Sie dem Parameter CanSelect den Wert False zu.
Delphi-Quellcode:
procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
ARow: Integer; var CanSelect: Boolean);
begin
Caption := Format('Col: %d Row: %d', [StringGrid1.Col, StringGrid1.Row]);
end;
MfG
Stefan