Mega Code Archive

 
Categories / Delphi / VCL
 

How to set the tabulator width in a TMemo

Title: How to set the tabulator width in a TMemo procedure TForm1.Button1Click(Sender: TObject); var FTabWidth: Integer; begin Memo1.WantTabs := True; {setzt die Tabulator Breite auf 4 Pixel} {set the tabulator width to 4 pixel} FTabWidth := 4; SendMessage(Memo1.Handle, EM_SETTABSTOPS, 1, Longint(@FTabWidth)); end;