Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2009.04.12;
Скачать: [xml.tar.bz2];

Вниз

добавить запись в конец массива   Найти похожие ветки 

 
RustBB   (2009-02-26 23:52) [0]

имеется тип:

type
persiptron = record
name:string;
nameconn:array of string;
w:array of real;
pnet:real;
pout:real;
end;

и массив:

neuralnet:array [1..50, 1..50] of persiptron;

подскажите пожалуйсто как добавлять записи в конец массива
neuralnet[i,ii].nameconn


 
Медвежонок Пятачок ©   (2009-02-26 23:54) [1]

setlength и по последнему индексу минус один


 
RustBB   (2009-02-26 23:59) [2]

SetLength(neuralnet[i,ii].nameconn, Length(neuralnet[i,ii].nameconn)+1);
neuralnet[i,ii].nameconn[Length(neuralnet[i,ii].nameconn)]:=neuralnet[i+1,iii].name;

после SetLength массив очищается, и все что до этого было добавлено пропадает


 
Медвежонок Пятачок ©   (2009-02-27 00:01) [3]

с чего бы это он очищается?
что по этому поводу говорит f1?


 
RustBB   (2009-02-27 00:07) [4]

вобщем описаным выше способом у меня добавляются пустые строки, хотя neuralnet[i+1,iii].name не пустая


 
Медвежонок Пятачок ©   (2009-02-27 00:08) [5]

Existing characters in the string or elements in the array are preserved, but the content of newly allocated space is undefined.

сетленс в этом не виноват


 
Медвежонок Пятачок ©   (2009-02-27 00:10) [6]

кроме того индексируются динамические массивы с нуля, а у тебя

nameconn[Length(neuralnet[i,ii].nameconn)]


 
RustBB   (2009-02-27 00:13) [7]

а понял, спасибо



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

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

Наверх





Память: 0.45 MB
Время: 0.006 c
15-1234647001
Юрий
2009-02-15 00:30
2009.04.12
С днем рождения ! 15 февраля 2009 воскресенье


2-1235307554
Sfinx
2009-02-22 15:59
2009.04.12
Как свернуть программу в трей при запуске?


4-1208164694
(Монстр)
2008-04-14 13:18
2009.04.12
Модем, и его статус/состояние...


15-1234643283
Думкан
2009-02-14 23:28
2009.04.12
Как переименовать фрейм TFrame2 = class(TFrame) ?


2-1235591160
жора
2009-02-25 22:46
2009.04.12
Баг при выходе из функции





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский