Отключить пункт меню (Программно)

[ScreN]

Здравствуйте.. Подскажите мне пожалуйста.
Есть пунк меню, допустим "Вырезать", Name = TextCut. По умолчанию он включен (Активен).
Если отключать его программно, то есть, (TextCut.Enabled:=False; )

// Процедура TextCutClick
procedure TForm1.TextCutClick(Sender: TObject);
begin
TextCut.Enabled:=False;
begin
Memo1.CutToClipboard;
end;
end;

То получается что при запуске приложения, пункт меню "Вырезать", остается включенным, пока на него не нажмешь.
Когда на него нажмешь, только тогда он выключается (Становится неактивным).

Как сделать чтобы он был неактивен сразу после запуска приложения?
..........

А вообще мне нужно сделать чтобы он был неактивен, если нечего вырезать.
То есть если в Memo есть текст, но он не выделен, то пункт меню "Вырезать" неактивен. Если же в Memo есть текст, и он выделен, то пункт меню "Вырезать" включается (Становится активным)

Процедура вроде бы простая. Блин но не могу я сообразить.

Помогите?
Заранее спасибо!

[Роман Радер]

ну во-первых у вас в коде лишняя пара begin/end...но это не ошибка
чтоб сразу при запуске - в событии формы OnCreate

проверить, выделен ли текст в мемо можно, используя Memo1.SelLength - возвращает длину выделенного фрагмента.
Memo1.SelStart - позиция курсора/начало выделения
если Memo1.SelLength=0 то ничего не выделено