怎样进行字符串组与字符串的对比？ ( 积分: 100 )

D

dhooooo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-30

• #1

我要对比的字符串是多行的，举个例子，就象下面这样的进行逐行对比
（123456789 （8654546123456789
123478935 8965475212345685
652489654 8516652355552245
985455645） 2545566566545456）
第一个字符串组是在checklistbox中显示的，第二个字符串是一行一行读进来，不是一下全读进来，比较完一行第一个字符串组自动换行。
而且第一个字符串是要和第二个字符串的第7位处开始往后对比，一致的就在第一个字符串前面打勾，不一致的就返回到nResult数组中，并且双击checklistbox中的不一致字符串，可以将两个对比的字符串显示出来，希望能指教！
最好能详细一点，我的水平不高，谢谢！真的很急！

 

D

dhooooo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-30

• #2

我要对比的字符串是多行的，举个例子，就象下面这样的进行逐行对比
（123456789 （8654546123456789
123478935 8965475212345685
652489654 8516652355552245
985455645） 2545566566545456）
第一个字符串组是在checklistbox中显示的，第二个字符串是一行一行读进来，不是一下全读进来，比较完一行第一个字符串组自动换行。
而且第一个字符串是要和第二个字符串的第7位处开始往后对比，一致的就在第一个字符串前面打勾，不一致的就返回到nResult数组中，并且双击checklistbox中的不一致字符串，可以将两个对比的字符串显示出来，希望能指教！
最好能详细一点，我的水平不高，谢谢！真的很急！

 

N

newsmile

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-31

• #3

看不大懂！依你的示例，第一个串组，第二个串组是否就是第一列和第二列？那个括号要不要的？现在的第一行数据是否算一致？如有空请把问题描述清楚。

 

D

dhooooo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-02

• #4

就是（123456789
123478935
652489654
985455645） 这些是第一个字符串组的内容并不是只有4行，只是举个例子；第二个不是字符串组，是字符串，一次只读进来一行和第一个字符串比较；现在的第一行是一致的。

 

爱

爱不到要偷

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-08

• #5

b : boolean;
b := sFirstArray[0]=RightStr(sSecondArray,Length(S)-7);//uses
System

 

S

supperyxd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-08

• #6

for i:=1 to checklistbox.recordcount do
begin //
for j:=1 to lines do //lines 你 右边 列 的 行数
begin
line:=右边 第 j 行 的 字符串
判断checklistbox第i行是否和 copy(line,7,10)相等
。。。
end;
end;

 

D

dhooooo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-10

• #7

其实右边的字符串只是我举的例子，就像是读卡机一样，读进来一张卡的信息到内存中与第一个字符串组的第一行比较，卡的信息是一个字符串叫SRe，比较完成后清空了内存；然后读下一张卡，与第一个字符串的下一行比较，
我的想法是定义两个字符串变量S1、S2。将第一个字符串组的字符串逐行赋值给S1，将SRe赋值给S2，然后进行字符串的比较。
然后将比较结果不同的字符串返回，比较相同的就在CheckListBox中打勾。
可以实现么，请帮忙？