POS函数使用问题？(50分)

vivid_bai · 2003-10-01

谁能详细说明一下POS函数使用的使用呀！ 主要是用在时间上！如果能说明详细再加100分 如：如何用POS函数进行4.5.78-4.5.60之类的计算 最好是带例子的见解！

vxhm · 2003-10-01

Pos函数是用来求子串在主字符串中的位置，不是用来计算的

桦树皮 · 2003-10-01

pos怎么是干这个用的呀，你还是看看帮助吧。不能用电脑去伐木啊。是吧，因为电脑是不能伐木的，想伐木要用锯或斧头。呵呵。多说了几句，不要见怪。

dx2527 · 2003-10-02

各位理解错他的意思了,他肯定是想将”.”号分隔的各个部分进行计算,用Pos函数来找到那个”.”号,不是用Pos来计算 function Pos(Substr: string; S: string): Integer; Pos('C','ABC')=3 Pos('D','ABC')=0

vivid_bai · 2003-10-02

TO dx2527 他说的没错！是我写的不清楚！^_^：） 大家说说吧！

oldsheep35 · 2003-10-02

首先将4.5.78转换成1978-4-5(根据POS('.','4.5.78')的两个位置来分割字符串)! 然后再相减

app2001 · 2003-10-04

pos('.','4.5.78')=2 pos('.','.5.78')=1 pos('.','5.78')=2l 因该是这样的

vivid_bai · 2003-10-07

提供个例子给大家，可能更明白！◎～ 例如：用POS函数计算时间注：我所说的时间只是涉及到（分.秒.毫秒） 思路是将”.”号分隔的各个部分进行计算 然后再进行＋－× ÷的时间相互计算 如：15.53.45÷15.40.15     15.53.45－15.40.15 大家教教我吧！嘻嘻～！◎

lichdr · 2003-10-07

pos找'.'，後用copy出來'.'前面的，依次找出各個部分 後 (a*60+b)*1000+c 得到這個時間的毫秒數。後就隨你運算了。

wfzha · 2003-10-10

把时间转换成datetime类型，计算完了，再转换成字符串不就行了。

lhc4000 · 2003-10-10

不想用POS的话，还可以这样实现： procedure TForm1.Button1Click(Sender: TObject); var   h1,m1,s1,ms1:word;   h2,m2,s2,ms2:word;   i:integer; begin   DecodeTime(strtotime('0:15:53.45'), H1, M1, S1, MS1);   DecodeTime(strtotime('0:15:40.15'), H2, M2, S2, MS2);   i:=((m1*60+s1)*1000+ms1)-((m2*60+s2)*1000+ms2); // 这是-的,其他的运算同理   ms2:= i mod 1000;   i:=trunc((i-ms2)/1000);   s2:=i mod 60;   i:=trunc((i-s2)/60);   m2:=i;   edit1.text:='0:'+inttostr(m2)+':'+inttostr(s2)+'.'+inttostr(ms2); end; ****** 计算的原理同上面lichdr提到的一样 *****

vivid_bai · 2003-10-12

我正在做一个关于涉及很多时间计算的软件，想找一找有没有最好的设计思路 有人说涉及到时间计算问题最好的方法是用POS 注：我涉及的时间计算问题只是涉及到（分.秒.毫秒） 提供个例子给大家，可能更明白！◎～ 例如：用POS函数计算时间注：我所说的时间只是涉及到（分.秒.毫秒） 思路是将”.”号分隔的各个部分进行计算 然后再进行＋－× ÷的时间相互计算 如：15.53.45÷15.40.15    15.53.45－15.40.15 大家教教我吧！嘻嘻～！◎   说说思路也行呀！！

gxlzx · 2003-10-13

分别取各部分，分别计算，最后再组合起来，一步一步来吧，虽然是笨办法，但速度不会有明显影响，可以专门做个函数。

sunnyahniu · 2003-10-14

Delphi里面有很多关于日期、时间计算的函数，如果真的不能到达目的，我想也不必用Pos函数来瞎折腾。以前我也对日期，时间计算要求有非常灵活的计算。我采用的方法是利用现有的函数分解各值（如，年……豪秒，等等），再进行计算。我已编译成*.dll文件调用即可，返回值达十几个，足够用，如果vivid_bai感兴趣，可向我索取原码。 不过，对Vivid_bai用Pos 来计算的思路感到新奇！

vivid_bai · 2003-10-14

to sunnyahniu 能不能讲详细点！谢谢了 我的信箱是：vivid_bai@sina.com 能不能给我来份你的源码？先谢谢了！1

伊天笑 · 2003-10-14

我也在想vivid_bai 为什么会相到用 pos 来处理时间呢？ 就像上面那位老兄所说的 delphi 中有很多算是时间的函数 ,pos 只不过是起一个定位的作用而已 !

lich · 2003-10-14

实现方便运算的话，当然是使用统一单位，使用数量计算， 可以将所有变量转化为整数，以毫秒为单位 定义几个函数 MyTimeToInt(const s: String): Integer; IntToMyTime(v: Integer): String; 这样，都转化为整数，运算多方便啊 至于这两个函数怎么写，应该容易的多，方法也很多啊 当然要效率高才好了

vivid_bai · 2003-10-15

大家教教我吧！嘻嘻～！◎   说说别的方法的思路也行呀！！谢谢了

dfw1001 · 2003-10-15

pos是用来查找字符串中的字符，返回找到的位置

lhc4000 · 2003-10-16

有点过份

POS函数使用问题？(50分)

vivid_bai

Unregistered / Unconfirmed

vxhm

Unregistered / Unconfirmed

桦树皮

Unregistered / Unconfirmed

dx2527

Unregistered / Unconfirmed

vivid_bai

Unregistered / Unconfirmed

oldsheep35

Unregistered / Unconfirmed

app2001

Unregistered / Unconfirmed

vivid_bai

Unregistered / Unconfirmed

lichdr

Unregistered / Unconfirmed

wfzha

Unregistered / Unconfirmed

lhc4000

Unregistered / Unconfirmed

vivid_bai

Unregistered / Unconfirmed

gxlzx

Unregistered / Unconfirmed

sunnyahniu

Unregistered / Unconfirmed

vivid_bai

Unregistered / Unconfirmed

伊天笑

Unregistered / Unconfirmed

lich

Unregistered / Unconfirmed

vivid_bai

Unregistered / Unconfirmed

dfw1001

Unregistered / Unconfirmed

lhc4000

Unregistered / Unconfirmed

Similar threads