Thema: Delphi Bin2Hex - Probleme

Einzelnen Beitrag anzeigen

Amateurprofi

Registriert seit: 17. Nov 2005
Ort: Hamburg
1.077 Beiträge
 
Delphi XE2 Professional
 
#12

Re: Bin2Hex - Probleme

  Alt 25. Dez 2005, 11:34
Zitat von ichbins:
is das dann schneller? :gruebel:
shl im Assembler betrachtet multipliziert auch nur.
Michael,
oberflächlich betrachtet, kann man SHL als Multiplikation mit 2 (bzw. mit Potenzen von 2) ansehen, tatsächlich ist es aber etwas anderes und vor allem ist SHL viel schneller als eine Multiplikation.
Aber laß mal die nachstehende kleine Prozedur laufen und dann mach Dir Gedanken über die Ergebnisse.

Delphi-Quellcode:
PROCEDURE TMain.Test;
var a,b:integer; s:string;
begin
   a:=$10000000;
   repeat
      b:=a;
      a:=a shl 1;
      s:=s+IntToStr(b)+' SHL 1 = '+IntToStr(a)+#13;
   until a=0;
   ShowMessage(s);
end;
Was auch im Forum immer wieder diskutiert wird wird, ist Showmessage (o.Ä.) mit mehreren Zeilen durch einfügen von #13#10 (CRLF).
Wie oben ersichtlich reicht es völlig aus nur ein CR (#13) einzufügen. Ein einzelnes LF (#10) täte das Gleiche.

Gruß, Klaus
  Mit Zitat antworten Zitat