Tabtast og tilbage tabtast

prøv at kigge på ..\demos\richedit

Der kan du sætte tabs

Stoney

det er ikke tabs jeg mener. På din tastetur er der i venstre side en knap med to pile, den ene går den ene vej og den anden går den anden vej. Når man trykker på den rykker den en stykke i dokumentet i ms WORD.. hvordan kan jeg gør sådan ved at trykke på en knap i delphi og en tilbage rykning.

procedure TForm1.Button1Click(Sender: TObject);
begin
//tabulering frem
      memo1.SetFocus;
      keybd_event(VK_TAB,45,KEYEVENTF_EXTENDEDKEY,0);
      keybd_event(VK_TAB,45,KEYEVENTF_EXTENDEDKEY + KEYEVENTF_KEYUP,0);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
//tabulering tilbage
memo1.SetFocus;
      keybd_event(VK_BACK,45,KEYEVENTF_EXTENDEDKEY,0);
      keybd_event(VK_BACK,45,KEYEVENTF_EXTENDEDKEY + KEYEVENTF_KEYUP,0);
end;

Stoney

er det det samme hvis jeg bruger richedit.. for det gør jeg nemlig.

ja, det er det samme, men hvorfor prøver du ikke selv ?

Stoney

har lige prøvet og ser ikke ud til at virke.. Det jeg mener er: Tabulerings tast og Tabulerings tast tilbage. altså : Tabulerings tast er frem og Shift + Tabulerings tast er tilbage. Det din kode gør at den rykke 1 tak af gangen tilbage og desuden virker frem ikke.

lukker!