Eine Pow function gibt es in Xbase++ nicht (habe ich jedenfalls nicht gefunden)
Wie kann ich die letzte Zeile in Xbase++ umsetzen ?
sum=0;
Code: Alles auswählen
len=length(letters);
for(i=0;i<len;i++)
sum += ((letters[len-i-1])-'A'+1) * pow(26,i);
Moderator: Moderatoren
Code: Alles auswählen
len=length(letters);
for(i=0;i<len;i++)
sum += ((letters[len-i-1])-'A'+1) * pow(26,i);
Code: Alles auswählen
Function GetColumnNumber(ColName)
Local i := 0, ColNum := 0, expn := 0, nAnzahlChar := len(ColName)
IF nAnzahlChar < 1 .or. nAnzahlChar > 3
return ColNum
ENDIF
for i := nAnzahlChar TO 1 STEP -1
ColNum += (Asc(ColName[i]) - Asc('A') + 1) * (26 ^ expn)
expn ++
next
return Int(ColNum)