打印

將 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;
程式不是很漂亮
; V, x' x% L* U( s大概是這樣嚕  , 其實如果不需要回寫的話+ K' C, Z( q5 ^, ~0 {6 w
直接拿拆解出來的值來塞到 stringgrid 就可以用了

TOP

漫山都是绿树

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

TOP

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

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

7 y2 z; A8 H. ]  U2 ^+ {' @

, K$ X+ n( }8 r6 q

               

                  

台式薯条工作站

2 g- d' i3 Z+ K0 w' G4 J

型号:ST-01


8 d. e! ^7 q8 i5 {% f4 l9 r8 V

保温:红外线保温


( J1 V0 j  H, k: r

型号:KX-JG-1


+ W1 @" H, x! [$ R% N

规格:800x710x650mm

1 B+ j4 `- f* q1 m1 G

电压:220V


( B: U( L9 H- E! Q/ z5 l! o# w

功率:0.6KW

) \; v8 i: [9 o) n! ~) V

价格:1550元            

# l7 g; \8 P1 b/ x6 }


; a$ ^- Y. B4 D8 L7 `+ p

                  
/ t) S+ V" M; Z, S" `+ @: w

立式薯条工作站


2 b5 j6 T8 s3 @  d; e: O% e

型号: ST-02


/ I5 t6 H& c2 L1 Y. D" `4 B

保温:红外线保温


( R; H3 U9 K" B' t4 S

型号:KX-JG-2


* K- @1 o; ~; f) X. e

规格:1000x700x1570mm

, F/ ]9 J: E( l; A+ t# X

电压:220V


+ K" W( N+ Q" \" w/ H, u8 Q

功率:0.75KW


/ P) I, |3 C1 N0 g5 f2 b5 n

价格:3980元           


  B2 f2 m6 V4 U. y3 T( i


% J# S, M7 t0 U6 U) ~) t

TOP

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

近来,开学学校周边的房东都在改造自已房子,把大房间改成几个房间.这是为什么呢.大家仔细想一下.为了大家的安全.大家要多想!!!!5 c1 s: [2 x5 j" A
7 S5 t; d4 T" u! s) r
8 x0 M% _7 ?$ W9 H
www.okdhc.cn
& s9 Q7 ?# `6 Y1 |0 O: J4 M1 |) g8 A- C* I

% z1 r- b; g7 H2 l
6 {6 q3 t. J0 O( O7 P! F
; a$ ^( ^. c/ v9 t1 Y
/ m5 n; ^5 P7 a6 K2 x. w* J: E( G; x

6 R# O+ ~4 ^* F6 u
$ o0 s  l6 a7 r! q. O7 N4 }: d; X, j) h" |3 a$ d; b
魔兽世界插件  热血江湖外挂   传奇外传外挂
& b2 O8 n, t/ H: x冒险岛外挂    DNF外挂

TOP

剑侠世界外挂2

剑侠世界外挂0 ^4 a2 p* a- I1 A3 ~4 j2 z
; J4 X, D: ~  V
游戏一起玩-剑侠世界交易平台,是目前国内最大的剑侠世界交易平台,为您提供深圳、长沙、武汉等多个大城市最新
$ E, ^) `. w) m9 X
! _7 e9 x8 ^, X$ ~剑侠世界外挂,剑侠世界账号、金币、装备等交易信息,欢迎访问。
3 ^% g- g+ j( J$ I4 W  H) r
* i' I( m" i, u+ S3 d2 A
剑侠世界免费外挂9 v! B7 x" i* a2 T" O* L# K& K

4 R+ x1 L* I, U+ c1 M为您提供最新剑侠世界信息以及最新外挂(剑侠世界外挂)下载 所有
2 e- c6 m% O1 B5 _9 j6 [* K1 G: G( D. r% A! W7 J
剑侠世界外挂全部为最新的免费外挂 请一定记住我们的网址

5 g& r: {" p, `/ U剑侠世界& n! P# c+ `: v' o
' u' n' Z/ q3 O; L% W: E
www.hyfittings.com.cn   www.hyfittings.com.cn9 D; _" r0 o4 {  b
. H4 {6 D! O- x& [( i+ G

: o8 p9 o* n* _' X( C, F" \" n

TOP

代言广告的影响

公司的QQ华夏外挂一个同事,非常漂亮。经过大家的讨论,得出结论,她和关之琳非常像。, g- ]- E: T  J; d# Q# l: i8 S; x7 Y

5 F- _$ X8 L( ?* Q( e日子就这么一天天星尘传说外挂过下去。1 E& {3 g9 o6 ]+ d

7 i* m7 N7 \+ B$ J$ s某一天,公司楼下电梯厅装了一个液晶电视,不断的播放广告,翻来覆去冒险岛外挂就是那几个。其中关之琳没隔2分钟出来说一次:感觉不舒服吗?请用永恒之塔外挂洁尔阴洗液。一分钟,轻松做女人。
" c4 J9 a2 _- ?8 J" x# r& B我们一直觉得这个广告汗~~~~ 我们公司那小妹多纯洁一人啊。
$ h6 X5 r/ I+ F终于此小妹在潜移默化中爆发了。今天早上,我,她,以及诛仙外挂另外两个同事一起上班等电梯。我因为吃东西不爽,皱着眉头。她关心的来了一句:感觉不舒服吗?

TOP

支持!

支持!
) f2 o' n8 S: V' e
& Z' L+ q+ T6 d; U6 ?% X& h
" q' I" O# t6 `6 }3 Q
' G) K& e' y& D! k/ G7 A: K
3 A6 b7 [2 R) r- D; R6 I
& _3 k3 s( K6 w% _: V$ n$ v
+ h& `5 r5 u. B( f: P' z: ~; {) W1 O$ Z9 E
! U8 u+ ~8 f' f. R4 k) m! d

- h2 i" C- F/ z, o
  W3 U( P0 ~8 O  s9 d. R2 ?! v; f
$ v- _  w# O  Y, P3 v) D9 m9 [/ g0 @2 u, h3 l; b
# K: \4 R' q" {' k, V* C, y
Q345b圆钢 Q345c圆钢 Q345d圆钢 45#无缝管 低温管

TOP

支持!

支持!9 O/ p( Q  _+ V, x" ]0 w' j

/ v# R3 ~" Q0 D# r
- W/ j, t4 h, S8 Y/ k/ n* ?
. ]) z4 p1 z: w- `- s* H- h, D: g- V

! h4 d6 G4 D" g
5 F* m: l/ I) c( q; o+ e: u9 u+ x% R0 V) g

$ H3 H+ J/ }( b
$ a$ F* W- Y; e' B- @3 C% w/ g, i' i4 x6 b# V
) K& f7 E9 p& p4 J

2 a9 J5 b  z, A5 X) j9 P. ?+ ^, @8 Q- M
矩管 方矩管 无缝方管 无缝矩钢管 不锈钢方管

TOP

發新話題