Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi colorpickers farben in hex umwandeln (https://www.delphipraxis.net/13618-colorpickers-farben-hex-umwandeln.html)

alanblack 22. Dez 2003 17:02


colorpickers farben in hex umwandeln
 
hi Leute,

habe ein Problem: ich hab die komponente "colorpicker" installiert und ich möchte das wenn man eine farbe auswählt (zb schwarz) das im synmemo der hex code angezeigt wird (in diesem Fall #000000)
könnt ihr mir vielleicht weiterhelfen?

mfg alanblack

Sanchez 22. Dez 2003 17:06

Re: colorpickers farben in hex umwandeln
 
Wenn der Colorpicker ein TColor liefert (wovon ich mal ausgehe) und dein Problem die Umwandlung von TColor zu einem Hex-String ist sollte dir dieser Thread weiterhelfen:
http://www.delphipraxis.net/internal...ct.php?t=12303

grüße, daniel

alanblack 22. Dez 2003 18:42

Re: colorpickers farben in hex umwandeln
 
hi Sanchez,

Danke für den Tipp, nur leider hilft er mir nicht weiter. ich glaube du hast nich so recht verstanden was ich meinte :?
also ich bastel an einen HTML Editor. Dieser soll komfortabel sein. Deshalb baue ich Werkzeug Tools ein. zb die Laufschrift, das funzt ja alles, aber man soll auch die Farbe der Lauschrift auswählen können. ich habe für die Laufschrift diesen code verwendet:
Delphi-Quellcode:
frmtextview.smemo.lines.add('<marquee>' + edit1.Text + '</marquee>');
ich könnte natürlich auch die ganzen Farben in eine combobox schreiben aber das is zu viel arbeit :-D

darum habe ich den Colorpicker installiert. wenn ich beispielsweise ich rot anklicke und den text soll im synmemo der script sein eben mit der farbe (code brauch ich ja jetz nich aufführen oder?)

Wie komme ich da am besten weiter? :gruebel:


Mit freundlichen Grüßen

alanblack

Sanchez 22. Dez 2003 19:18

Re: colorpickers farben in hex umwandeln
 
hallo,

Du willst doch nichts anderes als die Farbe aus dem Colorpicker an eine bestimmte Stelle im SynMemo einfügen.

Den Hexwert der Farbe als String bekommst du mit dieser Funktion (hab ich hier auch in nem anderen Thread schon mal geschrieben):

Delphi-Quellcode:
function Sto_ColorToHtml(const Color: TColor): String;
var
  iRgb: Longint;
  iHtml: Longint;
begin
  // convert system colors to rgb colors
  iRgb := ColorToRGB(Color);
  // change BBGGRR to RRGGBB
  iHtml := ((iRgb and $0000FF) shl 16) or // shift red to the left
           ( iRgb and $00FF00) or        // green keeps the place
           ((iRgb and $FF0000) shr 16);  // shift blue to the right
  // create the html string
  Result := '#' + IntToHex(iHtml, 6);
end;
Du liest die Farbe aus dem Colorpicker aus, schickst sie in diese Funktion und hast den richtigen HTML-Farb-String. Jetzt musst du den String noch ins SynEdit schreiben.

Welcher Punkt ist dir also unklar?

grüße, daniel

alanblack 22. Dez 2003 19:26

Re: colorpickers farben in hex umwandeln
 
re nochma,

muss ich das ins SynEdit schreiben (also im Highlither des HTML´s Editors) oder dort wo der Colorpicker is? ´bei mir also Laufschrift?
und dann wo muss ich es eintragen? Bei dem Button im onclick ereignis..?

sorry steh aufn schlauch :? :( :wall:

Sanchez 22. Dez 2003 19:57

Re: colorpickers farben in hex umwandeln
 
Ich hab keine Ahnung wie der Colorpicker aussieht, aber die wirds wohl ein Ereignis geben, wenn eine Farbe ausgewählt wird.
In diesem Event-Handler holst du die Farbe aus dem Colorpicker wandelst sie mit dem obigen Code in nen String um und schreibst sie ins SynEdit

alanblack 22. Dez 2003 20:05

Re: colorpickers farben in hex umwandeln
 
der Colorpicker sieht so aus:

http://www.ensacom.de/downloads/komp...olorpicker.gif

ich verstehe auch nicht warum ich das ins SynEdit schreiben soll... die laufschrift und das muss auch nicht ins synedit rein sondern in Laufschrift.pas
von dem button im onclick ereignis
ich habe keine ahnung wovon du sprichst

mfg alanblack

Sanchez 22. Dez 2003 20:18

Re: colorpickers farben in hex umwandeln
 
Ein Klick in den Colorpicker bewirkt doch, dass die Farbe ins SynEdit reingeschrieben wird, oder hab ich da was falsch verstanden?

alanblack 22. Dez 2003 20:38

Re: colorpickers farben in hex umwandeln
 
nö eigentlich nicht. du tust den colorpicker auf dein formular und kannst halt farben auswählen
und auch drauf klicken das wars. du musst ihn dir wie eine Combobox vorstellen.
oder halt ein button den man auf sein formular gezogen hat und dann kompilert (man kann auch draufklicken es passiert halt nur nix)
Weiß immer noch ned was ich machen soll :-(


mfg alanblack

Sanchez 22. Dez 2003 20:42

Re: colorpickers farben in hex umwandeln
 
Na klar passiert noch nix, du musst dazu schon was programmieren.
Was soll den nun passieren, wenn du draufklickst?


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:41 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz