Wklajanie do Edita [BCB6]

Witam

Mam pytanie: jak zablokować możliwość WKLEJANIA do Edita, tak zeby nie można było nic wkleić ani kombinacją "CTRL + V", ani przy pomocy myszki, żeby trzeba było wpisywać dane z klawiatury.
Dzięki za pomoc.

Jesli chodzi o myszke, mozesz zdefiniowac swoje wlasne menu kontekstowe i nie umieszczac tam polecenia Wklej.
Drugie wyjscie:

void __fastcall TForm1::Edit1ContextPopup(TObject *Sender,
      TPoint &MousePos, bool &Handled)
{
  Abort();
} 

A to zablokuje wklejanie z klawiatury:

void __fastcall TForm1::Edit1KeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
  Edit1 -> ReadOnly = Shift.Contains(ssCtrl) && Key == 86;
}

Mam jeszcze jedno pytanie dotyczące Edita:
jak określić w nim położenie kursora piszącego (tej migającej pionowej kreski)?

Dzięki.

W OnChange Edita, można by pobierać jego długość(funkcja strlen()) +1...chyba :D