function IntToBin(Value: LongInt; Size: Integer): String;var  i: Integer;begin  Result:='';  for i:=Size-1 downto 0 do  begin    if Value and (1 shl i)<>0 then      Result:=Result+'1'    else      Result:=Result+'0';  end;end;//举例：procedure TForm1.Button1Click(Sender: TObject);var  i: Integer;  s: string;begin  for i := 0 to 255 do  begin    s := IntToStr(i) + #9;    s := s + IntToHex(i,2) + #9;    s := s + IntToBin(i,8);    Memo1.Lines.Add(s);  end;end;//结果:{0	00	000000001	01	000000012	02	000000103	03	000000114	04	000001005	05	000001016	06	000001107	07	000001118	08	000010009	09	0000100110	0A	0000101011	0B	0000101112	0C	0000110013	0D	0000110114	0E	0000111015	0F	0000111116	10	0001000017	11	0001000118	12	0001001019	13	0001001120	14	0001010021	15	0001010122	16	0001011023	17	0001011124	18	0001100025	19	0001100126	1A	0001101027	1B	0001101128	1C	0001110029	1D	0001110130	1E	0001111031	1F	0001111132	20	0010000033	21	0010000134	22	0010001035	23	0010001136	24	0010010037	25	0010010138	26	0010011039	27	0010011140	28	0010100041	29	0010100142	2A	0010101043	2B	0010101144	2C	0010110045	2D	0010110146	2E	0010111047	2F	0010111148	30	0011000049	31	0011000150	32	0011001051	33	0011001152	34	0011010053	35	0011010154	36	0011011055	37	0011011156	38	0011100057	39	0011100158	3A	0011101059	3B	0011101160	3C	0011110061	3D	0011110162	3E	0011111063	3F	0011111164	40	0100000065	41	0100000166	42	0100001067	43	0100001168	44	0100010069	45	0100010170	46	0100011071	47	0100011172	48	0100100073	49	0100100174	4A	0100101075	4B	0100101176	4C	0100110077	4D	0100110178	4E	0100111079	4F	0100111180	50	0101000081	51	0101000182	52	0101001083	53	0101001184	54	0101010085	55	0101010186	56	0101011087	57	0101011188	58	0101100089	59	0101100190	5A	0101101091	5B	0101101192	5C	0101110093	5D	0101110194	5E	0101111095	5F	0101111196	60	0110000097	61	0110000198	62	0110001099	63	01100011100	64	01100100101	65	01100101102	66	01100110103	67	01100111104	68	01101000105	69	01101001106	6A	01101010107	6B	01101011108	6C	01101100109	6D	01101101110	6E	01101110111	6F	01101111112	70	01110000113	71	01110001114	72	01110010115	73	01110011116	74	01110100117	75	01110101118	76	01110110119	77	01110111120	78	01111000121	79	01111001122	7A	01111010123	7B	01111011124	7C	01111100125	7D	01111101126	7E	01111110127	7F	01111111128	80	10000000129	81	10000001130	82	10000010131	83	10000011132	84	10000100133	85	10000101134	86	10000110135	87	10000111136	88	10001000137	89	10001001138	8A	10001010139	8B	10001011140	8C	10001100141	8D	10001101142	8E	10001110143	8F	10001111144	90	10010000145	91	10010001146	92	10010010147	93	10010011148	94	10010100149	95	10010101150	96	10010110151	97	10010111152	98	10011000153	99	10011001154	9A	10011010155	9B	10011011156	9C	10011100157	9D	10011101158	9E	10011110159	9F	10011111160	A0	10100000161	A1	10100001162	A2	10100010163	A3	10100011164	A4	10100100165	A5	10100101166	A6	10100110167	A7	10100111168	A8	10101000169	A9	10101001170	AA	10101010171	AB	10101011172	AC	10101100173	AD	10101101174	AE	10101110175	AF	10101111176	B0	10110000177	B1	10110001178	B2	10110010179	B3	10110011180	B4	10110100181	B5	10110101182	B6	10110110183	B7	10110111184	B8	10111000185	B9	10111001186	BA	10111010187	BB	10111011188	BC	10111100189	BD	10111101190	BE	10111110191	BF	10111111192	C0	11000000193	C1	11000001194	C2	11000010195	C3	11000011196	C4	11000100197	C5	11000101198	C6	11000110199	C7	11000111200	C8	11001000201	C9	11001001202	CA	11001010203	CB	11001011204	CC	11001100205	CD	11001101206	CE	11001110207	CF	11001111208	D0	11010000209	D1	11010001210	D2	11010010211	D3	11010011212	D4	11010100213	D5	11010101214	D6	11010110215	D7	11010111216	D8	11011000217	D9	11011001218	DA	11011010219	DB	11011011220	DC	11011100221	DD	11011101222	DE	11011110223	DF	11011111224	E0	11100000225	E1	11100001226	E2	11100010227	E3	11100011228	E4	11100100229	E5	11100101230	E6	11100110231	E7	11100111232	E8	11101000233	E9	11101001234	EA	11101010235	EB	11101011236	EC	11101100237	ED	11101101238	EE	11101110239	EF	11101111240	F0	11110000241	F1	11110001242	F2	11110010243	F3	11110011244	F4	11110100245	F5	11110101246	F6	11110110247	F7	11110111248	F8	11111000249	F9	11111001250	FA	11111010251	FB	11111011252	FC	11111100253	FD	11111101254	FE	11111110255	FF	11111111}