[ScreN]

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

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

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

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

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

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

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

[hkdkest]

в событие creat отключи ) или сделай по умолчанию отключенным

[M.A.D.M.A.N.]

Сделай свою менюшку, и управляй ей как хочеш.

[ScreN]

У меня и так свое Меню...
Пробывал в MemoChange так написать

If length(sMemo1.SelText)>0 Then Form1.TextCut.Enabled:=True
else
Form1.TextCut.Enabled:=False;

Не помогло...
А должно было по идеи!