можно ли в массив засунуть 3500 значений типа 'lol','moms'??

[maloy_ya]

доброго времени суток форумчане!!!такой вопрос при попытке всунуть в массив 3500 значений типа 'zef','xef','vits','bits','zech','x ech' я столкнулся с ошибкой One or more lines were too long and have been truncated. а делал вот так:

function genword : string;
const
  ish : array [0..3499] of string = (...........);
var
  i : integer;
begin
  result := '';
  for i := 1 to 10 do result := result + ish [random (3499)];

есть ли варианты всетаки это сделать??

[cosmic_call]

может ограничить размер строк если строки такие короткие?
string[5] например

[maloy_ya]

эээ....что вы имеете введу??я немного непойму??

[asmodey1]

Придется вам назначать значения (кошмар, какая тавтология получилась ) в самой процедуре :

ish[0]:=...; 
ish[1]:=...;
и так далее...

В конце концов, не все ли вам равно, где писать эти три с половиной тысячи значений ?
Хотя по уму следовало бы записать их в файл, а в программе просто считать из файла и присвоить...

[GunSmoker]

У компилятора есть ограничение на парсируемую длину строк.

Т.е.

'... здесь базилион символов ...'

надо переделать в

'... здесь ' +
'базилион ' +
'символов ...'

А

'здесь', 'базилион', 'символов'

переделать в

'здесь', 
'базилион', 
'символов'

[cosmic_call]

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

эээ....что вы имеете введу??я немного непойму??

вот так. ну ограничить максимальную длину строки. например 5 символов

  ish : array [0..3499] of string[5] = (...........);

ну тут уже объяснили конечно)

[GunSmoker]

>>> ну ограничить максимальную длину строки

Совершенно ни при чём.

[asmodey1]

Потому, что

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

У компилятора есть ограничение на парсируемую длину строк.

Только вот предложенные им варианты не "прокатят" - компилятор соберет всю строку полностью (от первого апострофа до завершающей точки с запятой) и снова "споткнется"...

[GunSmoker]

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

Только вот предложенные им варианты не "прокатят" - компилятор соберет всю строку полностью (от первого апострофа до завершающей точки с запятой) и снова "споткнется"...

Не ври. Прекрасно работает (выписанное в одну строку - нет):

const
  A = 'sdhjf ksdjhf kjhdsfk jdskfjh ksdjfkjsdfkjhsdfkj ksdjfkjsdf kjdsfkjesirfh'+
      'iuwgjersygtswe4 skseikuf234i8y5987235i hdskjf kjheskjf hsekjfjhksef kwf '+
      'hsekh kse kjsejkf hskjhfr 8934y oisefj khsdhjf ksdjhf kjhdsfk jdskfjh ks'+
      'djfkjsdfkjhsdfkj ksdjfkjsdf kjdsfkjesirfhiuwgjersygtswe4 skseikuf234i8y5'+
      '987235i hdskjf kjheskjf hsekjfjhksef kwf hsekh kse kjsejkf hskjhfr 8934y'+
      ' oisefj khsdhjf ksdjhf kjhdsfk jdskfjh ksdjfkjsdfkjhsdfkj ksdjfkjsdf kjd'+
      'sfkjesirfhiuwgjersygtswe4 skseikuf234i8y5987235i hdskjf kjheskjf hsekjfj'+
      'hksef kwf hsekh kse kjsejkf hskjhfr 8934y oisefj khsdhjf ksdjhf kjhdsfk '+
      'jdskfjh ksdjfkjsdfkjhsdfkj ksdjfkjsdf kjdsfkjesirfhiuwgjersygtswe4 sksei'+
      'kuf234i8y5987235i hdskjf kjheskjf hsekjfjhksef kwf hsekh kse kjsejkf hsk'+
      'jhfr 8934y oisefj khsdhjf ksdjhf kjhdsfk jdskfjh ksdjfkjsdfkjhsdfkj ksdj'+
      'fkjsdf kjdsfkjesirfhiuwgjersygtswe4 skseikuf234i8y5987235i hdskjf kjhesk'+
      'jf hsekjfjhksef kwf hsekh kse kjsejkf hskjhfr 8934y oisefj khsdhjf ksdjh'+
      'f kjhdsfk jdskfjh ksdjfkjsdfkjhsdfkj ksdjfkjsdf kjdsfkjesirfhiuwgjersygs'+
      'dhjf ksdjhf kjhdsfk jdskfjh ksdjfkjsdfkjhsdfkj ksdjfkjsdf kjdsfkjesirfhi'+
      'uwgjersygtswe4 skseikuf234i8y5987235i hdskjf kjheskjf hsekjfjhksef kwf h'+
      'sekh kse kjsejkf hskjhfr 8934y oisefj khsdhjf ksdjhf kjhdsfk jdskfjh ksd'+
      'jfkjsdfkjhsdfkj ksdjfkjsdf kjdsfkjesirfhiuwgjersygtswe4 skseikuf234i8y59'+
      '87235i hdskjf kjheskjf hsekjfjhksef kwf hsekh kse kjsejkf hskjhfr 8934y '+
      'oisefj khsdhjf ksdjhf kjhdsfk jdskfjh ksdjfkjsdfkjhsdfkj ksdjfkjsdf kjds'+
      'fkjesirfhiuwgjersygtswe4 skseikuf234i8y5987235i hdskjf kjheskjf hsekjfjh'+
      'ksef kwf hsekh kse kjsejkf hskjhfr 8934y oisefj khtswe4 skseikuf234i8y59'+
      '87235i hdskjf kjheskjf hsekjfjhksef kwf hsekh kse kjsejkf hskjhfr 8934y '+
      'oisefj kh';

В строковых константах не проблема и 10-ти мегабайтные .mp3-ки хранить.

[cosmic_call]

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

>>> ну ограничить максимальную длину строки

Совершенно ни при чём.

да. уже понял. благодарю.
но тем не менее с точки зрения экономии лучше так делать чем не делать