‹‹ 上一主題 | 下一主題 ››
發新話題
打印

將 csv 加上 ""

segaa

管理員

Rank: 9Rank: 9Rank: 9
1# 大 中 小 發表於 2008-3-23 07:05 PM  只看該作者

將 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;
程式不是很漂亮
9 o- M# r( w* g: U5 \大概是這樣嚕  , 其實如果不需要回寫的話
( F( n$ g3 l3 C1 w4 {直接拿拆解出來的值來塞到 stringgrid 就可以用了

TOP

xming777

新手上路

Rank: 1
2# 大 中 小 發表於 2009-9-6 03:52 AM  只看該作者

漫山都是绿树

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

TOP

e23232w

新手上路

Rank: 1
3# 大 中 小 發表於 2009-9-9 04:59 PM  只看該作者

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

大连科信机械厂0411-84820855专业提供小型机械致富机械无需加盟同样效果网址www.kexin118.com; 电子手摇配钥匙机,验钞式点钞机,补鞋机手机加香机,长效香料,衣物加香机,美甲机,烤鸟蛋机,食品搅拌机,冷面板面机,压面机,肉丸机,班戟炉投币感应擦鞋机 封口机,豆浆机,蛋卷机,脆皮机,蛋塔机,刨冰机,爆米花机系列,棉花糖爆米花组合机,多功能饺子机,章鱼小丸子机,烤肠机,电扒炉,韩国铁板烧, 炒货机 ,珍珠奶茶封杯机及原料,固体酒精封杯机设备,电子手摇配钥匙机 ,关东煮机,豆芽机,多功能膨化机,饲料膨化机,无烟烧烤炉,中东烤肉炉制冰机,香酥棒机,旋转式啤酒烤鸭炉,各种红外线烧烤机,电炸炉,蛋糕机,多功能切菜机 多功能粉碎机,, 汉堡包机,贝壳酥机,鱼丸机,包饺子机,梅花糕机,豆浆机,浆渣分离机,煎饼机,膨化机,等系列网址www.kexin118.com批 发零 售量大优惠.电话:0411-84820855,84792022,86949198,FAX:0411-84820855
+ [) y. ?+ C/ `* i, j- Z0 E( iQQ:99792190 44984055. 1 ]+ a) h3 E- ]% B
薯条工作站,肯德基麦当劳专用机精品推荐) \! Z* F' p& \8 q, y  V! q/ v
0 a8 S3 i: U. D, {
商品简介：台式薯条工作站 型号:ST-01 保温：红外线保温 型号：KX-JG-1 规格：800x710x650mm 电压：220V 功率：0.6KW 价格：1550元 &nbs
% e8 U" n: H  X7 ] 商品参数
0 H8 i. F6 c7 O9 |: C4 j& I9 B
  • 商品名称：薯条工作站,肯德基麦当劳专用机
  • 商品关键字： 薯条工作站, 肯德基麦当劳专用机
  • 商品品牌：大连科信
  • 商品型号：商用
  • 商品等级：精品
  • 市场价格：￥1550元
  • 剩余数量：203台
  • 关 注 度： 31233
7 G+ k  ^6 _0 t2 I1 @) I
详细说明
, n9 ~3 H: t% O/ A  F) E1 Y$ @/ s9 w0 J+ u: G9 D2 S' R/ K/ u! O  n

1 n0 W( n; A; P

5 p+ }# ~, R' c6 @* v" r7 F9 m

               

                  

台式薯条工作站

# M- @; {# q5 b

型号:ST-01

# p6 z; r& P9 m+ R- Q9 F; f: ~

保温：红外线保温

6 Q. l4 r4 A2 S

型号：KX-JG-1


  B1 I' e: w+ n  c9 a( J  f7 g) R  [

规格：800x710x650mm

' `# x7 T+ M( u( m' e

电压：220V


$ o! _% `; L' n% e

功率：0.6KW


8 W8 @- r9 m/ R' m. Z. k4 _* }. I

价格：1550元            

6 n; \  u% F( ?6 X  ]/ |

) ^1 d: Q; `1 w, F

                  
/ S& K2 v' c8 M! p# o

立式薯条工作站

5 J5 g& y1 P# K% e* j* O# z* K2 l

型号: ST-02


- R8 p; D. P: B" X

保温：红外线保温

6 v9 x) q; o/ w) h

型号：KX-JG-2

2 u: K" ?* w3 ?4 ]

规格：1000x700x1570mm


: @) n* y" n  N/ ^0 t

电压：220V


: j' K- C/ U0 d8 x. I; B

功率：0.75KW


