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

Вниз

структуры большой вложенности   Найти похожие ветки 

 
l_v   (2007-10-16 15:45) [0]

Здраствуйте! вообщем возникла вот такая задачка:
Объявление:type
 ffff = packed record
   a,b,c,d: integer;
end;
Pffff = ^ffff;

type
  gggg = packed record
    f: array of Pffff;
    ds,re: integer;
end;


выделяю память так:
GetMem(gggg,..);
GetMem(gggg.f,..);

но не работает, все f nil"ы...
не подскажете как так можно работать?


 
Dmitry S ©   (2007-10-16 15:47) [1]

GetMem(gggg,..);
SetLength(gggg.f, N);
for i=0 to N-1 do GetMem(gggg.f[i], ..);


 
Dmitry S ©   (2007-10-16 15:47) [2]

Хотя я бы в данном случае не использовал указатели.


 
Маша Шрайбер ©   (2007-10-16 15:48) [3]

На вашем месте я была бы внимательна к gggg и почитала бы F1 про GetMem


 
Dmitry S ©   (2007-10-16 15:53) [4]

боюсь что в F1 про GetMem ничего не сказано про gggg:)


 
Германн ©   (2007-10-16 15:56) [5]


> не подскажете как так можно работать?

Подскажем. Так нельзя работать!
:)


 
l_v   (2007-10-16 15:58) [6]

Dmitry S, спасибо!
Германн, это я уже выяснил практически... :)



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

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

Наверх




Память: 0.45 MB
Время: 0.045 c
15-1191521154
kalexi
2007-10-04 22:05
2007.11.11
Перехват функций...


5-1162824958
--= Eagle =--
2006-11-06 17:55
2007.11.11
Сохранение свойств незарегистрированного компонента


2-1192790942
Shakesbeer
2007-10-19 14:49
2007.11.11
Работа с com-портом.


2-1192606931
ari_9
2007-10-17 11:42
2007.11.11
в run-time расположить отн. друг друга комп. с одинаковым align


1-1187258884
Klopan
2007-08-16 14:08
2007.11.11
Object TreeView





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский