aboutsummaryrefslogtreecommitdiff
path: root/ShiftOS/File Saver.vb
diff options
context:
space:
mode:
authorTheUltimateHacker <[email protected]>2015-03-15 08:29:50 -0400
committerTheUltimateHacker <[email protected]>2015-03-15 08:29:50 -0400
commitc8d95621fb1f8ebab23cd7e3eeacb26b6e018e20 (patch)
tree791766c9fea12835ccabe1486138709460fb043f /ShiftOS/File Saver.vb
parent55795509e5170045772f9b6ae9060a33e65758df (diff)
downloadshiftos-c8d95621fb1f8ebab23cd7e3eeacb26b6e018e20.tar.gz
shiftos-c8d95621fb1f8ebab23cd7e3eeacb26b6e018e20.tar.bz2
shiftos-c8d95621fb1f8ebab23cd7e3eeacb26b6e018e20.zip
Advanced App Launcher added
A very beta Advanced App Launcher has been added. It's in a functional state, and I'm still working on it.
Diffstat (limited to 'ShiftOS/File Saver.vb')
-rw-r--r--ShiftOS/File Saver.vb4
1 files changed, 4 insertions, 0 deletions
diff --git a/ShiftOS/File Saver.vb b/ShiftOS/File Saver.vb
index bf7a0e3..dda9175 100644
--- a/ShiftOS/File Saver.vb
+++ b/ShiftOS/File Saver.vb
@@ -695,6 +695,7 @@ Public Class File_Saver
Case "artpad"
ArtPad.savelocation = lbllocation.Text & "/" & filename
ArtPad.saveimage()
+ ArtPad.canvasbitmap.Save("C:\ShiftOS\SoftwareData\AdvStart\Recent\" & txtfilename.Text & ".pic", Imaging.ImageFormat.Bmp)
ArtPad.needtosave = False
ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + ArtPad.codepointsearned
If ShiftOSDesktop.boughttitletext = True Then
@@ -710,6 +711,9 @@ Public Class File_Saver
Case "orcwrite"
OrcWrite.savepath = lbllocation.Text & "/" & filename
OrcWrite.savedocument()
+ Dim sw As New IO.StreamWriter("C:\ShiftOS\SoftwareData\AdvStart\Recent\" & txtfilename.Text + ".owd")
+ sw.Write(OrcWrite.RichTextBox1.Rtf)
+ sw.Close()
End Select
Me.Close()
End If