📄 wzjh28.htm
字号:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb_2312-80">
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<title>用DELPHI实现将纯文本资料转入数据库</title>
</head>
<body bgcolor="#FFFFFF">
<p align="left"><font color="#118811" size="4"><strong>用Delphi实现将纯文本资料转入数据库</strong></font>
<br>
<br>
<font color="#118811" size="3"><em>蔡旭</em></font> <br>
在我们日常工作中，常会碰到这样一个难题：一大堆<br>
收集好的纯文本格式，比较规整的资料怎样才能将它们分<br>
离，转到自己已经建好的数据库中进行管理呢？<br>
<br>
例如，有一段人事档案资料archive．txt，内容如下<br>
：<br>
<br>
小许男21工程师<br>
<br>
小吴女23助理工程师<br>
<br>
小蔡男22助理工程师<br>
<br>
小牟女22工程师<br>
<br>
要将它转入数据库archive．dbf中，archive．dbf结<br>
构如下：<br>
<br>
姓名，性别，年龄，职称<br>
<br>
怎么办呢？现在通过使用delphi编程，很好地解决了<br>
这个难题。Delphi提供了许多功能强大，丰富的字符处理<br>
函数和过程，常用的有：<br>
<br>
（1）functionLength（S：String）：Integer<br>
<br>
／／返回串的长度<br>
<br>
（2）functionCopy（S：String；Index，Count：In<br>
teger）：String<br>
<br>
／／给出一个字符串中串的拷贝<br>
<br>
（3）functionPos（Substr：String；S：String）<br>
；Integer<br>
<br>
／／查找子串在字符串中的位置<br>
<br>
（4）ProcedureDelete（VarS：String；Index，Cou<br>
nt：Inte⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -