initializing char array with space(#32) not null(#0)

Question

i use delphi 2010. i need to fill the char array with spaces not nulls. i used following code which doesn't work.

procedure TForm1.FormCreate(Sender: TObject);
var
  aCharArray: array[0..9] of Char;
begin
  FillChar(aCharArray, sizeof(aCharArray), #32); // doesn't work
  FillChar(aCharArray, sizeof(aCharArray), ' '); // doesn't work

  Caption := aCharArray;
end;

the caption is printed with strange crosses. in an array of ansichar it works well.

please let me know the reason and the solution.

thanks.

David Heffernan · Accepted Answer · 2014-06-28 15:52:05Z

10

FillChar is mis-named in Unicode Delphi. It should really be named FillAnsiChar. So you are filling the string with UTF-16 characters having ordinal value $2020, aka U+2020 (DAGGER), †.

Instead you should use StringOfChar:

Caption := StringOfChar(' ', 10);

edited Jun 28, 2014 at 15:52

answered Jun 28, 2014 at 12:22

David Heffernan

616k46 gold badges1.1k silver badges1.5k bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

initializing char array with space(#32) not null(#0)

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related