Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.12.09;
Скачать: CL | DM;

Вниз

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

 
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;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.023 c
2-1195204511
Pro100
2007-11-16 12:15
2007.12.09
Дробная часть


15-1194706734
Kick
2007-11-10 17:58
2007.12.09
Невизуальные классы delphi


15-1194481742
Riply
2007-11-08 03:29
2007.12.09
Отрицательные стороны рекурсии.


15-1194413323
Steep
2007-11-07 08:28
2007.12.09
SQL запрос


2-1194704472
Alral
2007-11-10 17:21
2007.12.09
IdTCPClient, TurboDelphi 2006