╙∩≡αΓδσφΦσ ≥αß≤δ ÷ΦσΘ Γ Memo-Ωε∞∩εφσφ≥σ

╩αΩ ≤∩≡αΓδ ≥ⁿ ≥αß≤δ ÷ΦσΘ Γ Memo-Ωε∞∩εφσφ≥σ?

─δ ²≥επε φσεß⌡εΣΦ∞ε ∩ε±≥αΓΦ≥ⁿ ±ΓεΘ±≥Γε "WantTabs" Γ "True". ╥σ∩σ≡ⁿ Σδ ≤∩≡αΓδσφΦ °≥≡≥φεΘ ≥αß≤δ ÷ΦΦ φσεß⌡εΣΦ∞ε Γ√τΓα≥ⁿ API-⌠≤φΩ÷Φ■ SendMessage. ┬ ∩ε±δσΣφσ∞ ∩α≡α∞σ≥≡σ ⌠≤φΩ÷Φ εµΦΣασ≥ ≤Ωατα≥σδⁿ φα ∞α±±ΦΓ ± ²δσ∞σφ≥α∞Φ ≥Φ∩α Word, Γ Ωε≥ε≡ε∞ ≤Ωαταφ√ ∩ετΦ÷ΦΦ Γ σΣΦφΦ÷α⌡ ²Ω≡αφα. ─δ ∩≡Φ∞σ≡α Γ√τεΓ ⌠≤φΩ÷ΦΦ ± ≤ΩαταφΦσ∞ ΣΓ≤⌡ ∩ετΦ÷ΦΘ ≥αß≤δ ÷ΦΦ:

procedure TForm1.FormCreate(Sender:TObject);
const
  Tabs: array[0..1] of Word = (4, 8);
begin
  SendMessage(Memo1.Handle, EM_SetTabStops, 2, LongInt(@Tabs));
end;

╤εΓσ≥√ φα≈Φφα■∙Φ∞