Delphi 16진수 문자열 변환 12진수 32비트 정수
1485 단어 Delphi
기능 설명: 이 함수는 10진수를 16진수로 변환하는 데 사용됩니다.이 함수에는 두 개의 매개 변수가 있다.첫 번째 매개변수는 변환할 10진수 데이터이고, 두 번째 매개변수는 16진수 데이터를 표시하는 데 사용할 위치를 지정합니다.
인스턴스 참조: Edit1.Text := IntToHex('100', 2); 결과 수행, Edit1.Text는 64입니다.
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
begin
Label1.Caption := '';
for i := 1 to Length(Edit1.Text) do
begin
try
Label1.Caption :=
Label1.Caption +
SysUtils.IntToHex(Byte(Edit1.Text[i]),2) + ' ';
except
Beep;
end;
end;
end;참고: Delphi는 특정 16진수를 10진수로 변환하는 함수를 제공하지 않습니다.StrToInt 함수를 사용하여 이 기능을 수행할 수 있습니다.구체적인 코드는: I: = StrToInt('$'+'64')입니다.이때 I는 100이다.즉 '$' 를 더하면 '16진수' 를 '10진수' 로 변환할 수 있다.
procedure TForm1.Button1Click(Sender: TObject);
var
I: Integer;
J: Integer;
begin
I := StrToInt(Edit1.Text);
J := StrToInt(Edit2.Text);
ShowMessage(IntToStr(I + J));
end;
//십진수 16진수 var i: integer; str: string; begin i := 255; ShowMessage(IntToHex(I, 2));/FF2는 되돌아오는 위치를 표시한다//또한Formart에서도 십진수를 16진수로 출력하는 기능str:=Format('%.2x', [i]); ShowMessage(str);//FF 반환 결과는 IntTostr () 함수와 같음end;delphi는 16진수를 10진수로 바꾸는 함수를 제공하지 않지만, 우리는 10진수 앞에 16진수 기호 '$' 를 붙이고 StrToInt () 로 var str:string을 변환할 수 있습니다. int: integer; begin Str := 'FF'; int := StrToInt('$' + str); ShowMessage(IntToStr(int)); //255 end;
이 내용에 흥미가 있습니까?
현재 기사가 여러분의 문제를 해결하지 못하는 경우 AI 엔진은 머신러닝 분석(스마트 모델이 방금 만들어져 부정확한 경우가 있을 수 있음)을 통해 가장 유사한 기사를 추천합니다:
[Delphi] TStringBuilder그리고 꼭 사용해야만 할까? 그림처럼 Heap 영역에 "Hello" 공간을 생성하고 포인팅을 한다. "Hello World" 공간을 새로 생성한 후 포인팅을 하게 된다. 결국 "Hello" 라는 String 객체가 ...
텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
CC BY-SA 2.5, CC BY-SA 3.0 및 CC BY-SA 4.0에 따라 라이센스가 부여됩니다.
좋은 웹페이지 즐겨찾기
