From cf46073776ace9fbb1d3a4357f6c7a00c99ae318 Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Fri, 7 Dec 2007 03:06:31 +0000
Subject: [PATCH] PopupNotifier package - fix compilation - add component image
 from A.J. Venter

git-svn-id: trunk@13195 -
---
 .gitattributes                              |   2 ++
 components/popupnotifier/popupnotifier.lrs  |  11 +++++++++++
 components/popupnotifier/popupnotifier.pas  |  14 ++++++++++----
 components/popupnotifier/tpopupnotifier.png | Bin 0 -> 226 bytes
 4 files changed, 23 insertions(+), 4 deletions(-)
 create mode 100644 components/popupnotifier/popupnotifier.lrs
 create mode 100644 components/popupnotifier/tpopupnotifier.png

diff --git a/.gitattributes b/.gitattributes
index 028d32371d..91b8c47a68 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -611,9 +611,11 @@ components/popupnotifier/demo/popupnotifierdemo.lpr svneol=native#text/plain
 components/popupnotifier/demo/unit1.lfm svneol=native#text/plain
 components/popupnotifier/demo/unit1.lrs svneol=native#text/plain
 components/popupnotifier/demo/unit1.pas svneol=native#text/plain
+components/popupnotifier/popupnotifier.lrs svneol=native#text/pascal
 components/popupnotifier/popupnotifier.pas svneol=native#text/plain
 components/popupnotifier/popupnotifierlaz.lpk svneol=native#text/plain
 components/popupnotifier/popupnotifierlaz.pas svneol=native#text/plain
+components/popupnotifier/tpopupnotifier.png -text svneol=unset#image/png
 components/prettyformat/languages/pfidesource.de.po svneol=native#text/plain
 components/prettyformat/languages/pfidesource.fr.po svneol=native#text/plain
 components/prettyformat/languages/pfidesource.id.po svneol=native#text/plain
diff --git a/components/popupnotifier/popupnotifier.lrs b/components/popupnotifier/popupnotifier.lrs
new file mode 100644
index 0000000000..2ed4d76918
--- /dev/null
+++ b/components/popupnotifier/popupnotifier.lrs
@@ -0,0 +1,11 @@
+LazarusResources.Add('tpopupnotifier','PNG',[
+  #137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#24#0#0#0#24#8#6#0#0#0#224'w='#248#0
+  +#0#0#9'pHYs'#0#0#11#18#0#0#11#18#1#210#221'~'#252#0#0#0#148'IDATH'#137#213'V'
+  +#209#10#192' '#8#212#209''#213#167#237#211#236#203#220#195#152'lR'#27#146'6'
+  +#186#151'"'#227#206'S'#131#144#153'!'#18'[(;'#0#164'Z'#209#221'B'#206#231'Z+'
+  +'@'#210#193'B'#187#236#169#236':l'#6#18#129'8'#184#147'{'#137#136'@'#139'\'
+  +#139#148'b#'''#154#209'd'#203'e"'#187#128'8'#232#213'z'#180#7#143#18'i2'#247
+  +')'#138#192#220'&['#199'P'#163'5'#4#233#235#194'('#220#28#244#146'['#195#193
+  +'[bk8'#184#240#203#20#133'?'#180'p'#1'df@D9'#240#254'e`'#244#183#229#0'?'#229
+  +'8'#183't~'#235'W'#0#0#0#0'IEND'#174'B`'#130
+]);
diff --git a/components/popupnotifier/popupnotifier.pas b/components/popupnotifier/popupnotifier.pas
index 943023ea24..edfc91fffb 100644
--- a/components/popupnotifier/popupnotifier.pas
+++ b/components/popupnotifier/popupnotifier.pas
@@ -26,7 +26,11 @@ interface
 
 uses
   Classes, SysUtils, Forms, Controls, Graphics, Dialogs, ExtCtrls,
-  Buttons, StdCtrls;
+  Buttons, StdCtrls
+{$ifdef fpc}
+  , LResources
+{$endif}
+;
 
 type
   { TNotifierXButton }
@@ -302,7 +306,6 @@ end;
 *******************************************************************}
 procedure TNotifierForm.HandlePaint(Sender: TObject);
 begin
-  Canvas.Color := Color;
   Canvas.Brush.Style := bsSolid;
   Canvas.Brush.Color := Color;
   Canvas.FillRect(Rect(0,0,width,height));
@@ -428,6 +431,9 @@ begin
   vNotifierForm.Show;
 end;
 
+initialization
+{$ifdef fpc}
+  {$i popupnotifier.lrs}
+{$endif}
+
 end.
-
-
diff --git a/components/popupnotifier/tpopupnotifier.png b/components/popupnotifier/tpopupnotifier.png
new file mode 100644
index 0000000000000000000000000000000000000000..facd3738e7a9d1fb32908cde7bd059561ceb46f9
GIT binary patch
literal 226
zcmeAS@N?(olHy`uVBq!ia0vp^5+KaM1|%Pp+x`GjoCO|{#S9GGLLkg|>2BR0px_iw
z7sn8f&Z}V;xeh3BT)9|(b@|)NZ%*GiJR>JadXm|$=}M2!1vgKasVEe!Va>24>f&9e
zbI+r+9WEVo+Wltb8><{Pp+<`xldC&B9J*t=rz9z>&$^g$I#p?RgT;%hRa@Bmg))u4
zYjz#DqZWNUV6iF7%h!iA?#O(Z6n*$$bW*m(jt{3rTJ5(KFs7tAxLAJpmzwZp`%?z{
Xrxx2w>RyKf-N)eR>gTe~DWM4f{mxu8

literal 0
HcmV?d00001