如何在 delphi 中的 TOpenDialog 中仅过滤纯文本文件

Question

我需要能够将文件中的文本放入备忘录中，但我已经涵盖了这部分内容。

我想做的是在文件对话

中只过滤纯文本文件(.txt; .html; .c; .cs; ect)

是否有一些快速的方法可以做到这一点，或者我只是手动过滤所有纯文本文件？

Answer 1

Andreas Rejbrand 在评论中给出的答案是正确的。

这是实现它的代码片段：

procedure TForm1.Button1Click(Sender: TObject);
begin
    OpenDialog1.Filter := 'Text files|*.TXT;*.HTML;*.C;*.CS';
    if OpenDialog1.Execute(Handle) then
        Memo1.Lines.LoadFromFile(OpenDialog1.FileName)
    else
        Memo1.Lines.Add('**** cancel ****');
end;

此代码写入将所选文件内容加载到备忘录中。

如何在 delphi 中的 TOpenDialog 中仅过滤纯文本文件

How can I filter only plain text files in the TOpenDialog in delphi

delphi

delphi-7