Puma Wang 进来！！！！！！！(100分)

G

ggmmjj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #1

怎么给你分？？？

 

G

ggmmjj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #2

Puma Wang也真是的，也不进来报到一下，还好，我已经试验成功怎么给分了："）

 

G

ggmmjj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #3

快进来啦，不进来我怎么给你加分？？？

 

P

Puma Wang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #4

我来呀，别吓我，我有心脏病的。呵呵。

 

G

ggmmjj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #5

啊？我好心痛我的100分喔："）我还有一小事要请教您，你就帮人帮到底，送佛送到西吧！！
继续上一问题，还有一点点：如果在不知道某字段到底要分多少行打印的情况下，我该怎么写个循环来控制每行都取10个字符呢？？
我想了一下，用整除的方法，得到商就是要循环的次数，然后循环体？？关于字符的取值？？我不太会用COPY!!帮我解决这一问题，我把分全部给你了：（
拜托啦！！

 

P

Puma Wang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #6

这个简单 ：
Var
ss,s1 :Widestring ;
lows :integer ;
begin
ss :='abcd打击法离ef打击法离ghasdfasdfasdfijklmnossdsdsdsdsdasdpg开asdf家阿三点';
s1 :='' ;
lows :=0 ;
while length(ss)>10do
begin
s1 :=s1 + copy(ss,1,10) + #13 ;
ss :=copy(ss,11,length(ss)) ;
lows :=lows+1 ;
End ;
s1 :=s1 + trim(ss) ;
if trim(ss) <> '' then
lows :=lows+1 ;
showmessage(s1 + #13 +formatfloat('0',lows)) ;
End ;
就行了。

 

P

Puma Wang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #7

还有 有问题上来问就是，不需要老是给很多分的。那样一会就没有得玩了。呵呵。：－）

 

G

ggmmjj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #8

虽然showmessage显示的结果都是对的，可是到了打印预览里它还是完整的一行：（

 

G

ggmmjj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #9

我……我………我是一不小心给了你100的啦！……心痛啊……………我的分，分，分……
要是你觉得我给分多了让你觉得内疚的话，那你就免费帮我解答几个问题好了："）我也不会介意不给你de:")

 

P

Puma Wang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #10

呵呵，你要把 Value :=s1 ；的呀。
当然在那个 onPrint 事件里的了。
你真逗。哈哈。
回答问题？ 没有问题，只要我能搞定，好！以后你有问题，问就是。
不过我水平也有点菜，不过大家可以共同进步。。

 

G

ggmmjj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #11

好啊，好啊，爱S你了…

 

G

ggmmjj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #12

接受答案了.