$ G& {' D: c. ^; L

价格：3980元           


! E6 J. e3 l- t/ R9 l- |1 p


  I- o3 t  I1 c% G% o; P; W0 [

TOP

青松智慧

新手上路

Rank: 1
4# 大 中 小 發表於 2009-9-25 05:32 AM  只看該作者

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

近来,开学学校周边的房东都在改造自已房子,把大房间改成几个房间.这是为什么呢.大家仔细想一下.为了大家的安全.大家要多想!!!!5 e5 R" v& p) k6 [$ `' u

4 F" P/ j& r2 a2 x; v, B% w0 n, B1 Y+ a+ n" K* Q
www.okdhc.cn* Z4 h+ ~; w& e4 g1 {

4 {! {3 S, b- Q& Q+ Y/ l0 A$ U# P' @' R# d
4 i/ e/ h" a" j3 C& G5 k" ^" m

3 O! X* A, U7 @, P: M" w' w7 [$ Q. A2 p( N/ x, k

2 ]. a) P4 r6 M0 r, G1 X: l. M, S; x: y% T4 j% {: J8 B8 d% _1 M

. K& B' m& O7 L4 ]/ q$ {2 K; O1 s6 ?* b5 [
魔兽世界插件  热血江湖外挂   传奇外传外挂
9 L3 n: k2 \/ f5 D) B$ o# i& |" d" K( c冒险岛外挂    DNF外挂

TOP

g1tv8g

新手上路

Rank: 1
5# 大 中 小 發表於 2009-10-13 07:45 AM  只看該作者

剑侠世界外挂2

剑侠世界外挂+ v1 e- Q( f/ B0 R: u5 T5 H

3 y( [7 F. h& h* p6 R游戏一起玩-剑侠世界交易平台,是目前国内最大的剑侠世界交易平台,为您提供深圳、长沙、武汉等多个大城市最新2 Y+ {* w1 z# W2 G& t$ D5 H$ \

( x3 b& N( I2 C$ R5 h9 ]剑侠世界外挂,剑侠世界账号、金币、装备等交易信息，欢迎访问。   ]. u/ r3 M9 G+ k7 T

7 z- m8 E6 t& L' N) ]5 J剑侠世界免费外挂' x, S* F" Z# e! {: \8 c6 N

* m" b3 Y# p- L4 v, \为您提供最新剑侠世界信息以及最新外挂(剑侠世界外挂)下载 所有
. Q7 g( u$ c3 f  p' e! n) k, a: S4 I/ b8 g8 L  c9 y; t6 t* ~2 |% i
剑侠世界外挂全部为最新的免费外挂 请一定记住我们的网址- t3 \+ B% E& M7 Y1 ?
剑侠世界
( H9 |8 p, L8 p$ t: i7 K
, Q- o  f+ I# Q5 ywww.hyfittings.com.cn   www.hyfittings.com.cn
  X' e9 {; j7 ~1 |. ^0 N3 q" q
) Z6 \5 @' @4 [/ ?9 z: L# d" ?* X* d. K! {
+ ?  o, Q  j( ^: J. e; E$ N

TOP

xming777

新手上路

Rank: 1
6# 大 中 小 發表於 2009-10-17 04:14 AM  只看該作者

代言广告的影响

公司的QQ华夏外挂一个同事，非常漂亮。经过大家的讨论，得出结论，她和关之琳非常像。* ~) V; I. W2 I3 x4 @0 w2 M7 Q
3 \( c3 {, l' ^" ^1 T8 M' \$ i% |3 k
日子就这么一天天星尘传说外挂过下去。
2 X+ _" ^/ N* h; f& y4 n" Y
$ i( |5 A* e) b$ o6 `! a某一天，公司楼下电梯厅装了一个液晶电视，不断的播放广告，翻来覆去冒险岛外挂就是那几个。其中关之琳没隔2分钟出来说一次：感觉不舒服吗？请用永恒之塔外挂洁尔阴洗液。一分钟，轻松做女人。
8 [; l6 l( Y' e6 A我们一直觉得这个广告汗~~~~ 我们公司那小妹多纯洁一人啊。
6 R) u! V, |! R* V& ?终于此小妹在潜移默化中爆发了。今天早上，我，她，以及诛仙外挂另外两个同事一起上班等电梯。我因为吃东西不爽，皱着眉头。她关心的来了一句：感觉不舒服吗？

TOP

fack10

新手上路

Rank: 1
7# 大 中 小 發表於 2010-1-16 01:59 PM  只看該作者

支持！

支持！5 y. U% t6 t3 h
# |! n( ]8 u" X9 F1 I. D* ~* Y7 B

! O9 Z. p2 Z% l: J; g* i" F
# b, a/ f; s9 _$ v4 ~( N
3 e' G8 Z& K% H0 e, d3 E% u3 n) q" }* V2 k6 D; |- x6 t
6 Y7 ?6 ^: s6 x; P* P) p

" Z2 n4 I3 \+ I( P+ }$ v
# ~9 o' ]% }& j7 w: f, A/ ^) H7 U+ d

( S1 o5 O" f' I  H% \
  ~6 N9 e( {2 V: ^% |+ {* k  m0 z* ?8 y$ }

/ U# b. G$ K9 [+ x1 q# \# o1 LQ345b圆钢 Q345c圆钢 Q345d圆钢 45#无缝管 低温管

TOP

fack10

新手上路

Rank: 1
8# 大 中 小 發表於 2010-4-15 10:37 PM  只看該作者

支持！

支持！
3 J7 @1 h# w; A$ A( r, z2 v) a. y5 t
+ u: T2 H8 G% R6 A( x" `& S3 Q
0 u# G. a/ I  b
# P- m1 _9 Y) ^7 _' W$ y
! _  v" F( ^  Z3 |% Y
% x9 z0 I2 u/ n( j

4 |' l) E0 ?# @* `8 H. w1 }' Z. H1 P' _2 |+ [

/ a5 n3 _6 g) o4 l. Y0 G, x" i( c" v2 g! Y2 q
& }4 F, F  T. V

/ p% m: Y" ?5 Z& k0 F& h
9 N- k  n- \, G, W  o矩管 方矩管 无缝方管 无缝矩钢管 不锈钢方管

TOP

‹‹ 上一主題 | 下一主題 ››
發新話題