ideintf: added resourcestring

git-svn-id: trunk@24676 -
This commit is contained in:
mattias 2010-04-17 16:36:48 +00:00
parent 4ff2445166
commit 0c694a019d
2 changed files with 2 additions and 1 deletions

View File

@ -382,6 +382,7 @@ resourcestring
fesFlTitle = 'FieldDefs';
fesNoFieldsNote = 'Field''s list is not available, can''t check for duplicates';
oisIncompatibleIdentifier = 'Incompatible Identifier';
oisIsNotAValidMethodName = '%s%s%s is not a valid method name.';
oisTheIdentifierIsNotAMethodPressCancelToUndoPressIgn = 'The identifier %s%'
+'s%s is not a method.%sPress Cancel to undo,%spress Ignore to force it.';
oisIncompatibleMethod = 'Incompatible Method';

View File

@ -3962,7 +3962,7 @@ begin
if (not IsNil) and (not IsValidIdent(NewValue))
then begin
MessageDlg(oisIncompatibleIdentifier,
'"'+NewValue+'" is not a valid method name.', mtError,
Format(oisIsNotAValidMethodName,['"',NewValue,'"']), mtError,
[mbCancel, mbIgnore], 0);
exit;
end;