Форум: "Основная";
Текущий архив: 2003.06.26;
Скачать: [xml.tar.bz2];

Вниз

FillChar и String   Найти похожие ветки 

← →
Vint45   (2003-06-10 14:07) [0]

Привет! Маленький вопросик. Можно ли функцией FillChar заполнить обычную строку типа String? Если да, то приведите пожалуйста пример вызова функции.

---

← →
panov   (2003-06-10 14:10) [1]


s: String;
begin
SetLength(s,10);
FillChar(s[1],10,Ord("a"));


---

← →
Palladin   (2003-06-10 14:11) [2]

SetLength(s,10);
FillChar(s[1],10,65);

---

← →
ladybird   (2003-06-10 14:13) [3]

procedure XXX;
var S : String;
begin
SetLength(S, 1000);
FillChar(S[1], 1000, "*");
end;
Хотя есть же

uses System;
function StringOfChar(Ch: Char; Count: Integer): string;

---

← →
Vint45   (2003-06-10 14:13) [4]

Спасибо всем, SetLength делал, а вот S[1] не знал что надо.

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.06.26;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.03 c