T tunick Unregistered / Unconfirmed GUEST, unregistred user! 2000-10-23 #1 我不想通过控件来获取， 只指定一个文件名，就能将该文件中的数据（大约8个字节的整数型）赋值给变量。。 直接读出来就可以了吗。。。
W wjiachun Unregistered / Unconfirmed GUEST, unregistred user! 2000-10-23 #2 可以啊，嘿嘿，你的文件是TXT就最简单了，这8个字节的东西要数据库干嘛？
T tunick Unregistered / Unconfirmed GUEST, unregistred user! 2000-10-23 #4 还有个问题，我怎么能对一个string类型的变量进行诸如取反之类的操作呢。。 50分算到这个问题上，呵呵。。鞠躬。。。
W wjiachun Unregistered / Unconfirmed GUEST, unregistred user! 2000-10-23 #5 string可以看成是char的数组，你可以分别对string的每一位取反。
T tunick Unregistered / Unconfirmed GUEST, unregistred user! 2000-10-23 #6 不太明白，能详细点吗，先要将string拆成一个char数组？
R redstone Unregistered / Unconfirmed GUEST, unregistred user! 2000-10-23 #7 先用c_str()转换为char * ,然后。。。
W wjiachun Unregistered / Unconfirmed GUEST, unregistred user! 2000-10-23 #8 将string拆成一个char数组？ s:string; s[1],s[2] 分别就是s的第一第二位了。
Z zhangkan Unregistered / Unconfirmed GUEST, unregistred user! 2000-10-23 #12 var i,j,Numarray:integer Str:string; begin Str:=''; i:=Length(string); SetLength(NumArray,i); end; //不就知道有几次啦﹐不過用這方法太麻煩了。 var i,j,Numarray:integer Str:string; begin str:=''; Len:=Length(string); for i:=Len to 1 do str:=str+copy(string,len,1); end;
var i,j,Numarray:integer Str:string; begin Str:=''; i:=Length(string); SetLength(NumArray,i); end; //不就知道有几次啦﹐不過用這方法太麻煩了。 var i,j,Numarray:integer Str:string; begin str:=''; Len:=Length(string); for i:=Len to 1 do str:=str+copy(string,len,1); end;
