名前
題名
▼ Mr.XRAYさん > どちらが難解か ? > > function TForm1.GetWMIPropSetEnum(ASQLText: WideString): IEnumVariant; > var > LISWbemLocator : ISWbemLocator; > LISWbemService : ISWbemServices; > LSWbemObjectSet : ISWbemObjectSet; > begin > LISWbemLocator := CoSWbemLocator.Create; > LISWbemService := LISWbemLocator.ConnectServer( > '', 'root\cimv2', '', '', '', '', 0, nil); > > LSWbemObjectSet := LISWbemService.ExecQuery( > 'Select * From ' + ASQLText, 'WQL', wbemFlagReturnImmediately, nil); > > Result := LSWbemObjectSet._NewEnum as IEnumVariant; > end;
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link