Elektroda.pl
Elektroda.pl
X

Search our partners

Find the latest content on electronic components. Datasheets.com
Elektroda.pl
Please add exception to AdBlock for elektroda.pl.
If you watch the ads, you support portal and users.

Jak przenieść kursor do obiektu TEdit w BCB 6

16 Jan 2006 18:30 1629 7
  • Level 31  
    Mam obiekt TEdit na formularzu. W obiekcie są jakieś dane - obiekt jest połączony ze zmienną. Zdarzenie OnClick przenosi dane do TEdita.

    Chcę zrobić tak, że klikam myszą na ten obiekt raz i wtedy w TEdit pojawia mi się od razu kursor z lewej strony, zaznacza się cały tekst i pierwsze naciśnięcie klawiatury wprowadzi naciśnięty znak do TEdit'a. Użyłem SelectAll(), aby zaznaczyć cały tekst przed wprowadzaniem, ale nigdzie nie znalazłem funkcji, aby wstawić kursor (kursor piszący) przed pierwszym znakiem w TEdit, ani też nigdzie indziej.

    Chodzi mi o zastępowanie istniejącego tekstu wprowadzanym z klawiatury po jednorazowym kliknięciu na TEdit.

    Obecnie muszę kliknąć raz na TEdit, zaznaczyć stary i wpisać nowy tekst. Żmudne to, zwłaszcza przy kilkunastu poprawkach.

    Pozdrawiam.
  • User removed account  
  • Level 31  
    Może to i działa, ale nie w BCB 6 (to nie jest Delphi...).

    Komponent TEdit z VCL nie ma zmiennej Active, ani niczego podobnego. Przynajmniej nie rzuciło mi się w oczy.

    Jakby to było proste, to bym nie pytał. ;)

    Pozdrawiam.
  • Helpful post
    Level 29  
    W Delphi można zrobić tak:

    Code:
    procedure TForm1.Edit1Click(Sender: TObject);
    
    begin
      with Edit1 do
      begin
        SetFocus;
        SelectAll;
      end;
    end;


    Myślę, że nie będzie problemu z przeniesieniem tego na BCB.
  • Level 31  
    Dzięki Jaca !!!

    Chodziło właśnie o SetFocus() - dziwię się, że sam na to nie wpadłem...

    Czyli w BCB 6 będzie to tak:

    Code:

       Edit1->SelectAll();
       Edit1->SetFocus();     


    To tak na marginesie dla wszystkich szukających. ;)

    Pozdrawiam.

    PS. Temat zakończony.

  • Level 10  
    A jak zrobić żeby po przejściu do edita kursor ustawiał się na końcu tekstu bez zaznaczenia ?. Standardowo ustawia się na pierwszym miejscu.

  • Level 10  
    O! Działa. Bardzo dziękuje za szybką podpowiedź.