IDE: added fpc component TEventLog

git-svn-id: trunk@11796 -

.gitattributes

@@ -1972,6 +1972,8 @@ images/components/tdrawgrid.xpm -text svneol=native#image/x-xpixmap
 images/components/tedit.ico -text svneol=unset#image/x-icon
 images/components/tedit.xpm -text svneol=native#image/x-xpixmap
 images/components/teditbutton.xpm -text svneol=native#image/x-xpixmap
+images/components/teventlog.ico -text svneol=unset#image/ico
+images/components/teventlog.xpm svneol=native#text/plain
 images/components/tfilelistbox.xpm -text svneol=native#image/x-xpixmap
 images/components/tfilenamedit.xpm -text svneol=native#image/x-xpixmap
 images/components/tfilenameedit.xpm -text svneol=native#image/x-xpixmap

images/components/teventlog.xpm

@@ -0,0 +1,128 @@
+/* XPM */
+static char * tmemo_xpm[] = {
+"16 18 107 2",
+"  	c None",
+". 	c #848484",
+"+ 	c #7F7F81",
+"@ 	c #818088",
+"# 	c #86858D",
+"$ 	c #7C7B83",
+"% 	c #79787D",
+"& 	c #838385",
+"* 	c #7B7B7B",
+"= 	c #8E8F8A",
+"- 	c #777872",
+"; 	c #81827C",
+"> 	c #7B7C74",
+", 	c #7E7F79",
+"' 	c #757670",
+") 	c #91928D",
+"! 	c #8A8A8A",
+"~ 	c #FCFBFF",
+"{ 	c #FFFDFF",
+"] 	c #F6F3FF",
+"^ 	c #F8F7FF",
+"/ 	c #FFFEFF",
+"( 	c #FDFDFD",
+"_ 	c #FFFFFD",
+": 	c #FBFCF7",
+"< 	c #FEFFF9",
+"[ 	c #FEFFFA",
+"} 	c #FFFFFB",
+"| 	c #000000",
+"1 	c #FFFCFF",
+"2 	c #F4F1FF",
+"3 	c #F7F6FE",
+"4 	c #F7F7F7",
+"5 	c #FEFEFC",
+"6 	c #FAFAF8",
+"7 	c #F6F6F4",
+"8 	c #7C7C7C",
+"9 	c #020107",
+"0 	c #040019",
+"a 	c #FEFCFF",
+"b 	c #FDFCFF",
+"c 	c #F9F9FB",
+"d 	c #F8F8F8",
+"e 	c #FFFFFF",
+"f 	c #000002",
+"g 	c #7F7F7F",
+"h 	c #FEFBFF",
+"i 	c #F5F0FF",
+"j 	c #FEFAFF",
+"k 	c #FBF7FF",
+"l 	c #F3EFFF",
+"m 	c #F8F6FF",
+"n 	c #FEFDFF",
+"o 	c #FCFAFF",
+"p 	c #7E7E7E",
+"q 	c #FBF9FF",
+"r 	c #F9F8FF",
+"s 	c #F9F9FF",
+"t 	c #F9F7FF",
+"u 	c #FFFBFF",
+"v 	c #070513",
+"w 	c #0B092E",
+"x 	c #00000B",
+"y 	c #F9FAFF",
+"z 	c #F8F9FF",
+"A 	c #F7F9FF",
+"B 	c #F8F8FF",
+"C 	c #F3F4FF",
+"D 	c #FBFBFF",
+"E 	c #000004",
+"F 	c #F1F0FE",
+"G 	c #060709",
+"H 	c #F7F8FF",
+"I 	c #F7F7FF",
+"J 	c #F6F4FF",
+"K 	c #000009",
+"L 	c #0A0931",
+"M 	c #F6F6FF",
+"N 	c #FAFAFF",
+"O 	c #FCFDFF",
+"P 	c #05080D",
+"Q 	c #000007",
+"R 	c #FBFAFF",
+"S 	c #00000C",
+"T 	c #787878",
+"U 	c #FEFEFF",
+"V 	c #808080",
+"W 	c #FBFDFF",
+"X 	c #FAFDFF",
+"Y 	c #F8FEFF",
+"Z 	c #FBFEFF",
+"` 	c #F6F8FF",
+" .	c #FCFFFF",
+"..	c #FDFFFA",
+"+.	c #0E1204",
+"@.	c #FEFFFF",
+"#.	c #FBFFFF",
+"$.	c #FAFFFF",
+"%.	c #FBFFFC",
+"&.	c #FCFFFA",
+"*.	c #FAFDF2",
+"=.	c #000300",
+"-.	c #000100",
+";.	c #000200",
+">.	c #090D0C",
+",.	c #000201",
+"'.	c #040500",
+". + @ # $ % & * = - ; > , ' - ) ",
+"! ~ { ] { { ^ / ( _ : < [ } } | ",
+"* / 1 2 1 { { 3 / 4 _ _ 5 6 7 | ",
+"8 / 9 9 0 9 1 a b / c d e e e f ",
+"g { h i j k l h h m a b n o n 9 ",
+"p n q r r r r r r s t q m j u v ",
+"p n 9 9 9 9 9 9 9 9 9 9 9 w q x ",
+"p n y z A A A A B B r C o D n E ",
+"p n 9 9 9 9 9 9 9 9 9 9 c s F G ",
+"p n s ^ H H I I I I ^ J m o a K ",
+"p n 9 9 9 9 9 9 9 9 9 9 9 L M x ",
+"p n y B B B H H I H B z q N O P ",
+"p n 9 9 9 9 9 c c c 9 9 9 D y Q ",
+"g n R r r B B B ^ ^ J r t D D S ",
+"T U 9 9 9 9 9 9 9 9 9 9 9 9 O Q ",
+"V O W X W X X Y X X Z Z `  ...+.",
+". e @. . . . .#.#.#.$.$.%.&.*.=.",
+"8 f E E f -.-.;.;.;.-.>.,.-.'.-."};

