Гимн - Общие вопросы Delphi

benjaminfran · 25.02.2008, 22:54

тут видел прогу гимп работает понравилось но чтото непоймуу как составлять вней музыку пробую как нас в музыкалке учили но сёровно както бурмата получается

Карась · 25.02.2008, 22:57

Что за прога и как вас в "в музыкалке учили" ?

benjaminfran · 25.02.2008, 23:35

http://pblog.ru/lab/ прога тут!

Карась · 26.02.2008, 00:03

Всё просто.
Там есть два массива. В одном хранятся данные о ноте (тон и длительность), а во втором слова.
Выполняется цикл и поочерёдно из этих массивов берутся данные.

Например "Маленкая ёлочка....":

Код:

Mel : Array[0..22, 0..1] of Word =
             ((g1, 20000), (e1, 10000), (e1, 10000), (g1, 20000),
              (e1, 10000), (e1, 10000), (g1, 9000), (f1, 9000),
              (e1, 9000), (d1, 9000), (c1, 30000), (c1, 2000),

.................

И текст к ней:

Код:

Txt : Array[0..22] of String =
             (('Ма'),   ('лень '),  ('кой'),  (' ё'),
              ('лочьке'),   (' хо'), ('лод'), ('но'),
              (' зи'), ('мо'),  ('й'), (''),
...........

benjaminfran · 26.02.2008, 00:53

[Error] GimnUn.pas(67): Number of elements differs from declaration

mutabor · 26.02.2008, 11:59

Цитата:

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

[Error] GimnUn.pas(67): Number of elements differs from declaration

откуда мы знаем что у тебя в 67-й строке?
Кол-во элементов массива отличается от объявленного. Смотри внимательно массивы.
Если ты скопировал это, то тут исправить надо было с 22 на 11.

Цитата:

Txt : Array[0..22] of String =
(('Ма'), ('лень '), ('кой'), (' ё'),
('лочьке'), (' хо'), ('лод'), ('но'),
(' зи'), ('мо'), ('й'), (''),

Карась · 26.02.2008, 22:13

У меня в конце приведённых кодов стоит многоточие.
Это выдраный кусок из программы.
Надо просто найти какой именно кусок я выдрал и заменить...

25.02.2008, 22:54	#1
benjaminfran Пользователь Регистрация: 14.02.2008 Сообщений: 42	Гимн тут видел прогу гимп работает понравилось но чтото непоймуу как составлять вней музыку пробую как нас в музыкалке учили но сёровно както бурмата получается

25.02.2008, 22:57	#2
Карась Участник клуба Регистрация: 26.10.2007 Сообщений: 1,244	Что за прога и как вас в "в музыкалке учили" ? Умом Россию не понять, пока не выпито ноль пять, А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром...

26.02.2008, 00:03	#4
Карась Участник клуба Регистрация: 26.10.2007 Сообщений: 1,244	Всё просто. Там есть два массива. В одном хранятся данные о ноте (тон и длительность), а во втором слова. Выполняется цикл и поочерёдно из этих массивов берутся данные. Например "Маленкая ёлочка....": Код: `Mel : Array[0..22, 0..1] of Word = ((g1, 20000), (e1, 10000), (e1, 10000), (g1, 20000), (e1, 10000), (e1, 10000), (g1, 9000), (f1, 9000), (e1, 9000), (d1, 9000), (c1, 30000), (c1, 2000), .................` И текст к ней: Код: `Txt : Array[0..22] of String = (('Ма'), ('лень '), ('кой'), (' ё'), ('лочьке'), (' хо'), ('лод'), ('но'), (' зи'), ('мо'), ('й'), (''), ...........` Умом Россию не понять, пока не выпито ноль пять, А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром... Последний раз редактировалось Карась; 26.02.2008 в 00:09.

26.02.2008, 00:53	#5
benjaminfran Пользователь Регистрация: 14.02.2008 Сообщений: 42	[Error] GimnUn.pas(67): Number of elements differs from declaration Последний раз редактировалось benjaminfran; 26.02.2008 в 00:56.

26.02.2008, 22:13	#7
Карась Участник клуба Регистрация: 26.10.2007 Сообщений: 1,244	У меня в конце приведённых кодов стоит многоточие. Это выдраный кусок из программы. Надо просто найти какой именно кусок я выдрал и заменить... Умом Россию не понять, пока не выпито ноль пять, А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром...

25.02.2008, 23:35	#3
benjaminfran Пользователь Регистрация: 14.02.2008 Сообщений: 42	http://pblog.ru/lab/ прога тут!