[Delphi] Jak zrobić aby np. funkcja 'kopiuj' była ni

[???] Cześć dopiero niedawno zacząłem swą przygodę z Delphi,pisze właśnie mały notatnik i mam do was pytanko a mianowicie chodzi mi oto jak zrobić aby np. funcja 'kopiuj' była nie aktywna jak np. w Windowsowym NotePad ,gdy tekst nie jest zaznaczony?
Za wszystkie odpowiedzi wielkie dzięki.
JOKER

Jeżeli kopiuj jest przyciskiem to np. w OnClick Memo wpisz:
if Memo1.SelLength = 0 then
Kopiuj.Enabled := False
else
Kopiuj.Enabled := True;

W katalogu Demos są przykłady m. in. prosty edytor. Przejrzyj źródła.

--
Jest jeszcze jeden błąd ... :)

Apel: Piszcie w tematach o jaki język programowania chodzi np. : [Delphi], [C++], itp.

a zakładając że chodzi ci o Memo i masz np. Menu Edycja a w nim opcjię
Kopiuj to w zdarzeniu onClick Edycja zrobiłbym tak:

procedure TForm1.Edycja1Click(Sender: TObject);
begin
TMenuItem(Sender).Find('Kopiuj').Enabled := Memo.SelLength > 0;
end;

--
Pozdrawiam...
piechnat

Jeżeli masz Delphi > 5.0 (chyba) to użyj komponentu TActionList i dorzuć akcję TEditCopy. Następnie podrzuć ją pod menu oraz pod przycisk, i wszystko będzie się dezaktywować automatycznie.

--
Vogel [Delphi 6 PE]

Life is just a dream, you know...
[Cowboy Bebop]