packager/packagesystem.pas

@@ -1113,7 +1113,8 @@ begin
     AddFile(SetDirSeparators('db/db.pp'),'DB',pftUnit,[],cpBase);
     AddFile(SetDirSeparators('inc/process.pp'),'Process',pftUnit,[],cpBase);
     AddFile(SetDirSeparators('inc/simpleipc.pp'),'SimpleIPC',pftUnit,[],cpBase);
-    AddFile(SetDirSeparators('fcl/xml/xmlcfg.pp'),'XMLCfg',pftUnit,[],cpBase);
+    AddFile(SetDirSeparators('xml/xmlcfg.pp'),'XMLCfg',pftUnit,[],cpBase);
+    AddFile(SetDirSeparators('inc/eventlog.pp'),'EventLog',pftUnit,[],cpBase);
 
     // use the packager/units/lazaruspackageintf.o file as indicator,
     // if FCL has been recompiled

packager/registerfcl.pas

@@ -39,7 +39,7 @@ interface
 
 uses
   LazarusPackageIntf,
-  Classes, SysUtils, Process, DB, SimpleIPC, XMLCfg;
+  Classes, SysUtils, Process, DB, SimpleIPC, XMLCfg, EventLog;
 
 procedure Register;
 
@@ -65,12 +65,18 @@ begin
   RegisterComponents('System',[TXMLConfig]);
 end;
 
+procedure RegisterEventLog;
+begin
+  RegisterComponents('System',[TEventLog]);
+end;
+
 procedure Register;
 begin
   RegisterUnit('DB',@RegisterDB);
   RegisterUnit('Process',@RegisterProcess);
   RegisterUnit('SimpleIPC', @RegisterSimpleIPC);
   RegisterUnit('XMLCfg',@RegisterXMLCfg);
+  RegisterUnit('EventLog',@RegisterEventLog);
 end;
 
 end.