Вверх ↑
Этот топик читают: Гость
Ответов: 154
Рейтинг: 4
#1: 2009-10-20 16:42:37 ЛС | профиль | цитата
ни как не пойму как вывести инормацию (Name,Manufacturer,Description,SocketDesignation,MaxClockSpeed, ExtClock,Version, L2CacheSize,L2CacheSpeed, Architecture,Availability,CurrentVoltage,ProcessorId,Status,LoadPercentage) в ProcInfo в Tmemo! не выводить же каждую в TEdit,! (((( подскажите plz как ?!
карма: 0

0
Разработчик
Ответов: 26170
Рейтинг: 2127
#2: 2009-10-20 16:48:42 ЛС | профиль | цитата
kernel писал(а):
в Tmemo! не выводить же каждую в TEdit

Классы VCL у нас не катят. Основной пакет HiAsm работает с KOL. Да и задача описана слишком мутно и непонятно
карма: 22

0
Ответов: 154
Рейтинг: 4
#3: 2009-10-20 17:12:33 ЛС | профиль | цитата
code_15304.txt

а как сделать также тако чтобы вывод был в Memo, а не каждого элемента в Edit
карма: 0

0
файлы: 1code_15304.txt [2.1KB] [163]
Администрация
Ответов: 15295
Рейтинг: 1519
#4: 2009-10-20 17:25:49 ЛС | профиль | цитата
code_15305.txt
карма: 27
0
файлы: 1code_15305.txt [1KB] [188]
Разработчик
Ответов: 26170
Рейтинг: 2127
#5: 2009-10-20 17:30:32 ЛС | профиль | цитата
Так, что ли надо, или наподобие



Add(MainForm,1388320,147,105)
{
Left=20
Top=105
Width=351
Height=318
}
Add(MemoryInfo,4724626,259,168)
{
Point(DataWidth)
Point(FormFactor)
Point(Manufacturer)
Point(MemoryType)
Point(Model)
Point(Speed)
Point(Tag)
Point(SerialNumber)
Point(Version)
link(onInfo,13388512:doString,[(365,174)(365,206)(247,206)(247,237)])
}
Add(Button,7760478,147,161)
{
Left=140
Top=255
link(onClick,13907702:doEvent1,[])
}
Add(Hub,13907702,196,161)
{
link(onEvent1,6208109:doClear,[(379,167)(379,244)])
link(onEvent2,4724626:doInfo,[])
}
Add(FormatStr,13388512,259,231)
{
DataCount=12
Mask="%1
%2
%3
%4
%5
%6
%7
%8
%9
%10
%11
%12"
link(onFString,6208109:doAdd,[])
link(Str1,4724626:Name,[(265,215)(272,215)])
link(Str2,4724626:BankLabel,[(272,215)(265,215)])
link(Str3,4724626:Capacity,[])
link(Str4,4724626:Speed,[(286,215)(328,215)])
link(Str5,4724626:DataWidth,[])
link(Str6,4724626:FormFactor,[])
link(Str7,4724626:Manufacturer,[])
link(Str8,4724626:MemoryType,[])
link(Str9,4724626:Model,[])
link(Str10,4724626:Tag,[(328,215)(335,215)])
link(Str11,4724626:SerialNumber,[(335,215)(342,215)])
link(Str12,4724626:Version,[(342,215)(349,215)])
}
Add(Memo,6208109,399,231)
{
Left=10
Top=10
Width=325
Height=235
ScrollBars=3
}


Гы. Dilma умудрился, даже, на MT сделать
карма: 22

0
Ответов: 154
Рейтинг: 4
#6: 2009-10-20 17:44:48 ЛС | профиль | цитата
ОООоо ))) нихся )) спс ребят )))

Dilma, МУЖЧИНА )
карма: 0

0
Ответов: 175
Рейтинг: 10
#7: 2009-10-20 17:45:48 ЛС | профиль | цитата
моя версия

Add(MainForm,2953706,35,210)
{
Width=297
Height=355
link(onCreate,2297200:doInfo,[])
}
Add(MemoryInfo,2297200,203,224)
{
Point(DataWidth)
Point(FormFactor)
Point(Manufacturer)
Point(MemoryType)
Point(Model)
Point(Speed)
Point(Tag)
Point(SerialNumber)
Point(Version)
link(onInfo,4176696:doFor,[(309,230)(309,197)(114,197)(114,286)])
}
Add(ListBox,12024001,203,350)
{
Left=90
Top=10
Width=185
Height=290
link(Str,9136476:Var,[])
}
Add(GetIndexData,9136476,203,280)
{
Count=12
link(Data1,2297200:BankLabel,[])
link(Data2,2297200:Name,[])
link(Data3,2297200:Capacity,[])
link(Data4,2297200:DataWidth,[(230,275)(237,275)])
link(Data5,2297200:FormFactor,[(237,275)(244,275)])
link(Data6,2297200:Manufacturer,[(244,275)(251,275)])
link(Data7,2297200:MemoryType,[(251,275)(258,275)])
link(Data8,2297200:Model,[(258,275)(265,275)])
link(Data9,2297200:Speed,[(265,275)(272,275)])
link(Data10,2297200:Tag,[(272,275)(279,275)])
link(Data11,2297200:SerialNumber,[(279,275)(286,275)])
link(Data12,2297200:Version,[(286,268)(293,268)])
}
Add(For,4176696,126,280)
{
End=11
link(onEvent,1949349:doEvent1,[])
}
Add(Hub,1949349,168,280)
{
link(onEvent1,9136476:doIndex,[])
link(onEvent2,12024001:doAdd,[(192,293)(192,356)])
}


карма: 1

0
Администрация
Ответов: 15295
Рейтинг: 1519
#8: 2009-10-20 17:51:30 ЛС | профиль | цитата
a0005d26f, лучше отвыкать от такой методики построения схем
карма: 27
0
Ответов: 175
Рейтинг: 10
#9: 2009-10-20 18:09:03 ЛС | профиль | цитата
посмотрев на твою сделал такой же вывод.. опыта еще маловато. а помогать людям хочется
карма: 1

0
Администрация
Ответов: 15295
Рейтинг: 1519
#10: 2009-10-20 18:20:38 ЛС | профиль | цитата
главное желание, остальное приходит со временем
карма: 27
0
Ответов: 16884
Рейтинг: 1239
#11: 2009-10-20 20:47:13 ЛС | профиль | цитата
nesco, поздравляю!
code_15307.txt
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_15307.txt [5.5KB] [151]
11
Сообщение
...
Прикрепленные файлы
(файлы не залиты)