打印

將 csv 加上 ""

將 csv 加上 ""

複製內容到剪貼板
代碼:
procedure TForm1.Button1Click(Sender: TObject);
VAR sFile:TextFile;
tmp,str:String;
ipos,x:integer;
begin
memo1.Clear ;
tmp := '';
str := '';
x := 0 ;
ipos := 1 ;
OpenDialog1.Execute;
if OpenDialog1.FileName <> '' then
begin
AssignFile(sFile, OpenDialog1.FileName);
Reset(sFile);
while not Eof(sFile) do
begin
str := '' ;
Readln(sFile, tmp) ;
ipos := 1 ;
while ( ipos > 0) do
begin
iPos := Pos(',',tmp); //傳回逗號(,)字串於str字串的開始位置
if iPos = 0 then
begin
str := str + '"' + copy (tmp ,1,length(tmp) )+'"';
break
end else begin
str := str + '"' + copy (tmp ,1,ipos-1 )+'",';
tmp := copy (tmp,ipos+1,length(tmp));
end;
end;
inc(x);
memo1.Lines.Add(str);
end ;
CloseFile(sFile);


end;
end;
程式不是很漂亮
- x* R( m" P, C2 q4 j- V$ I大概是這樣嚕  , 其實如果不需要回寫的話4 P7 g) Y$ Q& P. K
直接拿拆解出來的值來塞到 stringgrid 就可以用了

TOP

漫山都是绿树

 春天,家乡的小山上漫山都是绿树,别提有多美了!看:神鬼传奇柳树、杨树、松树、苹果树、梨树……,满眼的绿意。尤其是柳树,抽出嫩绿的新芽,长出了长长的大辫子。地下城与勇士一阵风吹来,长长的辫子摇来摇去,好象是让人欣赏她呢!小草从土里钻出来,毛茸茸的绿色,给小山穿上了美丽的裙子。我们躺在它身上,象躺在母亲的怀抱中,温暖惬意。
  {& m1 v6 I% e. Q  夏天,树木变得愈加茂盛成吉思汗满山绿树成荫。山上的小野花开了各式各样、芬芳扑鼻,给绿色的小山点缀上了缤纷的色彩。牛羊在山上悠闲地吃着草,吃饱了就卧在山坡上休息,给小山更增添了一丝光彩。
  H1 H9 k# \& Z" T  秋天,嫩绿的小草逐渐发黄了,华夏树木的颜色也慢慢地由绿变黄。但是,小山却也别有一番风景。看!山上的一树树灯笼,红彤彤的是苹果树上的累累果实,黄澄澄的是梨,压得枝条都弯了腰。摘下一只,吃到嘴里,真甜呀!乡亲们带着笑意,采摘着丰收的果实,心里别提有多高兴了!一筐筐,一篓篓的水果成吉思汗带着乡亲们的希望,运出山,走向各地。

TOP

薯条工作站,肯德基麦当劳专用机

大连科信机械厂0411-84820855专业提供小型机械致富机械无需加盟同样效果网址www.kexin118.com; 电子手摇配钥匙机,验钞式点钞机,补鞋机手机加香机,长效香料,衣物加香机,美甲机,烤鸟蛋机,食品搅拌机,冷面板面机,压面机,肉丸机,班戟炉投币感应擦鞋机 封口机,豆浆机,蛋卷机,脆皮机,蛋塔机,刨冰机,爆米花机系列,棉花糖爆米花组合机,多功能饺子机,章鱼小丸子机,烤肠机,电扒炉,韩国铁板烧, 炒货机 ,珍珠奶茶封杯机及原料,固体酒精封杯机设备,电子手摇配钥匙机 ,关东煮机,豆芽机,多功能膨化机,饲料膨化机,无烟烧烤炉,中东烤肉炉制冰机,香酥棒机,旋转式啤酒烤鸭炉,各种红外线烧烤机,电炸炉,蛋糕机,多功能切菜机 多功能粉碎机,, 汉堡包机,贝壳酥机,鱼丸机,包饺子机,梅花糕机,豆浆机,浆渣分离机,煎饼机,膨化机,等系列网址www.kexin118.com批 发零 售量大优惠.电话:0411-84820855,84792022,86949198,FAX:0411-84820855
# S/ R! \" C- w; A, bQQ:99792190 44984055.
- u3 S; y1 p" V1 r' d
薯条工作站,肯德基麦当劳专用机
精品推荐
1 F  K6 r4 O% M
& b* p; k% s( ]$ i# h: s商品简介:台式薯条工作站 型号:ST-01 保温:红外线保温 型号:KX-JG-1 规格:800x710x650mm 电压:220V 功率:0.6KW 价格:1550元 &nbs
  q( ^! N+ l3 R 商品参数- H3 [* ^% _6 x$ q  y1 h
  • 商品名称:薯条工作站,肯德基麦当劳专用机
  • 商品关键字: 薯条工作站, 肯德基麦当劳专用机
  • 商品品牌:大连科信
  • 商品型号:商用
  • 商品等级:精品
  • 市场价格:¥1550元
  • 剩余数量:203台
  • 关 注 度: 31233
" `9 v  M; E6 j2 W: g4 U) u
详细说明9 k  f* n0 e, G; e& O
; |/ v0 f6 z# d  Y6 e& U( o3 b: @

) D6 i5 |2 m4 h& |

  y7 l+ w5 N; P0 L) k! Q( t5 P, |

               

                  

台式薯条工作站


0 F. ^1 k* h5 G8 a- q

型号:ST-01


* q, s2 S6 l: X

保温:红外线保温

( F7 l) E1 X* ^  A. U

型号:KX-JG-1

" q7 M9 }; v/ E: M9 N! p' n6 S

规格:800x710x650mm


1 y/ K5 T" p) _1 M9 Y. n) z

电压:220V


! B+ T5 v( [6 p/ B2 _1 e$ D. M

功率:0.6KW

6 B4 ]* ^; c. p- J' A+ ?

价格:1550元            


: }& Z6 N, i6 `9 t& F/ x


" s0 O" z' f6 T* n: [

                  
7 O- w+ X3 h, @0 c% X% Z0 }

立式薯条工作站


2 `- r3 \: s; v/ z" L

型号: ST-02

; G7 ?' ^0 \6 w0 D! U1 W3 `

保温:红外线保温

, A  \2 j1 q. Z

型号:KX-JG-2


4 \# N/ G  [# k

规格:1000x700x1570mm

! w" Q& }/ A* p9 h- m: w9 D

电压:220V

- y1 i/ l/ Z) D0 ?. m, W

功率:0.75KW

# T8 \7 B* E5 m& x& Z% ^8 B

价格:3980元           


/ i; _: A0 X3 i5 `. g! k

5 ]% {; y- D  L* [5 V

TOP

开学了,学校周边的房价上涨,好多房屋忙着改造!

近来,开学学校周边的房东都在改造自已房子,把大房间改成几个房间.这是为什么呢.大家仔细想一下.为了大家的安全.大家要多想!!!!
2 b* J) \( ^; K( @0 W# W8 Q9 g, G% u
, p* l5 `' R# N. h
www.okdhc.cn$ `* }0 Y; I% f- [: j. n
6 u" r( F% r! Q' [

9 d# B4 A- R8 b7 d/ D! A# P/ @% {

0 ]9 `4 f/ Q& @  \5 i' J5 p) Z/ y  i  ^5 S

1 a! N. L) @8 W& l* [. s3 W
  a  r, O) Q. d: M6 n
1 ~& J( R9 w$ f8 N8 A7 W# W1 t) W* ?8 E
魔兽世界插件  热血江湖外挂   传奇外传外挂8 c4 t- j% ^- n
冒险岛外挂    DNF外挂

TOP

剑侠世界外挂2

剑侠世界外挂: S8 M! @5 `$ m
7 ]  U5 {% b4 p2 T. W
游戏一起玩-剑侠世界交易平台,是目前国内最大的剑侠世界交易平台,为您提供深圳、长沙、武汉等多个大城市最新. b0 q/ D9 u  R4 l
0 v3 F' a5 n0 L4 e
剑侠世界外挂,剑侠世界账号、金币、装备等交易信息,欢迎访问。
; J6 e9 ~5 r) @3 g2 P6 U6 x

( r4 Y& Q6 {3 f6 j剑侠世界免费外挂
# I+ d+ n# p( i
3 B- b/ H2 q& F" s为您提供最新剑侠世界信息以及最新外挂(剑侠世界外挂)下载 所有
$ R- }) C6 C$ B0 ?& `+ O8 G6 M
& Z0 J3 D. P& O/ o9 k5 Z' c4 [& b剑侠世界外挂全部为最新的免费外挂 请一定记住我们的网址
( |+ J9 W. Y/ L
剑侠世界. F. M4 ]4 o( z& r' ^% }) P; {

3 T- H2 c$ e( lwww.hyfittings.com.cn   www.hyfittings.com.cn+ m/ O- r, X6 L: [

# k" ?& @$ `1 a. s/ z6 E
- x4 ]* v0 F( F, P3 H; @+ @* o

; J" Q9 j/ I5 F$ ?0 [% s% x0 E

TOP

代言广告的影响

公司的QQ华夏外挂一个同事,非常漂亮。经过大家的讨论,得出结论,她和关之琳非常像。4 F  r8 |* p0 \  S& C/ q
( t" A0 F' `$ }# E* Y# {
日子就这么一天天星尘传说外挂过下去。
4 q: }: r, P$ Q+ q* \) ?9 k9 F$ M% l; n
某一天,公司楼下电梯厅装了一个液晶电视,不断的播放广告,翻来覆去冒险岛外挂就是那几个。其中关之琳没隔2分钟出来说一次:感觉不舒服吗?请用永恒之塔外挂洁尔阴洗液。一分钟,轻松做女人。
# O8 {% @5 f! s' I( \3 Z7 l; N我们一直觉得这个广告汗~~~~ 我们公司那小妹多纯洁一人啊。9 R& U' v6 U7 ?7 `/ b
终于此小妹在潜移默化中爆发了。今天早上,我,她,以及诛仙外挂另外两个同事一起上班等电梯。我因为吃东西不爽,皱着眉头。她关心的来了一句:感觉不舒服吗?

TOP

支持!

支持!$ @7 p3 E+ W; ?( @
* `# ~, I4 `6 d  |
6 p% Y) v% `+ }

4 p2 d7 p. q7 V+ {
0 i8 s: _/ M  |& \
. [% I1 M/ n' r" E3 }8 m, C
/ K9 ?% q7 w2 n* f  I5 x2 t8 r" \$ |
: u% z& U0 u3 r: n
; P1 k1 J$ c, V/ s
; s1 C0 c0 Y6 A" ~8 r3 S! V) O
3 W5 r- g9 v% ?- H' _( g3 v  j( ]) Z7 _, K8 A

* n, `* L6 C% Z. P% a
$ I" x3 R, ?" u( d$ L2 J$ B+ |Q345b圆钢 Q345c圆钢 Q345d圆钢 45#无缝管 低温管

TOP

支持!

支持!0 C+ ~6 q3 v; f0 l6 r

7 f. @. e8 l" T9 ]% ]+ J! f: [. X; s* Y0 i

, e  M8 S0 G$ {9 o% s% a3 ]" |- N( N2 w. O( h

$ b" R! K5 x) l+ j( J5 p- K1 b
. ^6 [  s7 q& E( }/ V! ]3 g4 H: {5 F  G5 P

# r- X* ~% t) W0 L) j$ p( x; e7 e
0 J% T5 x9 j; b- f. Y8 N7 N1 Y: ~: E6 {4 k- Y

8 O. m+ J3 U; K" Z& Z
7 V/ [( }" z1 p( Y
! Y, Q1 ?0 C) D- v8 [5 ^4 T, Y矩管 方矩管 无缝方管 无缝矩钢管 不锈钢方管

TOP

發新話題