超级菜问------怎么点击按钮出现一个txt文本~~~~~~ 在哪里出现,txt文本在软盘上还是网络上? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 txt问本就是硬盘上,就点一下就出来,怎么办的。 unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Memo1: TMemo; Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);begin Memo1.Lines.LoadFromFile('''');end;end. Memo1.Lines.LoadFromFile('''');写对文件名 就一个按钮在窗体上,目录下还有个test.txt,点按钮就象双击test.txt一样怎么办? Memo1.Lines.LoadFromFile('Path'+'test.txt'); 没有其他的控件,就是一个button1,没有memo WinExec('notepad.exe c:\test.txt', SW_SHOWNORMAL); DELPHI字符串处理 高分求教,如何在dbgrid中加一列按钮 用QR制表如何显示表名或自定义的标题? 哪位大哥帮我根据要求合理设计一个数据库表? 从第三方控件开始继承 在Adoquery中,添加一个fkdata类型的数据字段 各位大哥帮我看看有什么错?? 为什么我把窗口的属性设成置顶了,但是在使用过程中有时候会失效呢? 我的处男作! 那里有delphi5可以下载呢? 如何使用ADO对数据进行添加、修改与删除、查询 D6出过补丁吗?
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;type
TForm1 = class(TForm)
Memo1: TMemo;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.LoadFromFile('''');
end;end.