Скачать: CL | DM;

Как значение в Edit преобразовать в Hex значение.   Найти похожие ветки 

← →
Dima1   (2003-05-23 17:59) [0]

Есть некий TEdit. В его свойстве TEXT - есть строка, содержащая текст (код) например: AE34FD4B. Как мне этот текст поместить в регистр, например EAX процессора, чтобы он в нем оказался в таком же виде.

Может у кого есть готовая функция, буду признателен.
Спасибо.

---

← →
MBo ©   (2003-05-23 18:07) [1]

StrToInt("$"+edit.text)

---

← →
Skier ©   (2003-05-23 18:13) [2]

procedure HexTextToRegister(const AHexText: String;
const AUseHexPrefix : Boolean);
var
AInt : Integer;
begin
try
if AUseHexPrefix then AInt := StrToInt("$" + AHexText)
else AInt := StrToInt(AHexText);
asm
MOV EAX, AInt;
//.............
end; //asm
except
ShowMessage("Ошибка !");
end; //try
end; //HexTextToRegister


//.........................

HexTextToRegister("$0000FFFF", False);
HexTextToRegister("0000DFAE", True);

---

← →
MBo ©   (2003-05-23 18:21) [3]

>Skier
Есть гарантия, что после процедуры eax сохранится?

---

← →
Skier ©   (2003-05-23 18:26) [4]

>MBo © (23.05.03 18:21)
Нет.
Но ты после MOV EAX, AInt; видел многоточие ? :)

---

← →
MBo ©   (2003-05-23 18:31) [5]

понЯл
:)

---

← →
Anatoly Podgoretsky ©   (2003-05-23 18:41) [6]

При таком вопросе до EAX вряд ли вообще дело дойдет.

---

← →
Dima1   (2003-05-23 22:56) [7]

> Anatoly Podgoretsky
Ну вы приколист :)
Дойдет ! еще как дойдет ! Просто как то, не приходилось так делать.


> MBo Спасибо.

Что говорится: Век живи, век учись :)
В любом професионализме есть доля лоховства.


Спасибо тема закрыта !

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c