On 21 Feb 02, at21:03, wrote:
> #2: dec -> hex konverzio.
> ...
> i := 12345; s := '';
> while i>0 do begin
> s := s + a[i mod 16];
> i := i div 16;
> end;
Nem azert, de ranezesre ez forditott sorrendben csinalja meg az
eredmenyt. Nem tudok Delphi-ul, de feltehetoleg ha a kozepso sort
lecsereled ilyenre:
s := a[i mod 16] + s;
akkor jo lesz.
István
|