|
//------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//-----------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//-------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if(OpenDialog1->Execute())//首先执行打开文件对话框函数,这时,打开文件对话框才显示出来。如果执行成功,这个函数返回true,否则返回false
{
Memo1->Lines->Clear();//把Memo中的内容清掉 Caption=OpenDialog1->FileName; //获得用户选择的文件的路径名,并将它设置成窗体的标题。注意,因为是在Form1窗口(容器)中进行的操作,所以Caption前省了Form1,当然你可以加上Memo1->Lines->LoadFromFile(OpenDialog1->FileName);// 调用文本装入函数从文件中装入文本,并显示在编辑框中。 }
}
//-------------------------------------------------- |