🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: cn.bbs.comp.program
Article #423

C++Builder����һ��

#423
From: �Ӱ���һ��
Date: Mon, 29 Jun 1998 00:00
51 lines
2966 bytes

����C++Builder3.0��д��һ���ĵ����������
�����̵������ļ��������ٴ��Ǻܺõģ���������ߴ򿪾��ǣ�

{\rtf1\ansi\ansicpg936\deff0\deftab720{\fonttbl{\f0\fswiss MS Sans Serif;}{\f1\froman\fcharset2 Symbol;}{\f2\fnil\fcharset134 Default;}}
{\colortbl\red0\green0\blue0;}
\deflang1033\horzdoc{\*\fchars 
!),.:\'3b?\}]\'a1\'a2\'a1\'a3\'a1\'a4\'a1\'a5\'a1\'a6\'a1\'a7\'a1\'a8\'a1\'a9\'a1\'aa\'a1\'ab\'a1\'ac\'a1\'ad\'a1\'af\'a1\'b1\'a1\'b3\'a1\'b5\'a1\'b7\'a1\'b9\'a1\'bb\'a1\'bd\'a1\'bf\'a1\'c3\'a3\'a1\'a3\'a2\'a3\'a7\'a3\'a9\'a3\'ac\'a3\'ae\'a3\'ba\'a3\'bb\
'a3\'bf\'a3\'dd\'a3\'e0}{\*\lchars ([\{\'a1\'ae\'a1\'b0\'a1\'b2\'a1\'b4\'a1\'b6\'a1\'b8\'a1\'ba\'a1\'bc\'a1\'be\'a3\'a8\'a3\'db\'a3\'fb\'a3\'ae\'a1\'a4}\pard\plain\f2\fs18 sdfasdfas
\par dfasdf
\par asdf
\par asdfasdfdas
\par }

�����ǰ����ļ���ʽ���������������ı��ļ����Ǹ���ô�죿
��һ���ļ���һ��һ��д��ȻҲ���ԣ�����û�������õİ취�أ�

Դ�ļ��д��̵�����ǣ�
void __fastcall TEditForm::Save1Click(TObject *Sender)
{
  if(Caption == DefaultFileName){
    Saveas1Click(Sender);
  }
  else{
    Editor->Lines->SaveToFile(PathName);
    Editor->Modified = false;
  }
}
//---------------------------------------------------------------------
void __fastcall TEditForm::Saveas1Click(TObject *Sender)
{
  SaveFileDialog->FileName = PathName;
  if (SaveFileDialog->Execute() ){
    PathName= SaveFileDialog->FileName;
    Caption = ExtractFileName(PathName);
    Save1Click(Sender);
  }
}
//---------------------------------------------------------------------



--

          ��������������������������������������������������
          ��������ƾ�Ķ��ģ�ƾ����棬һ���ܱ�ʤ      ��
          ����  ��·��Ѫ���ܼ�֤�������԰��൱��ִ�ҳ�    ��
          ��������������������������������������������������

�� ��Դ:���������� bbs.cst.sh.cn��[FROM: 202.127.16.22]
Technical Details
Message-ID: <3PI737$tz1@bbs.cst.sh.cn>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: Chinese,GB
X-Google-Thread: fc86e,42830bbabd2148cb,start
X-Google-Attributes: gidfc86e,public
From: DreamTiger.bbs@bbs.cst.sh.cn (�Ӱ���һ��)
Subject: C++Builder����һ��
Date: 1998/06/29
Message-ID: <3PI737$tz1@bbs.cst.sh.cn>
X-Deja-AN: 367105783
X-Filename: Programming/M.899129239.A
Organization: ��������վ
Newsgroups: cn.bbs.comp.program