VBのString関数と同じ働きをするものです。 サンプルは'a'を20個Edit1->Textに埋め込みます。 Edit1->Text = AnsiString().StringOfChar('a',20); ShowMessage(IntToStr(Edit1->Text.Length()));