summaryrefslogtreecommitdiff
path: root/lowlevelunit.pas
diff options
context:
space:
mode:
Diffstat (limited to 'lowlevelunit.pas')
-rw-r--r--lowlevelunit.pas8
1 files changed, 8 insertions, 0 deletions
diff --git a/lowlevelunit.pas b/lowlevelunit.pas
index a113835..e9991ed 100644
--- a/lowlevelunit.pas
+++ b/lowlevelunit.pas
@@ -64,6 +64,7 @@ function andFarben(a,b: tRGB): tRGB;
function wertZuFarbe(x: extended; p: tRGBArray): tRGB;
function tFPColor2tRgb(c: tFPColor): tRGB;
function tRgb2tFPColor(c: tRGB): tFPColor;
+function rgb(r,g,b: byte): tRGB; inline;
procedure myDebugLnThreadLog(s: string);
procedure cleanupLogs;
procedure cleanupLog(tid: PtrUInt);
@@ -487,6 +488,13 @@ begin
result.blue:=c.rgbBlue;
end;
+function rgb(r,g,b: byte): tRGB;
+begin
+ result.rgbRed:=r;
+ result.rgbGreen:=g;
+ result.rgbBlue:=b;
+end;
+
procedure myDebugLnThreadLog(s: string);
var f: textfile;
id: PtrUInt;