我有返回字符索引的函数 GetCharFromPos(Pt: TPoint): Integer;
现在我想了解该职位的特征。像 GetCharByIndex(Index: Integer): Char;
最佳答案
使用纯 VCL 实现此目的的有效方法是使用 SelStart
、SelLength
和 SelText
。
function GetCharByIndex(Index: Integer): Char;
begin
RichEdit.SelStart := Index;
RichEdit.SelLength := 1;
Result := RichEdit.SelText[1];
end;
您可能希望在修改之前保存选择,然后在读取字符后恢复它。
<小时/>然而,这是一种相当困惑的读取字符的方式。如果您准备使用原始 Win32 API,那么您可以使用 EM_GETTEXTRANGE
.
关于delphi - 如何从 TRichedit 中按点或按索引获取字符,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/6263562/