文件内容如下:

C DXDY.INP FILE, IN FREE FORMAT ACROSS COLUMNS for  83658 Active Cells
C 2013-5-25   上午 10:43:53
C                                           BOTTOM                 Veg
C  I    J        DX        DY      DEPTH     ELEV     ZROUGH      TYPE
    3  143     221.500   187.900     0.090    22.000    0.0200
    3  144     222.000   188.100     0.090    22.000    0.0200
    3  145     222.200   188.100     0.090    22.000    0.0200
    4  143     223.100   187.900     0.090    22.000    0.0200
    4  144     223.300   187.900     0.090    22.000    0.0200
    4  145     223.500   187.800     0.090    22.000    0.0200
    5  142     222.400   187.900     0.090    22.000    0.0200
    5  143     222.500   187.900     0.090    22.000    0.0200
    5  144     222.700   187.800     0.090    22.000    0.0200
    6  140     222.300   188.600     0.090    21.154    0.0200
    6  141     222.500   188.700     0.090    22.000    0.0200
    6  142     222.800   187.900     0.090    22.000    0.0200
    6  143     222.900   187.800     0.090    22.000    0.0200

...........

文件共83650行,采用以下方式读取,并将读取的每行头两个变量显示在CheckListBox中:

//---------------------------------------------------------------------------

#include <vcl.h>
#include <fstream.h>
#include <string.h>
#pragma hdrstop #include "readlxly.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
this->OpenDialog1->FileName ="*.inp";
this->OpenDialog1->Title="打开lxly.inp文件";
if(this->OpenDialog1->Execute())
{
string str,str1,str2,str3,str4,str5,str6,str7;
ifstream inf(this->OpenDialog1->FileName.c_str());
for(int i=;i<=;i++)
{
getline(inf,str);
this->CheckListBox1->Items->Add(str.c_str());
}
this->ProgressBar1->Min =;
this->ProgressBar1->Max =;
int k=;
TStringList *ttt=NULL;
ttt=new TStringList(); while(!inf.eof())
{
inf>>str1>>str2>>str3>>str4>>str5>>str6>>str7;
ttt->Add((str1+" "+str2).c_str());
k++;
this->ProgressBar1->Position=k;
}
this->CheckListBox1->Items =ttt;
inf.close();
}
}
//---------------------------------------------------------------------------

用c++builder读取一个一行有多行变量的文件的更多相关文章

  1. PureBasic 打开一个一行有多个数据的文件并读取其中某个数据

    如果有一个文件如下: TITLE = "Water Wurface Elevation"VARIABLES = "X", "Y", &quo ...

  2. python 读取一个目录下的所有目录和文件

    #!/usr/bin/python # -*- coding:utf8 -*- import os allFileNum = 0 def printPath(level, path): global ...

  3. SQL: 从一个表随机读取一行或几行记录的问题

    比如ms sql 2000,随机读取了一行记录: SELECT TOP 1 * FROM [tablename] ORDER BY NEWID() 遇到的问题是,如果这个表记录不多,比如几十或几百.几 ...

  4. Java笔记之Scanner先读取一个数字,在读取一行字符串方法分析

    问题:大家在学习Java读取数据的时候一般都是使用Scanner方法读取数据,但是其中有一个小问题大家可能不知道, 就是我们在使用scanner的时候如果你先读取一个数字,在读取一行带有空格的字符串, ...

  5. python读取一个文件的每一行判断是否为素数,并把结果写到另一个文件中

    刚刚学习python的菜鸟,这道题包括:文件的读写,python的参数调用,异常的使用,函数的使用 创建一个文本文件inti_prime.txt 执行命令:python Prime.py init_p ...

  6. PHP文件操作 之读取一个文件(以二进制只读的方式打开)

    最近应用了文件的读取,顺便复习一下! //读取一个文件 $f = fopen($filename,'rb'); $f: 表示返回的一个资源句柄 $filename:要打开的文件路径 rb:参数,表示只 ...

  7. python计算文件的行数和读取某一行内容的实现方法

    一.计算文件的行数 最简单的办法是把文件读入一个大的列表中,然后统计列表的长度.如果文件的路径是以参数的形式filepath传递的,那么只用一行代码就可以完成我们的需求了:count = len(op ...

  8. 根据NPOI 读取一个excel 文件的多个Sheet

    大家都知道NPOI组件可以再你本地没有安装office的情况下来 读取,创建excel文件.但是大家一般都是只默认读取一个excel文件的第一个sheet.那么如果要读取一个excel 的所有shee ...

  9. Shell脚本:while read line无法读取最后一行的问题

    [1]Shell脚本:while read line无法读取最后一行的问题 刚刚利用shell脚本处理日志文件时,发现了一个问题:while read line无法读取到最后一行 通过编辑器可以看到待 ...

随机推荐

  1. Android APK反编译详解(附图)(转)

    这段时间在学Android应用开发,在想既然是用Java开发的应该很好反编译从而得到源代码吧,google了一下,确实很简单,以下是我的实践过程. 在此郑重声明,贴出来的目的不是为了去破解人家的软件, ...

  2. Row_Number() OVER 的用法

    Row_Number() OVER 的用法: 为每一条分组记录返回一个数字. 参考博友 , 博友二

  3. 电赛总结(二)——AD芯片总结之AD7715

    一.特性参数 1.16位无失真AD转换器 2.增益可调,在1,2,32,128可切换. 3.数字地和模拟地分开,可以减少噪声. 4.具有较大的输出电流,有比较好的带载能力. 二.管脚排列 三.引脚功能 ...

  4. sql2005-数据库备份方案 (转载)

    sql2005数据库备份一般情况分为二种:一是手工备份.二是自动备份.以下是二种方法的步骤: 一.手工备份 打开数据库,选择要备份数据库,右键选择[任务]->[备份],打开备份数据库页面,在[源 ...

  5. listview分页

    listview.setOnScrollListener(new AbsListView.OnScrollListener() { @Override public void onScrollStat ...

  6. Swift语言中为外部参数设置默认值可变参数常量参数变量参数输入输出参数

    Swift语言中为外部参数设置默认值可变参数常量参数变量参数输入输出参数 7.4.4  为外部参数设置默认值 开发者也可以对外部参数设置默认值.这时,调用的时候,也可以省略参数传递本文选自Swift1 ...

  7. Swift 1.1语言函数参数的特殊情况本地参数名外部参数名

    Swift 1.1语言函数参数的特殊情况本地参数名外部参数名 7.4  函数参数的特殊情况 声明定义有参函数时,为函数的每一个参数都定义了参数名称.根据参数名定义的形式不同,函数参数包括本地参数和外部 ...

  8. ural 1272. Non-Yekaterinburg Subway

    1272. Non-Yekaterinburg Subway Time limit: 1.0 secondMemory limit: 64 MB A little town started to co ...

  9. BZOJ4399 : 魔法少女LJJ

    将所有权值离散化,建立权值线段树,维护区间内数字个数以及对数的和,用于比较乘积大小. 对于每个连通块维护一棵权值线段树,合并时用线段树合并. 对于操作3和4,暴力删除所有不合法节点,然后一并修改后插入 ...

  10. BZOJ4345 : [POI2016]Korale

    只考虑第一问,将珠子按照价值从小到大排序,设排序后第$i$小的为$b[i]$,定义二元组$(x,y)$表示当前珠子的总价值为$x$,用的价值最大的珠子为$y$,用一个小根堆来维护所有状态.一开始往堆中 ...