Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

типы данных и переменные


Pauk ©   (2009-05-26 20:53:00) 

мне нужно создать "составную" переменную типа a1, a2, .. , a2802.
каждая из них String и имеет разные, уникальные значения.
как можно осуществить их перебор в цикле?


AndreyV   (2009-05-26 22:48:00) [1]

> [15] Pauk ©   (26.05.09 22:24)
> по неопытности, так заполнять массив я не думал.

Тебе это советовали в

> [6] palva ©   (26.05.09 21:31)
> Напишите программу, которая перелопатит эту "портянку" (фи,
> какое грубое слово) и выдаст описание константного массива
> с инициализацией.

Только можно без программы: удалить средствами редактора вертикальный блок, ну поиском с заменой ещё проитись.


turbouser   (2009-05-26 22:27:00) [2]

Зря орешник закрыли...
Такой орех пропадает =))))


sniknik   (2009-05-26 22:26:00) [3]

> тема закрыта
не говори гоп, пока не перепрыгнешь...


Pauk   (2009-05-26 22:24:00) [4]

по неопытности, так заполнять массив я не думал. а писать не заставляли
за совет СПАСИБО! это выход. тема закрыта


Pauk   (2009-05-26 22:20:00) [5]

не пробовал ещё. а как?


Сергей М.   (2009-05-26 22:19:00) [6]


> Pauk ©   (26.05.09 22:10) [11]


Ты русский понимаешь ?)

Тебе был задан резонный вопрос - КТО тебя заставил писать эти две тысячи строк вида

Aхх = 'чертовщина';

?

Почему СРАЗУ незьзя было написать те же две тысячи строк, но в виде

const
 a: array[0 .. туева хуча] of string =
(
 'nnnnnn',
 'kkk',
 'uuuuuuuu'.
 'yyyyyyyyy',
...
 'xxxxxxxxxxx'
);

?


HF-Trade   (2009-05-26 22:15:00) [7]

Переделать константы в элементы стринглиста


Pauk   (2009-05-26 22:10:00) [8]

если кто читал выше указанный отрывок кода, то там работает только прямое присваиваание каждому элементу массива конкретной константы:
a[n]:= A1; //и тд...
а мне нужно  енту константу представить примерно как:
a[n]:= ('A' + inttostr(n)); // в этом случае a[n]:= 'A1' но не реальному содержимому константы
как решить эту проблему? ведь их 2802 такие


sniknik   (2009-05-26 22:03:00) [9]

> примерно так
прослеживается желание не решить "проблему", а просто поговорить...


Сергей М.   (2009-05-26 21:56:00) [10]


> palva


Извини, бес попутал "pavlu" с "paukom")

Но портянка - она и есть портянка, как ни крути)


Сергей М.   (2009-05-26 21:53:00) [11]


> palva ©   (26.05.09 21:31) [6]
>
> Напишите программу, которая перелопатит эту "портянку"


Щас.

Разрешите бегом ?

Или готовы оплатить ?)


> фи, какое грубое слово


Уж не грубее "составной переменной", поверь)


> если предоставлять как присваивание обычного массива, компелятор
> пишит что использовано слишком много констант (примерно
> так) это ошибка
>


Чавой-то ?

Ты сам-то понял что сказал ?)


Pauk   (2009-05-26 21:38:00) [12]

если предоставлять как присваивание обычного массива, компелятор пишит что использовано слишком много констант (примерно так) это ошибка


palva   (2009-05-26 21:31:00) [13]

Напишите программу, которая перелопатит эту "портянку" (фи, какое грубое слово) и выдаст описание константного массива с инициализацией. Или пусть это будет присваивание обычного массива, если вас это больше устраивает. Ну и останется заменить код и перекомпилировать.


Pauk   (2009-05-26 21:27:00) [14]

я не хочу читать всё енто из файла. пытаюсь вшить в проект


Сергей М.   (2009-05-26 21:22:00) [15]


> мне как раз нужно заполнить массив


Массив - это переменна я, но не перемнн ые.

И потом - откуда взялась эта жуткая портянка с нудным объявлением и столь же нудной инициализацией двух с лишним тысяч строковых переменных ?
Это что, тяжелое наследство тяжелого прошлого ?


Pauk   (2009-05-26 21:15:00) [16]

да. НО. все данные уже введены в указанном порядке. мне как раз нужно заполнить массив при помощи цикла.
const
....
A13 = 'nnnnnn';
A14 = 'kkk';
A15 = 'uuuuuuuu';
A16 = 'yyyyyyyyy';
A17 = 'xxxxxxxxxxx';
....

нужно что то тита:

for n:=1 to 2802 do begin
a[n]:= ('A' + inttostr(n));
end;

но не бывает такого


Сергей М.   (2009-05-26 21:06:00) [17]


> переменную


> каждая из них


Никак не вяжется "она" и "они".

Если "она" - это та самая переменная, то"они" - это кто ?


cver   (2009-05-26 20:59:00) [18]

var
a:array [1..2802] of string;

for i:=1 to 2802 do a[i];

?


Наверх

Титульная страница Поиск, карта сайта Написать письмо