lcl: return Name as default dock caption instead of ''

git-svn-id: trunk@19882 -
This commit is contained in:
paul 2009-05-09 13:56:01 +00:00
parent f85c9ce4c8
commit 04d24c72c4

View File

@ -2997,7 +2997,7 @@ end;
function TControl.GetDefaultDockCaption: String;
begin
Result := '';
Result := Name;
end;
{------------------------------------------------------------------------------