Вверх ↑
Этот топик читают: Гость
Гость
Ответов: 17029
Рейтинг: 0
#46: 2008-08-15 08:21:07 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2021-05-21 12:08:45
карма: 0

0
Ответов: 5227
Рейтинг: 588
#47: 2008-08-15 08:31:08 ЛС | профиль | цитата
будет необходимый минимум + фишки которые мне пригодятся, с сетью даже незнаю пока как быть
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Гость
Ответов: 17029
Рейтинг: 0
#48: 2008-08-15 08:54:40 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2021-05-21 12:08:45
карма: 0

0
Ответов: 5227
Рейтинг: 588
#49: 2008-08-15 09:19:01 ЛС | профиль | цитата
pav, да я уже думал об этом.
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Ответов: 5227
Рейтинг: 588
#50: 2008-08-15 11:18:14 ЛС | профиль | цитата
pav тебе личные сообщения доступны? если да то перейдём туда.
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Ответов: 139
Рейтинг: 4
#51: 2008-08-15 14:18:25 ЛС | профиль | цитата
Наверное да, пиши, сегодня вечером попробую проверить.
карма: 0

0
Ответов: 902
Рейтинг: 27
#52: 2008-08-17 21:06:56 ЛС | профиль | цитата
Поскажите пожалуйста, как опредилить букву диска имеющего самый большой обьём свободного места?
code_2271.txt
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
файлы: 1code_2271.txt [593B] [223]
Ответов: 5227
Рейтинг: 588
#53: 2008-08-17 21:55:52 ЛС | профиль | цитата
juk, а чем тебе DiskInfo из вкладки Система->WMI неподходит
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Ответов: 902
Рейтинг: 27
#54: 2008-08-18 01:04:43 ЛС | профиль | цитата
andrestudio, Точно! Я просто ещё не понял что это за вкладка:WMI

[size=-2]------ Добавлено в 01:04
andrestudio, А как узнать букву?
Мне нужно чтоб программа сама сравнила диски и выдала примерно следующее:

Больше всего свободного места у Вас на диске:В

Думаю нужно использовать: Компонент if_else , но не пойму как.

code_2272.txt
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
файлы: 1code_2272.txt [583B] [235]
Ответов: 5227
Рейтинг: 588
#55: 2008-08-18 09:01:35 ЛС | профиль | цитата
juk, самое печальное что вот такая схема с DiskInfo неработает (выдаёт неправельную букву диска)code_9748.txt

аналогичная схема с компонентом Drive работает превосходно, это второй неодназначный случай DiskInfo WMI за последнее время, поэтому использую Drive.
------------ Дoбавленo:

вот схема с Drive (даже боюсь выкладывать, ибо было сказано: " Некогда не предлагайте компоненты невходящие в дистрибутив")


#sha
Add(MainForm,1006107,21,105)
{
Left=20
Top=105
Width=211
Height=150
}
Add(Drive,5842772,238,126)
{
link(onGetLogicalDrive,13191944:doValue,[(284,132)(284,115)(226,115)(226,69)])
link(DriveName,1167490:Var2,[])
}
Add(DoData,8820561,357,266)
{
link(onEventData,8694834:doAdd,[])
link(Data,6981597:Value,[])
}
Add(If_else,11360478,245,217)
{
Type=2
link(onTrue,11705494:doValue,[])
link(Op1,12915176:Var2,[])
link(Op2,11705494:Value,[(258,205)(290,205)(290,261)(314,261)])
}
Add(Memory,11705494,308,217)
{
Default=Real(1)
Point(Data)
link(onData,6981597:doValue,[])
link(Data,12915176:Var3,[(314,198)])
}
Add(Memory,6981597,357,217)
{
Default=String()
Point(Data)
link(Data,1167490:Var3,[(363,107)])
}
Add(Hub,10356938,147,126)
{
link(onEvent1,5842772:doGetLogicalDrive,[])
link(onEvent2,8820561:doData,[(206,139)(206,272)])
}
Add(Memory,13191944,238,63)
{
link(onData,11360478:doCompare,[(301,69)(301,179)(233,179)(233,223)])
}
Add(ListBox,8694834,420,266)
{
Left=75
Top=15
Width=115
Height=75
}
Add(Button,14692951,98,126)
{
Left=10
Top=15
link(onClick,10356938:doEvent1,[])
}
Add(GetDataEx,12915176,238,189)
{
link(Data,5842772:FreeSpace,[])
}
Add(GetDataEx,1167490,231,98)
{
link(Data,13191944:Value,[])
}



карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
файлы: 1code_9748.txt [1.1KB] [329]
Разработчик
Ответов: 26066
Рейтинг: 2120
#56: 2008-08-18 10:09:49 ЛС | профиль | цитата
andrestudio писал(а):
выдаёт неправельную букву диск

А вот так работает


