Форум: "Начинающим";
Текущий архив: 2007.08.19;
Скачать: [xml.tar.bz2];
Внизconvert vartostr Найти похожие ветки
← →
Новичеек (2007-07-23 23:43) [0]при использовании WMI, вытаскиваю из Win32_NetworkAdapterConfiguration данные. Строковые данные получаю в норме (кэпшены и имена,патчи и .т.п). При попытке вытащить ip выскакивает ошибка. Понимаю что Ip храниться не в виде строки,но как надо сконвертить, я не знаю.
Буду рад помощи:)
Could not convert variant of type (Array variant) into type (String)
Как решить эту проблему?
← →
bagos © (2007-07-24 00:02) [1]IPAddress
Data type: string array
Access type: Read-only
Array of all of the IP addresses associated with the current network adapter. Starting with Windows Vista, this property can contain either IPv6 addresses or IPv4 addresses. For more information, see IPv6 and IPv4 Support in WMI.
Example IPv6 address: "2010:836B:4179::836B:4179"
Windows Server 2003, Windows XP, Windows 2000, and Windows NT 4.0: This property contains addresses in IPv4 format.
Example: "172.16.22.0"
← →
Новичеек (2007-07-24 00:02) [2]IPAddress
Data type: string array
Access type: Read-only
Array of all of the IP addresses associated with the current network adapter. Starting with Windows Vista, this property can contain either IPv6 addresses or IPv4 addresses. For more information, see IPv6 and IPv4 Support in WMI.
Example IPv6 address: "2010:836B:4179::836B:4179"
Windows Server 2003, Windows XP, Windows 2000, and Windows NT 4.0: This property contains addresses in IPv4 format.
Example: "172.16.22.0"
← →
SlymRO © (2007-07-24 05:21) [3]На интерфейс можно навесить несколько IP функция возвращает массив этих IP, т.е. тебе нужно пробежаться по массиву аля Data[i] (незабудь что это VarArray)
← →
Новичеек (2007-07-24 11:09) [4]делаю так
var
V:Variant;
begin
If Sprop.Name = "IPAddress" then
V := VarArrayCreate([1, 4], varVariant);
For i:=1 to 4 do
begin
V[i] := VarToStr(Sprop.Get_Value);
end;
edit1.Text:=v[1]+v[2]+v[3]+v[4];
запутолся я короче
← →
SlymRO © (2007-07-24 11:50) [5]
var
V:Variant;
i:integer;
s:string;
begin
If Sprop.Name = "IPAddress" then
begin
s:=""
V:=Sprop.Get_Value;
for i:=VarArrayLowBound(v,1) to VarArrayHighBound(v,1) do
s:=s+"|"+v[i];
edit1.Text:=s;
end;
end;
← →
Но (2007-07-24 13:19) [6]Спасибо.
на интерфейсе один айпи так что хватает:
var
V:Variant;
begin
If Sprop.Name = "IPAddress" then
begin
V:=Sprop.Get_Value;
edit1.Text:=V[0];
end;
end;
Пытаюсь поменять IP:
var
vs:OleVariant;
begin
Vs[0] := "192.168.0.4";
If Sprop.Name = "IPAddress" then
Sprop.Set_Value(Vs);
вылезает ошибка, опять путаюсь с типами
← →
Но (2007-07-24 13:25) [7]на MSDN:
IPAddress
Data type: string array
Access type: Read-only
И че я ip не смогу поменять че за бред? :(
← →
Новичеек (2007-07-24 18:54) [8]на помощь пришел метод EnableStatic
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2007.08.19;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.044 c