opendialog怎么使用？ — 编程爱好者社区

您所在位置：社区首页 — Delphi讨论区 — opendialog怎么使用？

主题：opendialog怎么使用？

ahmatjan [专家分：0] 发布于 2006-11-30 20:08:00

大家好！　我是一个初学者　我希望大家多多教我
我想编一段程序,实现以下功能
form1上放了一个memo组件，我想MEMO1中打开一个txt文件，放了一个opendialog
但是怎样进行打开，具体语句怎么写？
还望各位高手大侠指教,在下多谢了

沙发

ooooh [专家分：60] 发布于 2006-11-30 20:46:00

var filename:string;
begin
  if OpenDialog1.Execute then
    filename := OpenDialog1.FileName;
  memo1.Lines.LoadFromFile(filename);
end;

板凳

ahmatjan [专家分：0] 发布于 2006-12-02 17:54:00

多谢谢

您尚未登录，请登录后再回复。点此登录或注册