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

Вниз

Массивы, обращение   Найти похожие ветки 

 
Layner ©   (2007-11-13 10:12) [0]

Здравствуйте! Что то с массивами пробел, не могу разобраться в одной строке, помогите! Есть:

type
TDisk = record
  Letter   : byte;
  TypeDisk : byte;
end;
TDiskArray = array of TDisk;

...
var
Drive: array of TDiskArray;
...

SetLength(Drive,2); //например 2 ПК

SetLength(Drive[0],255); //установим предел в 255 дисков для 1 ПК
SetLength(Drive[1],255); //установим предел в 255 дисков для 2 ПК


Вопрос, Как записать значения в TDisk для каждого диска, каждого ПК?
Например для 1го диска 1го ПК?


 
MBo ©   (2007-11-13 10:16) [1]

Drive[0, 0].Letter := 1;


 
Layner ©   (2007-11-13 10:20) [2]

MBo ©   (13.11.07 10:16)
Спасибо! Я думал что так пишется если бы я объявил массив так
TDiskArray = array of array of TDisk;
тут то проблем нет с обращением, но в данном случае думал как то по другому :) Ок, записал на корку :)


 
Slym ©   (2007-11-13 10:31) [3]

Layner ©   (13.11.07 10:12)
предел в 255 дисков

диска Я:\ не бывает :)
бывают только a-z, т.е. byte("z")-byte("a") штук


 
Layner ©   (2007-11-13 10:42) [4]

Понял :)


 
Palladin ©   (2007-11-13 10:43) [5]

byte("z")-byte("a")+1


 
Anatoly Podgoretsky ©   (2007-11-13 11:35) [6]

Дисков с буквами может быть только 32.
По обращению похоже что тебе нужен двухмерный массив, а в этом случае требуется еще и поле ComputerName


 
Slym ©   (2007-11-13 11:40) [7]

Anatoly Podgoretsky ©   (13.11.07 11:35) [6]
Дисков с буквами может быть только 32

это в каком алфавите? если ф рускам то их там +1...


 
Palladin ©   (2007-11-13 11:43) [8]

я представляю, что было бы если бы диски именовались иероглифами :)
даже страшно себе такое представить


 
Anatoly Podgoretsky ©   (2007-11-13 12:08) [9]

> Slym  (13.11.2007 11:40:07)  [7]

В алфавите MSDN


 
Anatoly Podgoretsky ©   (2007-11-13 12:09) [10]

> Palladin  (13.11.2007 11:43:08)  [8]

Буквы это ахронизм от ДОС, по сути это уже короткие имена, наряду с длинными, да и буквы дискам не нужны.


 
Slym ©   (2007-11-13 12:49) [11]

Anatoly Podgoretsky ©   (13.11.07 12:09) [10]
Все разделы свести в MountPointы на Ц и не париться



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

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

Наверх




Память: 0.46 MB
Время: 0.044 c
15-1194334395
Jeer
2007-11-06 10:33
2007.12.09
Компилятор D7 учитывает платформу ?


15-1194337973
Evanescence
2007-11-06 11:32
2007.12.09
Кажется, я убил вирус :)


2-1194979634
vegarulez
2007-11-13 21:47
2007.12.09
Вопрос про Font при выводе на принтер.


1-1190020523
Алик
2007-09-17 13:15
2007.12.09
Хэш-коды и с чем их едят?


1-1190293681
Lpnt
2007-09-20 17:08
2007.12.09
Отображение данных.





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