Announcement

Collapse
No announcement yet.

String in TColor umwandeln ?

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • String in TColor umwandeln ?

    Man kann doch einem Formular eine Farbe zuweisen.

    Ich möchte folgendes tun:
    Aus einer INI den HTMLcode für eine Farbe einlesen und ihn an das Formular weitergeben.

    etwa so:
    <b>Form1.color:='$0'+ReadString('Backgroudcolor',' HTMLcode','');</b>

    Die ini sieht etwa so aus:
    [Backgroudcolor]
    HTMLcode=F000000

    Sind aber inkompatible Typen Tcolor und String.

    Wie kann ich das umwandeln.
    Gibt es eine Einfachere Lösung ?

    Vielen Dank im vorraus.

    ciao eure barley

  • #2
    Hallo,

    wenn der Farbwert als Zeichenkette aus der INI ausgelesen werden soll, muss vorher eine Umwandlung in einen Integer erfolgen, wie das Beispiel demonstriert:
    <pre>
    procedure TForm1.Button1Click(Sender: TObject);
    var
    sColor : String;
    iColor : Integer;
    begin
    sColor := '65280';
    iColor := StrToInt(sColor);
    Form1.Color := iColor;
    end;
    </pre>
    Anstelle der HEX-Zahlen ist es in diesem Fall effektiver, mit den entsprechenden Integer-Zahler der Farben zu hantieren. Über eine einfache Zuweisung der Hexzahl an eine Integer-Variable lässt sich schnell nachschauen, welche Zahlen verwendet werden müssen

    Comment


    • #3
      <b>Vielen Dank</b>

      ciao eure barle

      Comment

      Working...
      X