View Issue Details

IDProjectCategoryView StatusLast Update
0005968JEDI VCL00 JVCL Componentspublic2012-09-10 14:15
ReporterDeathMADAssigned ToAHUser 
PrioritynormalSeveritytrivialReproducibilityalways
Status resolvedResolutionfixed 
Product VersionDaily / GIT 
Target VersionFixed in Version3.46 
Summary0005968: Error in TJvEditorStrings.InsertText Unicode related
DescriptionAdding garbage symbols in this code

  // line is too small -> expand it with spaces
  Len := Length(BegLine);
  if Len < X then
  begin
   SetLength(BegLine, X - 1);
   FillChar(BegLine[Len + 1], X - Len - 1, ' ');
 end;

In Unicode Delphi FillChar is not correct, because addressed bytes not chars.
Additional InformationSolution.

Replace code with this.

 Len := Length(BegLine);
  if Len < X then
    BegLine := StringOfChar(' ', X -1);
TagsNo tags attached.

Activities

AHUser

2012-08-28 21:30

developer   ~0020132

Fixed in svn revision 13407.

Issue History

Date Modified Username Field Change
2012-08-28 12:32 DeathMAD New Issue
2012-08-28 21:30 AHUser Note Added: 0020132
2012-08-28 21:30 AHUser Status new => resolved
2012-08-28 21:30 AHUser Fixed in Version => Daily / SVN
2012-08-28 21:30 AHUser Resolution open => fixed
2012-08-28 21:30 AHUser Assigned To => AHUser
2012-09-10 14:15 obones Fixed in Version Daily / SVN => 3.46