Firemonkey:设置 TLabel 文本导致字符串索引超出范围异常
Firemonkey: Setting TLabel Text causes String Index out of Range Exception
我有一个方法可以构建帮助消息,然后将 TLabel
的文本 属性 设置为该帮助消息。但是,每当我尝试设置标签的文本时,都会出现以下异常:
'String index out of range. (-1) Must be >=0 and <=42'
方法如下:
void __fastcall TPasswordChangeForm::BuildHelpMessage()
{
String HelpMsg = "";
if( NewPassEdit->Text.Length() < MinPasswordLength )
{
HelpMsg += "Password length too short.";
}
else
{
HelpMsg += "Password length OK.";
}
HelpMsg += "\n";
if( NewPassEdit->Text == ConfirmPassEdit->Text )
{
HelpMsg += "Passwords match.";
}
else
{
HelpMsg += "Passwords do not match.";
}
ShowMessage( HelpMsg ); //added for debugging, shows string as expected
HelpLabel->Text = HelpMsg; //exception thrown here
}
我添加了一个 ShowMessage
调用只是为了检查我的字符串的值。它显示得很好。我还可以将标签设置为任意值,例如:
HelpLabel->Text = "This message works!";
我在构建 HelpMsg
字符串时是否做错了什么?
编辑:注释掉将 \n 添加到字符串的行可以解决问题。同样,下面的代码会引发异常:
String test = "this is a test";
test += "\n";
test += "test 2";
HelpLabel->Text = test;
导致问题的 \n 是什么?如何正确添加新行?
目前正在更新到新的 C++ Builder,因此无法使用您的代码段。我有处理错误消息的方法,这些错误消息输出到日志选项卡而不是 ShowMessage,而不是使用字符串,尽管我使用 TStringList。例如:
void __fastcall TPasswordChangeForm::BuildHelpMessage()
{
TStringList HelpMsg = new TStringList(this);
if( NewPassEdit->Text.Length() < MinPasswordLength )
{
HelpMsg->Add("Password length too short.");
}
else
{
HelpMsg->Add("Password length OK.");
}
if( NewPassEdit->Text == ConfirmPassEdit->Text )
{
HelpMsg->Add("Passwords match.");
}
else
{
HelpMsg->Add("Passwords do not match."_;
}
ShowMessage(HelpMsg->Text); //added for debugging, shows string as expected
HelpLabel->Text = HelpMsg->Text; //exception thrown here
}
通过在访问文本时使用 TStringList 或 TStrings(父级)属性,输出对象中的字符串,每个字符串由回车符 return 和换行符分隔。
查看 TStringList Docs here - 希望对您有所帮助!
我有一个方法可以构建帮助消息,然后将 TLabel
的文本 属性 设置为该帮助消息。但是,每当我尝试设置标签的文本时,都会出现以下异常:
'String index out of range. (-1) Must be >=0 and <=42'
方法如下:
void __fastcall TPasswordChangeForm::BuildHelpMessage()
{
String HelpMsg = "";
if( NewPassEdit->Text.Length() < MinPasswordLength )
{
HelpMsg += "Password length too short.";
}
else
{
HelpMsg += "Password length OK.";
}
HelpMsg += "\n";
if( NewPassEdit->Text == ConfirmPassEdit->Text )
{
HelpMsg += "Passwords match.";
}
else
{
HelpMsg += "Passwords do not match.";
}
ShowMessage( HelpMsg ); //added for debugging, shows string as expected
HelpLabel->Text = HelpMsg; //exception thrown here
}
我添加了一个 ShowMessage
调用只是为了检查我的字符串的值。它显示得很好。我还可以将标签设置为任意值,例如:
HelpLabel->Text = "This message works!";
我在构建 HelpMsg
字符串时是否做错了什么?
编辑:注释掉将 \n 添加到字符串的行可以解决问题。同样,下面的代码会引发异常:
String test = "this is a test";
test += "\n";
test += "test 2";
HelpLabel->Text = test;
导致问题的 \n 是什么?如何正确添加新行?
目前正在更新到新的 C++ Builder,因此无法使用您的代码段。我有处理错误消息的方法,这些错误消息输出到日志选项卡而不是 ShowMessage,而不是使用字符串,尽管我使用 TStringList。例如:
void __fastcall TPasswordChangeForm::BuildHelpMessage()
{
TStringList HelpMsg = new TStringList(this);
if( NewPassEdit->Text.Length() < MinPasswordLength )
{
HelpMsg->Add("Password length too short.");
}
else
{
HelpMsg->Add("Password length OK.");
}
if( NewPassEdit->Text == ConfirmPassEdit->Text )
{
HelpMsg->Add("Passwords match.");
}
else
{
HelpMsg->Add("Passwords do not match."_;
}
ShowMessage(HelpMsg->Text); //added for debugging, shows string as expected
HelpLabel->Text = HelpMsg->Text; //exception thrown here
}
通过在访问文本时使用 TStringList 或 TStrings(父级)属性,输出对象中的字符串,每个字符串由回车符 return 和换行符分隔。
查看 TStringList Docs here - 希望对您有所帮助!