diff --git a/backup/main.pas b/backup/main.pas
index 5593451..0bb84e0 100644
--- a/backup/main.pas
+++ b/backup/main.pas
@@ -963,6 +963,7 @@ end;
procedure TGUIForm.miD1FileClick(Sender: TObject);
begin
+ odDiskImages.FilterIndex := 1;
RepaintWindow;
HideM8;
if odDiskImages.Execute then
@@ -979,6 +980,7 @@ end;
procedure TGUIForm.miD2FileClick(Sender: TObject);
begin
+ odDiskImages.FilterIndex := 1;
RepaintWindow;
HideM8;
if odDiskImages.Execute then
diff --git a/backup/poc.lps b/backup/poc.lps
index 848d38e..d864157 100644
--- a/backup/poc.lps
+++ b/backup/poc.lps
@@ -21,8 +21,8 @@
-
-
+
+
@@ -67,123 +67,123 @@
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
diff --git a/main.lfm b/main.lfm
index 07313d9..79f1870 100644
--- a/main.lfm
+++ b/main.lfm
@@ -329,7 +329,6 @@ object GUIForm: TGUIForm
BevelOuter = bvNone
ClientHeight = 589
ClientWidth = 1014
- Color = clAqua
ParentColor = False
TabOrder = 2
object sidecarPanel: TPanel
diff --git a/poc.lps b/poc.lps
index d864157..696c2ba 100644
--- a/poc.lps
+++ b/poc.lps
@@ -21,8 +21,8 @@
-
-
+
+
@@ -67,123 +67,123 @@
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+