用BCB编写一个改写oracle日期显示格式的程序

原创 2002年07月05日 09:23:00
用BCB编写一个改写oracle日期显示格式的程序

 
 

#include <vcl.h>
#pragma hdrstop
#include <Registry.hpp>
#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)
{
//读注册表
TRegistry *RegLiveFpcnR = new TRegistry;
 try
 {
  RegLiveFpcnR->RootKey = HKEY_LOCAL_MACHINE;
  if(RegLiveFpcnR->OpenKey("//SOFTWARE//ORACLE",true) != false)
  CSpinEdit1->Text = RegLiveFpcnR->ReadString("NLS_DATE_FORMAT");
 }
 __finally
 {
  RegLiveFpcnR->CloseKey();
  delete RegLiveFpcnR;
 }
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{
//写注册表
TRegistry *RegLiveFpcnW = new TRegistry;
 try
 {
  RegLiveFpcnW->RootKey = HKEY_LOCAL_MACHINE;
  if(RegLiveFpcnW->OpenKey("//SOFTWARE//ORACLE",true) != false)
  RegLiveFpcnW->WriteString("NLS_DATE_FORMAT",Trim(CSpinEdit2->Text.c_str()));
  ShowMessage("日期格式设置成功!");
 }
 __finally
 {
  RegLiveFpcnW->CloseKey();
  delete RegLiveFpcnW;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormShow(TObject *Sender)
{
CSpinEdit2->Items->Add("YYYY-MM-DD");
CSpinEdit2->Items->Add("YYYY/MM/DD");
CSpinEdit2->Items->Add("MM-DD-YYYY");
CSpinEdit2->Items->Add("MM/DD/YYYY");
CSpinEdit2->Items->Add("MM-DD-YY");
CSpinEdit2->Items->Add("MM/DD/YY");
CSpinEdit2->Items->Add("DD-MM-YYYY");
CSpinEdit2->Items->Add("DD/MM/YYYY");
CSpinEdit2->Items->Add("DD-MM-YY");
CSpinEdit2->Items->Add("DD/MM/YY");
Label3->Caption="本程序是针对Oracle日期格式更改而设计的,/n设计环境:Windows98/Oracle7 /n适用于客户端和单机版用户。建立或修改注册表键值:";
}
//---------------------------------------------------------------------------

本文作者:胡广涛

电子邮箱/MSN: huguangtao0515@hotmail.com
QQ: 621150

 

oracle查看当前日期显示格式

查看当前日期显示格式:SELECT * FROM
  • ludonqin
  • ludonqin
  • 2014年08月30日 11:30
  • 1607

oracle中修改日期的显示格式

我的现在的日期格式是          ,要改成英文的需要输入一下命令:   ALTER SESSION SET NLS_DATE_LANGUAGE=AMERICAN; 修改后变为: ...
  • xiaotengyi2012
  • xiaotengyi2012
  • 2012年08月07日 20:34
  • 2066

BCB日期处理

 日期类型:TDateTime字符串到日期类型的转换:StrToDate两个全局变量:    ShortDateFormat   =   "yyyymmdd";    DateSeparator   ...
  • duwolf1980
  • duwolf1980
  • 2008年09月28日 08:52
  • 1292

确保一个程序只运行一个实例(BCB,Delphi)

一、通过创建互斥量来判断:  BCB 代码:  //--------------------------------------------------------------------------...
  • favory
  • favory
  • 2008年10月05日 22:52
  • 2704

bcb 计算时间,日期型函数

 //---------------------------------------------------------------------------// 使用说明://      String...
  • xshhui
  • xshhui
  • 2007年01月11日 17:18
  • 4659

oracle 季度起始日期

--本年第一季度起始日期 SELECT TRUNC((DATE '2018-1-1'), 'yy') FROM dual --本年第一季度截止日期 SELECT ADD_MONTHS(TRUNC...
  • flqchl
  • flqchl
  • 2018年01月23日 15:47
  • 16

C语言程序设计-现代方法----示例及练习题----第三章--格式化输入输出

作者: selfimpr博客: http://blog.csdn.net/lgg201邮箱: lgg860911@yahoo.com.cnC语言程序设计----示例及练习题----第二章--格式化输入...
  • lgg201
  • lgg201
  • 2009年12月16日 02:02
  • 6417

Oracle日期显示格式

SQL> alter session set NLS_DATE_FORMAT='DD-MON-YY'; SQL> select * from test_1; DW_DATA ------------...
  • zhaoyangjian724
  • zhaoyangjian724
  • 2014年09月12日 13:38
  • 418

Oracle SQL日期比较和常用日期函数

一、oracle sql日期比较 在今天之前:select * from up_date where update  to_date('2007-09-07 00:00:00','yyyy-mm-...
  • c657826604
  • c657826604
  • 2016年04月22日 09:21
  • 6342

Oracle 查询优化改写

第一章 单表查询 第二章 给查询结果排序 第三章 使用数字 第一章 单表查询1、将空值转换为实际值 SELECT coalesce(comm,0) FROM emp;说明coalesce与nvl...
  • fengzhuocindy
  • fengzhuocindy
  • 2016年09月17日 11:49
  • 428
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:用BCB编写一个改写oracle日期显示格式的程序
举报原因:
原因补充:

(最多只允许输入30个字)