Hi Leute,
Ich habe folgendes Problem: Ich speichere zunächst einen Farbwert (Hexadezimal) in einer Textdatei
writeln (save, TimeToStr(Now)+ '#' + HName + '#' + IntToStr(HFarbe) + '#' + BoolToStr(Schloss) + '#');
doch wenn ich den Wert wieder auslese und versuche einem Objekt diese Farbe zuzuweisen wird das Objekt schwarz...
Delphi-Quellcode:
repeat
begin
Fabezaehler := Fabezaehler + Zeile[Zaehler];
inc (Zaehler);
end;
until Zeile[Zaehler] = '#';
HalFarbe := StrToInt(Fabezaehler);
inc (Zaehler);
Panel1.Color := HalFarbe;
Beim Speichern wird das "$" abgeschnitten, daher vermute ich mal stark daß es daran liegt, aber wie integriere ich das wieder in meinen Farbwert?