diff --git a/examples/imagelist/unit1.pas b/examples/imagelist/unit1.pas
index 437b6cc811..dc02b2fb5d 100644
--- a/examples/imagelist/unit1.pas
+++ b/examples/imagelist/unit1.pas
@@ -70,8 +70,8 @@ end;
 
 procedure TForm1.FormCreate(Sender: TObject);
 begin
-  AddFile(ExtractFilePath(ParamStrUTF8(0)) + 'images\edit-clear.png');
-  AddFile(ExtractFilePath(ParamStrUTF8(0)) + 'images\edit-find-replace.png');
+  AddFile(ExtractFilePath(ParamStrUTF8(0)) + SetDirSeparators('images\edit-clear.png'));
+  AddFile(ExtractFilePath(ParamStrUTF8(0)) + SetDirSeparators('images\edit-find-replace.png'));
 end;
 
 procedure TForm1.Button1Click(Sender: TObject);
diff --git a/examples/lazintfimage/mainunit1.pas b/examples/lazintfimage/mainunit1.pas
index bf3e2a3c56..cee762a2c1 100644
--- a/examples/lazintfimage/mainunit1.pas
+++ b/examples/lazintfimage/mainunit1.pas
@@ -51,7 +51,7 @@ end;
 procedure TForm1.Form1Create(Sender: TObject);
 begin
   SampleBitmapABitmap:=TBitmap.Create;
-  SampleBitmapABitmap.LoadFromFile(SetDirSeparators('../../images/lazarusform.bmp'));
+  SampleBitmapABitmap.LoadFromFile(SetDirSeparators('../../images/LazarusForm.bmp'));
 end;
 
 procedure TForm1.Form1Destroy(Sender: TObject);