Wyłączenie kursora w TEdit

[Corvis]

Witam,

Jak w temacie. Wie ktoś może jak wyłączyć migający Kuror w TEdit ??

Ps. Nie chodzi mi o Edit->Enabled = false

pozdrawiam

[Cyfrowy Baron]

Najlepsze co potrafię wymyślić:

Kod: Zaznacz cały

#include <memory>
void __fastcall TForm1::FormPaint(TObject *Sender)
{
  std::auto_ptr<Graphics::TBitmap> bmp(new Graphics::TBitmap());

  CreateCaret(Edit1->Handle, bmp->Handle, 0, 0);
  ShowCaret(Edit1->Handle);
}
//---------------------------------------------------------------------------


ale lepiej będzie go po prostu ukryć:

Kod: Zaznacz cały

void __fastcall TForm1::FormPaint(TObject *Sender)
{
  HideCaret(Edit1->Handle);
}
//---------------------------------------------------------------------------

[Corvis]

Dokładnie, o to mi chodziło

Dzięki wielkie !!!!