Poniżej przykład jak można to zrealizować.
Działa domyślna ścieżka i multiselect (opcjonalnie).
Niestety okno nie jest modalne.
Załącznik:
hmopenfile01.jpg [ 98.86 KiB | Przeglądany 6604 razy ]
Załącznik:
hmopenfile02.jpg [ 63.78 KiB | Przeglądany 6604 razy ]
Można dalej rozbudować ten skrypt o przykładowo nadawanie tytułu okna, różnego rodzaju validacje itp... . W sumie o to wszystko co daje nam OpenFileDialog w C#
https://msdn.microsoft.com/pl-pl/librar ... 10%29.aspxMoże uda Wam się to jakoś udoskonalić.
Kod:
int sub OpenFileDialog(string DomyslnyKatalog, string MaskiPlikow, int WybierzWiele, mapValue mvWybranePliki)
mvWybranePliki.Clear()
dispatch fso = "Scripting.FileSystemObject"
dispatch ws = "WScript.Shell"
dispatch fld
dispatch sfld
// Katalog .NET - wymagamy wersji 4
string netFolder = ws.RegRead("HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\NET Framework Setup\\NDP\\v4\\Full\\InstallPath")
// zapisanie skryptu z zasobów do pliku Dialog.tmp
int iSkrypt = open Katalog()+"Dialog.cs" for output
string sLinia
while zasoby(czytaj, sLinia)
print #iSkrypt; sLinia
wend
Close(iSkrypt)
// kompilacja skryptu do dialog.exe
ws.Run(netFolder + "csc.exe /out:" + Katalog() + "Dialog.exe " + Katalog() + "Dialog.cs",0,1)
// Wywołanie Dialog.exe z parametrami
ws.Run((using Katalog() + "Dialog.exe \"%s\" \"%s\" \"%d\" \"%s\" \"%l\"", DomyslnyKatalog, MaskiPlikow, WybierzWiele, CurrentUser(),GetMainWindowHwnd() ),0,1)
// odczyt listy polików z dialog.files
int iWynik = open Katalog()+"Dialog_"+CurrentUser()+".files" for input
while (Input #iWynik,sLinia)
mvWybranePliki.Set( sLinia, 0 )
wend
endsub
// deklaracji mapy na wynik działania
mapValue mvListaPlikow
mvListaPlikow.Type(int)
// wywołanie okna
OpenFileDialog("c:\\windows","Handel (*.hm)|*.txt|All files (*.*)|*.*",1,mvListaPlikow)
// wypisanie wyniku
int i
for i = 1 to i > mvListaPlikow.Size()
print mvListaPlikow.GetKey(i)
next i
zasoby:
using System;
using System.ComponentModel;
using System.Drawing;
using System.Windows.Forms;
using System.Runtime.InteropServices;
using System.IO;
namespace FormOpenFileDialog
{
public class Form1 : Form
{
public class WindowWrapper : System.Windows.Forms.IWin32Window
{
public WindowWrapper(IntPtr handle)
{
_hwnd = handle;
}
public IntPtr Handle
{
get { return _hwnd; }
}
private IntPtr _hwnd;
}
public string sPath;
[DllImport("kernel32.dll")]
static extern IntPtr GetConsoleWindow();
[DllImport("user32.dll")]
static extern bool ShowWindow(IntPtr hWnd, int nCmdShow);
IntPtr hSymfonia;
int iSymfonia;
const int SW_HIDE = 0;
const int SW_SHOW = 5;
public Form1()
{
this.Load += new EventHandler(form1_Load);
}
private void form1_Load(object sender, EventArgs e)
{
string[] args = Environment.GetCommandLineArgs();
iSymfonia = Convert.ToInt32(args[5]);
hSymfonia = (IntPtr)iSymfonia;
WindowWrapper wrapper = new WindowWrapper(hSymfonia);
string appPath = Path.GetDirectoryName(Application.ExecutablePath);
StreamWriter tofile = new StreamWriter(appPath + "\\Dialog_"+ args[4] +".files");
OpenFileDialog openFileDialog1 = new OpenFileDialog();
openFileDialog1.InitialDirectory = args[1];
openFileDialog1.Filter = args[2];
openFileDialog1.FilterIndex = 2;
openFileDialog1.RestoreDirectory = true;
if (args[3] == "1") {
openFileDialog1.Multiselect = true;
}
else
{
openFileDialog1.Multiselect = false;
}
if (openFileDialog1.ShowDialog(wrapper) == DialogResult.OK)
{
foreach (String file in openFileDialog1.FileNames)
{
tofile.WriteLine(file);
}
tofile.Close();
}
this.Close();
}
[STAThread]
static void Main()
{
var handle = GetConsoleWindow();
ShowWindow(handle, SW_HIDE);
Application.EnableVisualStyles();
Application.SetCompatibleTextRenderingDefault(false);
Application.Run(new Form1());
}
}
}