hallo,
wenn ein TSringgrid den fokus erhält, wird die zell markiert, die nach fixedRow und fixedCol kommt.
in der Regel zelle[1,1].
wie kann ich dies verhindern?
Ziel ist es in einer Terminplanung, zu verhindern, das in diese zelle was reinkopiert werden kann, wenn diese
zelle gesperrt ist.
wie ich das editieren erhindern kann, ist klar. wei aber das reinkopieren:
so wird das editieren verhindert:
Delphi-Quellcode:
procedure TfrmMain.MyMouseMove(var msg:TWMMouse);
var
ACol,
ARow : integer;
begin
ACol:= Stringgrid1.Col;
ARow:= Stringgrid1.Row;
Stringgrid1.MouseToCell(msg.XPos,msg.YPos,ACol,ARow);
// ist 'frei' dann Eingabe unmöglich machen
if DayList[acol].isfree Then
Stringgrid1.Options:= Stringgrid1.Options - [goEditing]
else
Stringgrid1.Options:= Stringgrid1.Options + [goEditing];
end
aber ich kann immer noch in diese zellen was kopieren.
raik