Código Delphi [-] Memo1.Font.Name := 'system'; Memo1.Clear; for i := 0 to 256 do Memo1.Lines.Add(inttostr(i) + ' ' + Format('%2x',[i]) + ' ' + char(i));
Memo1.Font.Name := 'system'; Memo1.Clear; for i := 0 to 256 do Memo1.Lines.Add(inttostr(i) + ' ' + Format('%2x',[i]) + ' ' + char(i));