Einzelnen Beitrag anzeigen

Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.119 Beiträge
 
Delphi 11 Alexandria
 
#4

Re: brauche schnellstmöglich hilfe mit zahlensystem

  Alt 19. Mär 2004, 21:55
Moin Whooper,

Zitat von whopper:
damit kann der ja in der function nix anfangen
stimmt, ich hatte da was vergessen:

Delphi-Quellcode:
begin
  iRes := 0;
  for iFor := 1 to Length(edit1.text) do begin
    iRes := iRes * 16 +StrToInt('$'+Edit1.text[iFor]);
  end;
  edit2.text := inttostr(iRes);
end;
Mit hexadezimalen Ziffern kann Delphi nämlich etwas anfangen, wenn Du der Funktion mit dem Prefix $ mitteilst, dass es die Zahl als hexadezimal ansehen soll.
Siehe auch die zweite Lösung.
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat