안녕하세요?  이종극입니다.
아래의 글은 프로그램뱅크 동호회 델파이 코너에 있는 내용입니다.

에디트 박스에서 삽입, 수정이 되도록 한 것입니다.
이건 정말 편법입니다.
KeyDown event에서 처리를 하도록 한 거라서 Key를 걸러 내야 합니다.
지금은 일반 숫자, 숫자 키 위에 있는 특수 문자들, 그리고 알파벳들만
수정이 되도록 되어있습니다.
한글일 경우는 수정모드가 먹질 않는 군요.

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
    if Key = VK_INSERT then
    begin
        bInsert := not bInsert;
        if bInsert then
            StatusBar1.SimpleText := '삽입'
        else StatusBar1.SimpleText := '수정';
    end
    else if (Key = VK_SPACE) or ((Key >= 48) and (Key <= 57))
        or ((Key >= 65) and (Key <= 90)) then
    begin
        if bInsert then
            Edit1.SelLength := 0
        else Edit1.SelLength := 1;
    end;
end;

참고하세요...