summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2015-11-28 23:24:06 +0100
committerErich Eckner <git@eckner.net>2015-11-28 23:24:06 +0100
commit3c496e2513ccca77fa20d8fcbc31b7e1222e9601 (patch)
tree74e62875a30cb41e9738726e671791551f62893f
parent4d75a1c29c3f0e54043a836662763b5b3d3f713e (diff)
downloadEmails-3c496e2513ccca77fa20d8fcbc31b7e1222e9601.tar.xz
verwendet jetzt mplayer, kleine Ă„nderungen
-rw-r--r--.gitignore2
-rwxr-xr-xemailsbin19908416 -> 0 bytes
-rw-r--r--emails.lpi1
-rw-r--r--emails.lps113
-rw-r--r--unit1.lfm2
-rw-r--r--unit1.pas2
6 files changed, 62 insertions, 58 deletions
diff --git a/.gitignore b/.gitignore
index 0ec6f30..d113097 100644
--- a/.gitignore
+++ b/.gitignore
@@ -3,7 +3,7 @@
*.o
*.tar.gz
*~
-Emails
+emails
lib
Log*
socket
diff --git a/emails b/emails
deleted file mode 100755
index fbdff04..0000000
--- a/emails
+++ /dev/null
Binary files differ
diff --git a/emails.lpi b/emails.lpi
index 32a0c91..9d3caa8 100644
--- a/emails.lpi
+++ b/emails.lpi
@@ -41,6 +41,7 @@
<Filename Value="unit1.pas"/>
<IsPartOfProject Value="True"/>
<ComponentName Value="Form1"/>
+ <HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="Unit1"/>
</Unit1>
diff --git a/emails.lps b/emails.lps
index a3942ed..a01cd53 100644
--- a/emails.lps
+++ b/emails.lps
@@ -9,35 +9,36 @@
<IsPartOfProject Value="True"/>
<EditorIndex Value="-1"/>
<CursorPos Y="7"/>
- <UsageCount Value="20"/>
+ <UsageCount Value="21"/>
</Unit0>
<Unit1>
<Filename Value="unit1.pas"/>
<IsPartOfProject Value="True"/>
<ComponentName Value="Form1"/>
+ <HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="Unit1"/>
- <TopLine Value="169"/>
- <CursorPos X="30" Y="73"/>
- <UsageCount Value="20"/>
+ <IsVisibleTab Value="True"/>
+ <TopLine Value="173"/>
+ <CursorPos X="20" Y="180"/>
+ <UsageCount Value="21"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
</Unit1>
<Unit2>
- <Filename Value="Hashes.pas"/>
- <EditorIndex Value="-1"/>
- <TopLine Value="85"/>
- <UsageCount Value="10"/>
- </Unit2>
- <Unit3>
<Filename Value="../units/popunit.pas"/>
<IsPartOfProject Value="True"/>
- <IsVisibleTab Value="True"/>
<EditorIndex Value="1"/>
- <TopLine Value="348"/>
- <CursorPos Y="369"/>
- <UsageCount Value="20"/>
+ <TopLine Value="354"/>
+ <CursorPos X="69" Y="381"/>
+ <UsageCount Value="21"/>
<Loaded Value="True"/>
+ </Unit2>
+ <Unit3>
+ <Filename Value="Hashes.pas"/>
+ <EditorIndex Value="-1"/>
+ <TopLine Value="85"/>
+ <UsageCount Value="10"/>
</Unit3>
<Unit4>
<Filename Value="/usr/lib/fpc/src/packages/fcl-process/src/process.pp"/>
@@ -49,7 +50,7 @@
<Unit5>
<Filename Value="../units/mystringlistunit.pas"/>
<EditorIndex Value="2"/>
- <TopLine Value="192"/>
+ <TopLine Value="42"/>
<CursorPos Y="42"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
@@ -65,123 +66,123 @@
<JumpHistory Count="30" HistoryIndex="29">
<Position1>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="400" Column="21" TopLine="372"/>
+ <Caret Line="433" Column="16" TopLine="416"/>
</Position1>
<Position2>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="404" Column="17" TopLine="372"/>
+ <Caret Line="55" TopLine="21"/>
</Position2>
<Position3>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="405" Column="24" TopLine="372"/>
+ <Caret Line="548" Column="70" TopLine="521"/>
</Position3>
<Position4>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="414" Column="15" TopLine="379"/>
+ <Caret Line="265" Column="3" TopLine="245"/>
</Position4>
<Position5>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="425" Column="27" TopLine="397"/>
+ <Caret Line="48" Column="29" TopLine="5"/>
</Position5>
<Position6>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="428" Column="19" TopLine="397"/>
+ <Caret Line="99" Column="15" TopLine="77"/>
</Position6>
<Position7>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="430" TopLine="397"/>
+ <Caret Line="152" Column="33" TopLine="130"/>
</Position7>
<Position8>
- <Filename Value="unit1.pas"/>
- <Caret Line="89" Column="18" TopLine="83"/>
+ <Filename Value="../units/popunit.pas"/>
+ <Caret Line="157" Column="30" TopLine="135"/>
</Position8>
<Position9>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="53" Column="15" TopLine="32"/>
+ <Caret Line="18" Column="33"/>
</Position9>
<Position10>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="433" Column="16" TopLine="416"/>
+ <Caret Line="98" TopLine="76"/>
</Position10>
<Position11>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="55" TopLine="21"/>
+ <Caret Line="149" TopLine="127"/>
</Position11>
<Position12>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="548" Column="70" TopLine="521"/>
+ <Caret Line="181" TopLine="160"/>
</Position12>
<Position13>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="265" Column="3" TopLine="245"/>
+ <Caret Line="199" TopLine="178"/>
</Position13>
<Position14>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="48" Column="29" TopLine="5"/>
+ <Caret Line="204" TopLine="183"/>
</Position14>
<Position15>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="99" Column="15" TopLine="77"/>
+ <Caret Line="312" TopLine="272"/>
</Position15>
<Position16>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="152" Column="33" TopLine="130"/>
+ <Caret Line="233" TopLine="213"/>
</Position16>
<Position17>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="157" Column="30" TopLine="135"/>
+ <Caret Line="270" TopLine="249"/>
</Position17>
<Position18>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="234" Column="12" TopLine="346"/>
+ <Caret Line="286" TopLine="265"/>
</Position18>
<Position19>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="18" Column="33"/>
+ <Caret Line="302" TopLine="281"/>
</Position19>
<Position20>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="98" TopLine="76"/>
+ <Caret Line="318" TopLine="297"/>
</Position20>
<Position21>
- <Filename Value="../units/popunit.pas"/>
- <Caret Line="149" TopLine="127"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="181" Column="39" TopLine="172"/>
</Position21>
<Position22>
- <Filename Value="../units/popunit.pas"/>
- <Caret Line="181" TopLine="160"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="182" TopLine="172"/>
</Position22>
<Position23>
- <Filename Value="../units/popunit.pas"/>
- <Caret Line="199" TopLine="178"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="178" TopLine="169"/>
</Position23>
<Position24>
- <Filename Value="../units/popunit.pas"/>
- <Caret Line="204" TopLine="183"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="179" TopLine="169"/>
</Position24>
<Position25>
- <Filename Value="../units/popunit.pas"/>
- <Caret Line="312" TopLine="272"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="189" TopLine="169"/>
</Position25>
<Position26>
- <Filename Value="../units/popunit.pas"/>
- <Caret Line="233" TopLine="213"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="178" TopLine="169"/>
</Position26>
<Position27>
- <Filename Value="../units/popunit.pas"/>
- <Caret Line="270" TopLine="249"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="191" TopLine="169"/>
</Position27>
<Position28>
- <Filename Value="../units/popunit.pas"/>
- <Caret Line="286" TopLine="265"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="196" TopLine="169"/>
</Position28>
<Position29>
- <Filename Value="../units/popunit.pas"/>
- <Caret Line="302" TopLine="281"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="197" TopLine="169"/>
</Position29>
<Position30>
- <Filename Value="../units/popunit.pas"/>
- <Caret Line="318" TopLine="297"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="198" TopLine="169"/>
</Position30>
</JumpHistory>
</ProjectSession>
diff --git a/unit1.lfm b/unit1.lfm
index e391902..0ca6924 100644
--- a/unit1.lfm
+++ b/unit1.lfm
@@ -85,7 +85,9 @@ object Form1: TForm1
Top = 596
Width = 86
Caption = 'Ton geben'
+ Checked = True
OnClick = CheckBox1Click
+ State = cbChecked
TabOrder = 3
end
object TrayIcon1: TTrayIcon
diff --git a/unit1.pas b/unit1.pas
index f61a2c9..5871981 100644
--- a/unit1.pas
+++ b/unit1.pas
@@ -201,7 +201,7 @@ begin
setlength(argumente,1);
argumente[0]:=extractFilePath(application.exename)+'gotmail.wav';
ausgabe:='';
- runCommand('play',argumente,ausgabe);
+ runCommand('mplayer',argumente,ausgabe);
setlength(argumente,0);
end;
end;