Add(MainForm,12900612,266,231)
{
Left=20
Top=105
Width=216
Height=220
}
Add(DiskInfo,14302292,434,231)
{
Point(FreeSpace)
Point(DriveType)
link(onInfo,15918966:doCompare,[])
}
Add(Button,14692951,329,231)
{
Left=5
Top=20
link(onClick,2668624:doEvent1,[])
}
Add(ListBox,8694834,532,378)
{
Left=75
Top=15
Width=115
Height=150
link(Str,6981597:Value,[])
}
Add(If_else,11360478,462,399)
{
Type=2
Op2=Real(1)
link(onTrue,14527988:doValue,[(506,405)(506,367)(457,367)(457,328)])
link(Op1,11481827:Var2,[])
link(Op2,14527988:Value,[])
}
Add(Memory,14527988,469,322)
{
Default=Integer(1)
Point(Data)
link(onData,6981597:doValue,[])
link(Data,11481827:Var3,[(475,303)])
}
Add(Memory,6981597,532,322)
{
Point(Data)
link(Data,14302292:DeviceID,[(538,289)(440,289)])
}
Add(Hub,2668624,378,231)
{
link(onEvent1,14302292:doInfo,[])
link(onEvent2,8694834:doAdd,[(424,244)(424,384)])
}
Add(If_else,15918966,497,231)
{
Op2=Integer(3)
link(onTrue,11360478:doCompare,[(543,237)(543,213)(320,213)(320,405)])
link(Op1,14302292:DriveType,[(503,219)(489,219)(489,275)(475,275)])
}
Add(GetDataEx,11481827,455,294)
{
link(Data,14302292:FreeSpace,[])
}

------------ Дoбавленo:

andrestudio писал(а):
это второй неодназначный случай DiskInfo WMI за последнее время

Брехня -- неумение применять компонент не означеет отсутствие его работоспособности
карма: 22

0
Ответов: 5227
Рейтинг: 588
#57: 2008-08-18 10:24:17 ЛС | профиль | цитата
nesco, твой код тоже неработает. (выдаёт неправельную букву диска). Можно ещё что нибудь придумать, но скорей всего это будет похоже на то как штаны через голову одевать надо

карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Разработчик
Ответов: 26066
Рейтинг: 2120
#58: 2008-08-18 10:35:38 ЛС | профиль | цитата
andrestudio, вот уж не знаю, что он у тебя не работает, но у меня он выдает букву правильно

------------ Дoбавленo:


А вот такая схема на HardDisk'e тоже не работает



Add(MainForm,8134612,189,238)
{
Left=20
Top=105
Width=185
Height=486
link(onCreate,8885714:doEvent1,[])
}
Add(HardDisk,3707463,329,245)
{
Disk=""
Point(doEnum)
Point(onEnum)
link(Disk,4499267:Var2,[])
link(onEnum,16463183:doValue,[(389,251)(389,219)(310,219)(310,188)])
}
Add(Memo,189496,406,385)
{
Left=20
Top=10
Width=140
Height=420
ScrollBars=3
link(Str,2999845:Value,[])
}
Add(Memory,16463183,329,182)
{
link(onData,8234811:doCompare,[(373,188)(373,165)(290,165)(290,377)])
}
Add(If_else,8234811,336,371)
{
Type=2
link(onTrue,6686107:doValue,[(380,377)(380,345)(331,345)(331,314)])
link(Op1,8766511:Var2,[])
link(Op2,6686107:Value,[])
}
Add(Memory,6686107,343,308)
{
Point(Data)
link(onData,2999845:doValue,[])
link(Data,8766511:Var3,[(349,296)])
}
Add(GetDataEx,8766511,329,287)
{
link(Data,3707463:FreeSize,[])
}
Add(Memory,2999845,406,308)
{
Point(Data)
link(Data,4499267:Var3,[(412,233)])
}
Add(Hub,8885714,238,252)
{
link(onEvent1,3707463:doEnum,[])
link(onEvent2,189496:doAdd,[(280,265)(280,391)])
}
Add(GetDataEx,4499267,322,224)
{
link(Data,16463183:Value,[])
}

------------ Дoбавленo:

juk, это то, что ты просил, попробуй
карма: 22

0
Ответов: 902
Рейтинг: 27
#59: 2008-08-18 10:44:58 ЛС | профиль | цитата
nesco,
andrestudio, вот уж не знаю, что он у тебя не работает, но у меня он выдает букву правильно

У меня тоже правильно.
nesco, Спасибо!
Хорошо былобы еслиб ещё кто попробовал.

[size=-2]------ Добавлено в 10:44
andrestudio,
самое печальное что вот такая схема с DiskInfo неработает

А у меня всё правильно.
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 5227
Рейтинг: 588
#60: 2008-08-18 10:46:56 ЛС | профиль | цитата
У меня три жёстктих диска, разделов 7, три сидюка 2 из них виртуальные. Разделы есть как FAT так и NTFS. Так вот если открыть панель упраления (управление дисками) то у меня диск0, диск1, диск2. Выдаёт наибольший размер на 2 разделе на диске0, хотя на двух других разделах других жёстких дисков свободного места гораздо больше.
------------ Дoбавленo:

juk, дело твоё, моё дело предупредить
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)