X xy619xy Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-07 #1 今天开始真正接触delphi了，我开始试着写一个简单的文本编辑器，可是一开始就遇到问题了。我在写“打开”的代码的时候只写了一句：opendialog1.execute（嘿嘿，应该还有语句，但是我不知道怎么写），但是打不开任何的文件，我看了demo中的txtedit例子，但是还是没弄成功，请大家帮帮我啊，把代码写出来看看可否？？
今天开始真正接触delphi了，我开始试着写一个简单的文本编辑器，可是一开始就遇到问题了。我在写“打开”的代码的时候只写了一句：opendialog1.execute（嘿嘿，应该还有语句，但是我不知道怎么写），但是打不开任何的文件，我看了demo中的txtedit例子，但是还是没弄成功，请大家帮帮我啊，把代码写出来看看可否？？
S superggh Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-07 #2 if openpicturedialog1.Execute then begin end;
M mlzhou Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-07 #3 uses Shellapi; ... begin if opendialog1.execulte then begin ShellExecute(handle,nil,pchar(opendialog1.filename),nil,nil,sw_shownormal); end; end;
uses Shellapi; ... begin if opendialog1.execulte then begin ShellExecute(handle,nil,pchar(opendialog1.filename),nil,nil,sw_shownormal); end; end;
Y yangxiao_jiang Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-07 #4 if openpicturedialog1.Execute then begin //code end;
Z zhumoo Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-07 #5 if openpicturedialog1.Execute then begin //code end; openpicturedialog1 仅仅只取得文件名。
新 新黛飞 Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-07 #6 if openpicturedialog1.Execute then begin memo1.lines.loadfromfile('text.txt'); end;
H ham9v Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-07 #7 if openpicturedialog1.Execute then begin memo1.lines.loadfromfile(Opendialog1.filename); end
X xy619xy Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-07 #8 谢谢了，因为第一次玩这个论坛，才发现最后还要分配积分，苦了我哟，有六个朋友回答，我只好平均分了。
