строка слишком коротка...

[nevru1bphp]

Есть S:string; и в неё надо запихнуть строку длиной промерно 800 символов) Вот такой вот г.... Help

[ZaRDaK]

procedure TForm1.FormCreate(Sender: TObject);
Var S: String;
begin
S := StringOfChar('-', 800);
end;

Пихай хоть 1000.

[nevru1bphp]

Сообщение от ZaRDaK

procedure TForm1.FormCreate(Sender: TObject);
Var S: String;
begin
S := StringOfChar('-', 800);
end;

Пихай хоть 1000.

Спасибо огромное, очень помог!

[nevru1bphp]

а как дальше использовать, S := StringOfChar('-', 800);
куда писать строку.(

[ZaRDaK]

Это просто пример, что в String можно помещать 800 символов.
Не задумывайся о кол-ве символов, и делай как делал.