nanoedit - a mini notepad like text editor

I have been using this for some time now. I required a mini editor on
non-Windows platforms, so created this project to solve that.

This is also a testbed project for my "elastic tabstops" implementation.

1 files changed, 19 insertions, 0 deletions

diff --git a/examples/apps/nanoedit/testfiles/file2.pas b/examples/apps/nanoedit/testfiles/file2.pas
new file mode 100644
index 00000000..86144432
--- /dev/null
+++ b/examples/apps/nanoedit/testfiles/file2.pas
@@ -0,0 +1,19 @@
+{ **************************************
+	* oeu oe uoe uoeu	*
+	* oeu oe uoe uoeu	*
+	* oeu oe uoe uoeu	*
+	************************************** }
+procedure TMainForm.miOpenClick(Sender: TObject);
+var
+	dlg: TfpgFileDialog;
+begin
+	dlg := TfpgFileDialog.Create(nil);
+	try
+		if dlg.RunOpenFile then
+		begin
+			memEditor.Lines.LoadFromFile(dlg.FileName);
+		end;
+	finally
+		dlg.Free;
+	end;
+end;