bernd > Können Sie mir bitte sagen, wie ich das umgekehrt mache? Also sprich von hexa in dezimal? Vielen Dank

MDHW2018 Das könnte helfen. Mirko

function hex2dec(hex : text) do
    let hexarray := split(hex, "");
    let hexarrayReversed := for i in range(length(hex) - 1, -1) do
            item(hexarray, i)
        end;
    let hexarrayNumber := for i in hexarrayReversed do
            switch i do
            case "A":
                "10"
            case "B":
                "11"
            case "C":
                "12"
            case "D":
                "13"
            case "E":
                "14"
            case "F":
                "15"
            default:
                i
            end
        end;
    let endArray := for i in range(0, length(hex)) do
            number(item(hexarrayNumber, i)) * pow(16, i)
        end;
    sum(endArray)
end;

Mirko Hallo Mirko, vielen Dank. Nur wie baue ich es ein? Ich habe z.B ein Textfeld: "hexa" wo gebe ich dieses Eingabefeld für den Hexadezimal in deinem Code an?

MDHW2018 Den Code kannst Du in die globalen Funktionen der Datenbank packen. In dem HEX Feld machst Du bei Trigger nach Änderung:

if HEX then
   DeinDecimalFeld := hex2dec(HEX)
end

Alternativ alles in den Trigger nach Änderung:

function hex2dec(hex : text) do
    let hexarray := split(hex, "");
    let hexarrayReversed := for i in range(length(hex) - 1, -1) do
            item(hexarray, i)
        end;
    let hexarrayNumber := for i in hexarrayReversed do
            switch i do
            case "A":
                "10"
            case "B":
                "11"
            case "C":
                "12"
            case "D":
                "13"
            case "E":
                "14"
            case "F":
                "15"
            default:
                i
            end
        end;
    let endArray := for i in range(0, length(hex)) do
            number(item(hexarrayNumber, i)) * pow(16, i)
        end;
    sum(endArray)
end;
if HEX then
  DeinDecimalFeld := hex2dec(HEX)
end

MDHW2018 Dort wo Du berechnen willst gibst Du die Funktion ein und danach hex2dec(hexa). Du kannst die Funktion als globale Funktion speichern, dann reicht es hex2dec(hexa) einzugeben.

Da es ein Textfeld ist, was Du übergibst, benötigst Du keine Anführungszeichen. Sonst geht z.B. hex2dec("FFA"). Mirko

MDHW2018 Ups. Patrick war schneller.

Mirko Sorry 

Patrick Danke hat geklappt 

Mirko  Danke hat geklappt