dürfte denn sie allgemeinheit noch erfahren wie es gemacht wurde?
liege ich mit folgender Vermutung richtig?
Delphi-Quellcode:
j := 3;
st := 'AB';
SetLength(St2,300000);
for i := 1 to Length(St2) do
begin
if st[1] in ['0'..'9', 'A'..'F'] then
begin
St2[i]:=Char(StrToInt('$' + st[1] + st[2]));
inc(j, 1);
end;
end;