Move to next column if entered column is read only

[daveinhull]

Hi,

Could anyone point me in the right direction to work out how to move to the next column in a DBGrid if the entered column is read only.

Thanks
Dave

[sash]

Something like that (not tested)

Code: Pascal  [Select][+][-]

1. procedure TForm1.DBGrid1ColEnter(Sender : TObject);
2. begin
3.   with DBGrid1 do begin
4.     if Assigned(SelectedColumn) and (not SelectedColumn.ReadOnly then
5.       if SelectedColumn <> LastColumn then // handle (ignore) last column
6.         SelectedIndex := SelectedIndex + 1;
7.   end;
8. end;

Upd: should you care (and will be next OnColEnter triggered) if next column is readonly too?

[daveinhull]

Hi sash,

Sorry I missed your reply, many thanks

Dave