WMI - Feld aus OBjectSet lesen

[Gruber_Hans_12345]

Hallo
mal ne Frage wie lese ich ein einzelnes Feld aus einem ObjectSet raus? Mein Momentaner Weg ist mir etwas zu kompliziert.
Das Problem ist ich kennen den Feldnamen erst zur Laufzeit also ein

Delphi-Quellcode:

oEnum.MeinFeld

geht leider nicht

Das ist mein derzeieitger Code

Delphi-Quellcode:

        fWbemObjectSet  := WMIService.ExecQuery('SELECT '+FieldName+' FROM '+TableName, 'WQL', wbemFlagForwardOnly);
        oEnum           := IUnknown(fWbemObjectSet._NewEnum) as IEnumVariant;
        try
            while oEnum.Next(1, fWbemObject, iValue) = 0 do begin
                fProperties     := fWbemObject.Properties_;
                oEnumProp   := IUnknown(fProperties._NewEnum) as IEnumVariant;
                while oEnumProp.Next(1, fPropObj, iValueProp) = 0 do begin
                    if SameText(fPropObj.Name, FieldName) then begin
                        Value   := fPropObj.Value;
                        break;
                    end;
                end;
                break;
            end;

Ich möchte mir hier die Schleife um die properties sparen, wenn ich ja ganz genau weiss ich will FieldName auslesen.