![]() |
Rave: Farbe eines DataText per Parameter ändern
Hallo,
ich verwende Rave und ändere mit Delphi die Rotation eines DataTextes. Programmtechnisch schaut das so aus: Delphi:
Delphi-Quellcode:
Rave (OnBeforePrint des DataText):
with RvProject do
begin Open; try //Text-Grad SetParam('S_TextGrad', S_Text_Grad); //ausführen Execute; finally Close; end; end;
Code:
Das funktioniert auch!
DataText1.Rotation := StrToInt(RaveProject.GetParam('S_TextGrad'));
Nun wollt ich die Farbe des DataText auf gleiche weise ändern:
Delphi-Quellcode:
Im OnBeforePrint des DataTextes dachte ich, ich könnte unter den anderen Code folgenden Code hinzufügen:
//Text-Farbe
SetParam('S_TextFarbe', S_Text_Farbe); //S_Text_Farbe ist eine String-Variable und beinhaltet z. B. clYellow
Code:
Sobald ich aber dann compilieren will, stürzt mit Rave (Version 5.0) ab?
DataText1.Color := RaveProject.GetParam('S_TextFarbe');
Wo ist der Fehler und wie kann man die Farbe per Parameter ändern? |
Re: Rave: Farbe eines DataText per Parameter ändern
Hast du mal probiert was passiert wenn du die Farbe direkt übergibst?
Delphi-Quellcode:
DataText1.Color := clRed;
|
DP-Maintenance
Dieses Thema wurde von "Matze" von "Programmieren allgemein" nach "Sonstige Fragen zu Delphi" verschoben.
Es geht um Delphi. |
Re: Rave: Farbe eines DataText per Parameter ändern
Zitat:
|
Re: Rave: Farbe eines DataText per Parameter ändern
so,
ich hab jetzt etwas rumgespielt und habs geschafft :hello: Delphi:
Delphi-Quellcode:
Im Rave-Designer (OnBeforePrint des DataText):
S_Text_Farbe: String;
{...} S_Text_Farbe := IntToStr(ColorBox_Text_Farbe.Selected); with RvProject do begin Open; try //Text-Farbe SetParam('S_TextFarbe', S_Text_Farbe); //ausführen Execute; finally Close; end; end;
Code:
Und schon funktionierts (aber nur mit den Farben die man auch im Rave-Designer einstellen kann)
DataText1.Color := StrToInt(RaveProject.GetParam('S_TextFarbe'));
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 22:04 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz