Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  AW: Problem mit TColor

   
    by Sir Rufo, 6. Sep 2010
  Damit das Umrechnen zwischen den einzelnen Zahlensystemen einfacher wird habe ich da mal einen Record zusammengebastelt.
  Damit kannst du zwischen den Zahlensystemen 2..36 hin und herrechnen.
  unit uBaseConv;
  
  interface
  
  type
  TIntBase = record
  private
  function GetAsBase( Base : Integer ) : string;
• Forum: Sonstige Fragen zu Delphi

  AW: Problem mit TColor

   
    by Sir Rufo, 5. Sep 2010
  Wenn du 00000100 schreibst, dann ist das ein Integer mit dem Wert 100.
  Von den führenden Nullen lässt sich der Compiler nicht beeindrucken.
• Forum: Sonstige Fragen zu Delphi

  AW: Problem mit TColor

   
    by Sir Rufo, 5. Sep 2010
  So kannst du es versuchen
  function ColorFromRGB( const RValue, GValue, BValue : Byte ) : TColor;
  begin
  Result := TColor( ( BValue shl 8 + GValue ) shl 8 + RValue );
  end;
  
  
  Dein Konstrukt Integer( '00001010000100010010001' ) ergibt eigentlich nichts Substantielles
  Vor allem, woher soll der Compiler wissen, dass es sich hierbei um eine Binär-Kodierung handelt?
  Könnte ja jedes beliebige...