paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-03 00:38:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: added fpc component TEventLog

Browse Source 
git-svn-id: trunk@11796 -
This commit is contained in:
mattias 2007-08-12 11:18:12 +00:00
parent 619ed3c329
commit ef2055c607
6 changed files with 3820 additions and 4062 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
.gitattributes vendored
View File

@ -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

BIN
images/components/teventlog.ico Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.6 KiB

128
images/components/teventlog.xpm Normal file
View File

@ -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 -.-.;.;.;.-.>.,.-.'.-."};

7741
images/components_images.lrs
View File

File diff suppressed because it is too large Load Diff

3
packager/packagesystem.pas
View File

@ -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

8
packager/registerfcl.pas
View File

@ -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.