Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.017 c
2-1195138933
авыф
2007-11-15 18:02
2007.12.09
TKWizard перепрыгнуть страницу


2-1194801504
Alral
2007-11-11 20:18
2007.12.09
TCPServer


2-1194865129
Uno
2007-11-12 13:58
2007.12.09
Протокалирование сообщений


15-1194465471
Jolik
2007-11-07 22:57
2007.12.09
Макроязык как в 1С:Бухгалтерии...


4-1179910807
kolos_rus
2007-05-23 13:00
2007.12.09
Необходимо определить имя залогиневшегося юзера




   Наверх