<<How do I convert the following array to a string?
Does anyone have a Hex conversion routine or a link
they can point me to ?
a1: array[1..13] of Byte =
($68,$74,$74,$2E,$76,$65,$72,$69,$6E,$74,$6F,$2E,$63);
>>
The following works fine
const
a1: array[1..13] of char =
(chr($68),chr($74),chr($74),
chr($2E),chr($76),chr($65),
chr($72),chr($69),chr($6E),
chr($74),chr($6F),chr($2E),chr($63));
procedure TForm1.Button1Click(Sender: TObject);
begin
label1.Caption:=a1;
end;
-malcolm
_______________________________________________
Delphi mailing list -> [email protected]
http://www.elists.org/mailman/listinfo/delphi
