StringToHex и обратно

[-Jack-]

Сообщение от Alex11223

Ну так заинклюдьте Билдеровский SysUtils или где там Copy находится.

Пробовал подключить SysUtils, результат всё такой же ... Функция Copy ссылается ( через Find Declaration ) на некий файл под названием xutility ...

Сообщение от Krok27

Чет как то сложно тут у вас.

 System::UnicodeString __fastcall IntToHex(int Value, int Digits)/* overload */;

уже возвращает строку.

Да по сути дела, при переводе строки в hex этой функцией и пользуюсь ... а вот в обратку - ступор ...

Сообщение от p51x

Людям хочется своих велосипедов... в стд тоже есть готовое.

Да ну эти велосипеды ... я поэтому и пишу тут - хочеЦа всё же, увидеть какие ли бо стандартные решения данного вопроса ...
А велосипедов море, гугл кучу всякой охинеи выдал уже ...

//-----------------------------------------------------------------------------
#ifndef HEXH
#define HEXH
//-----------------------------------------------------------------------------
#include <string>
#include <iostream.h>
//-----------------------------------------------------------------------------
AnsiString StrToHex(String Text) {
	AnsiString HexString;
	for(int i = 1; i <= Text.Length(); ++i)
		HexString += IntToHex(Text[i], 4);
	return HexString;
}
AnsiString HexToStr(String Text) {
	AnsiString OkString;
	String hex;
	for(int i = 1; i <= Text.Length(); i++) {
		hex+= Text[i];
		if (hex.Length() == 2) {
			OkString += wchar_t(StrToInt("0x"+hex));
			hex = "";
		}
	}
	return OkString;
}
#endif

Может кто-то скажет, что велосипед ... НО проще реализовать у меня не получается )

И ещё 1 вопрос:

String test = HexToStr(StrToHex("Привет!"));

Если в hex пробовать переводить символы русского алфавита, то в итоге в переменную test записывается абракадабра "♦▼♦@♦8♦2♦5♦B"

[Krok27]

Проверить надо, что ето число. Например:

StrToIntDef("Привет", -1);

Вернет -1.

[-Jack-]

Сообщение от Krok27

Проверить надо, что ето число. Например:

StrToIntDef("Привет", -1);

Вернет -1.

не понял ... в смысле ? К чем здесь эта функция ?

StrToIntDef проверяет, является первый параметр числом, если нет, то берёт по умолчанию 2ой параметр ...
"Привет" - числом не является, поэтому результат -1

[Krok27]

Если в hex пробовать переводить символы русского алфавита, то в итоге в переменную test записывается абракадабра "♦▼♦@♦8♦2♦5♦B"

StrToIntDef проверяет, является первый параметр числом, если нет, то берёт по умолчанию 2ой параметр ...
"Привет" - числом не является, поэтому результат -1

Соответственно можно проверить, если это не число, то и переводить его в хексы смысла нет.

[Аватар]

StrToIntDef

Лучше TryStrToInt если есть аналог в бюлдере

[Krok27]

Лучше TryStrToInt если есть аналог в бюлдере

Функции абсолютно идентичны, кроме возвращаемого значения, достаточно глянуть исходники.

[Аватар]

Функции абсолютно идентичны

Угу, но '-1' число, а по DEF-проверке - не число

[-Jack-]

Сообщение от Krok27

Соответственно можно проверить, если это не число, то и переводить его в хексы смысла нет.

А каким образом можно переводить строку ( кодировка, к примеру, cp1251 ) в HEX ?

[p51x]

Что вы под этим подразумеваете - перевод записанного в строке числа в хекс или перевод символов строки в хекс, соответсвующе их коду?

[-Jack-]

перевод символов строки в хекс, соответсвующе их коду