Форум: "Основная";
Текущий архив: 2003.01.13;
Скачать: [xml.tar.bz2];

Вниз

Str2Byte   Найти похожие ветки 

← →
Brat-2   (2003-01-02 21:34) [0]

В Паскале, помнится, была функция Str2Byte. Какой у нее аналог на Дельфях?

---

← →
TTCustomDelphiMaster   (2003-01-02 21:36) [1]

StrToInt или IntToStr?

---

← →
Brat-2   (2003-01-02 21:41) [2]

спасибо. Уже нашел:

Function Str2Byte(S:String):Byte;
VAR
VByte :Byte;
i :Byte;
Begin
VByte:=0;
For I:=1 To LENGTH(S) DO
VByte:=VByte OR ((Byte(S[LENGTH(S)-i+1])-48) SHL (i-1));
Result:=VByte;
End;

---

← →
Novice   (2003-01-02 23:44) [3]

2 Brat-2 (02.01.03 21:41)

> спасибо. Уже нашел
Далее в обратном порядке

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.01.13;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.008 c