Avatar billede coladrenge Nybegynder
20. august 2007 - 11:08 Der er 1 løsning

KeyPress tabulator

Hej

Jeg har et memo felt hvor jeg vil have curseren til at hoppe til næste placering af xxx ved tryk på tabulator. Det fungere fint med at hoppe videre til xxx men desværre får den sat et tabulator hop ind i memo feltet og det skal den ikke - den skal kun gå hen og markere xxx
Avatar billede hrc Mester
21. august 2007 - 13:02 #1
http://www.swissdelphicenter.ch/torry/showcode.php?id=591

... og så køre det sammen med noget lignende dette:

procedure TfrmMain.MemoKeyPress(Sender: TObject; var Key: Char);
var
  lgd, l1, l2 : integer;
begin
  if ord(Key) = VK_TAB then
  begin
    with Sender as TMemo do
    begin
      lgd := length(Text);
      l1 := SelStart;
      while (l1 < lgd) and (Text[l1] <> #32) do
        inc(l1);
      if Text[l1] = #32 then
      begin
        inc(l1);
//        l2 := l1;
//        while (l2 < lgd) and (Text[l2] <> #32) do
//          inc(l2);
        SelStart := l1;
//        SelLength := l2 - l1;
      end;
    end;
    Key := #0;
  end;
end;
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester