DBGrid. Undgå at "pil ned" opretter en ny tom linie/record

når din dbgrid er ReadOnly, skulle man ikke kunne oprette en ny record,

er din DataSource1 "AutoEdit" sat til [False]

procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if (key =  vk_Down ) and  (adoquery1.RecNo = adoquery1.RecordCount) then
key := 0;
end;

Stoney

Hvis du vil gøre kolonne 3 read-only

dbgrid1.Columns[2].ReadOnly := true;

Stoney

Private Sub DBGrib1_OnAddNew()
OnAddNew := False;

koden12 >>

Det ligner det grimme VB

:-)

Stoney

UPS... : )
Se bort fra den !
VH
Koden12

for i := 0 to Les_Strings.Count - 1 do
    begin
      Colonne := InitialCol;
      Inc(Ligne);
      StartPos := 1;

Jeg mener heller ikke at dit seneste input kan anvendes

Har i mellemtiden kodet/anvendt EDatabaseError handler således at applikationen ikke kan låse. Resultatet er ok.
Har også prøvet noget der ligner dit 23/10 forslag (teste om antal records øges ved key down). Det er lidt ufikst.
Der SKAL kunne rettes i en columm (DBGrid, lodret). Der må ikke kunne rettes i øvrige columms. TTable er "key'ed" på en et item/columm der ikke må kunne rettes (ReadOnly). "Pil ned" og indtastning af data i "ReadOnly:=false" columm låser systemet.
Det ser ikke ud til at der findes er en simpel løsning. Det er ok - når bare man ved det ...