Win32_ComputerSystem нужна помощь
Помогите разобраться с этой функцией Win32_ComputerSystem находящейся в WMI class. У нее очень много переменных и очень много данных она может дать. Объясните или намекните на пример как ей пользоваться
А это и не функция.
Но понять их так и не смог.
Мне нужно реализовать пример: Получение данных WMI на локальном компьютере.
Ну или найти пример реализации PCSystemType из класса Win32_ComputerSystem.
Тип данных: uint16
Тип доступа: только для чтения
Тип компьютера в использовании, таких как ноутбук, рабочий стол или Tablet.
Есть же какая то структура, порядок, последовательность действий для получения этих данных. Шаблон?!
Я смотрел тут ->Создание приложения WMI на языке C + +
но ни один пример не работает, в основном компилятор выводит ошибку:
[ILINK32 Error] Error: 'C:\PROGRAM FILES\CODEGEAR\RAD STUDIO\5.0\LIB\WBEMUUID.LIB' contains invalid OMF record, type 0x21 (possibly COFF)
Вот пример по ссылке, выводит просто список текущих процессов, ибо запрос идет к Win32_Process.
Переделать на запрос к Win32_ComputerSystem - вопрос на 5 минут работы.
Цитата: 323331
[ILINK32 Error] Error: 'C:\PROGRAM FILES\CODEGEAR\RAD STUDIO\5.0\LIB\WBEMUUID.LIB' contains invalid OMF record, type 0x21 (possibly COFF)
Хоспадеееее .... ну почитайте FAQ!!!
вот скрин программы : [ATTACH=CONFIG]5229[/ATTACH]
Задача состоит в том что:
1) напротив каждого LabelEditа появляется кнопка(при наведении на него) чтобы изменить ссылу, есть форма для изменения этой ссылки. Нужно чтобы при нажатии на кнопку напротив LabelEdit в форму редактирования ссылки передавался номер LabelEdit (имя) и при сохранении данные выводились в него(в тот напротив которого была нажата кнопка редактирования).
Все это необходимо чтобы не создавать кучу форм в программе для каждого LabelEdit, а просто чтоб была одна.
ну как то так.
это вопрос в "я начинающий...", эта тема здесь явно не подходит
У Вас не получается передавать данные между формами?
Если да, то показывайте что наделали ... Если нет, то объясните по-русски ...
(Варианты в виде таблицы я отверг)
Цитата:
procedure TForm1.FormCreate(Sender: TObject);
var
formrgn:hrgn;
begin
form1.Brush.Style:=bssolid;
getwindowrgn(form1.Handle,formrgn);
deleteobject(formrgn);
Form1.height:=200;
form1.width:=Form1.height;
formrgn:=createroundrectrgn(1,1,Form1.height-1,form1.width-1,Form1.height,form1.width);
setwindowrgn(form1.Handle,formrgn,true);
Canvas.Pen.Color:=clblack;
Canvas.MoveTo(104,49);
canvas.LineTo(107,60);
end;
var
formrgn:hrgn;
begin
form1.Brush.Style:=bssolid;
getwindowrgn(form1.Handle,formrgn);
deleteobject(formrgn);
Form1.height:=200;
form1.width:=Form1.height;
formrgn:=createroundrectrgn(1,1,Form1.height-1,form1.width-1,Form1.height,form1.width);
setwindowrgn(form1.Handle,formrgn,true);
Canvas.Pen.Color:=clblack;
Canvas.MoveTo(104,49);
canvas.LineTo(107,60);
end;