如何获取Delphi源代码中的字符串(100分)

J

jwd01

Unregistered / Unconfirmed
GUEST, unregistred user!
如何获取Delphi源代码中的字符串
例如
ErrorString = 'It''s Good Day!';
要考虑到字符串中是否包含引号
或者
ErrorString = 'It''s Good Day!'#10#13'My name is ''%s''';
如何获取引号中的字符串?也就是It's Good Day!和My name is '%s'
 
F

findwo

Unregistered / Unconfirmed
GUEST, unregistred user!
1. edit1.text:= ErrorString;
 
J

jwd01

Unregistered / Unconfirmed
GUEST, unregistred user!
楼上的回答有误解,ErrorString不是一个变量,而是源代码中的一行
如果是这种形式的,怎么办
resourcestring
ErrorString = 'It''s Good Day!'
+#10#13
+'My name is ''%s''';
注意:是分成多行的
 

普行

Unregistered / Unconfirmed
GUEST, unregistred user!
刚才看错了
应该是分析引号的配对关系和+号吧
 

普行

Unregistered / Unconfirmed
GUEST, unregistred user!
ErrorString = 'It''s Good Day!'
^ ^^ ^
等号后第一个(’)一定是字符串开头起引用作用,第二三个(’)如果不连续的话,第二个引号一定是结束引用的(’),现在连续就要分析连续的有几个,如果偶数个则每两个对应一个字符串中的(‘),如果是奇数个则最后一个必须是结束引用的(’),其余在分析后续的(+),类推。
+#10#13
^
+'My name is ''%s''';
^^ ^^ ^^^
 

Similar threads

Top Bottom