如果我的txt文件包含与这些类似的行:
1.1, 0.1836856, 5.6
3.3, -5.5, 43.44
-0.38162, 6.636666E-08, 3.1
1.01516E-07, 0.3695395, 1.5
Run Code Online (Sandbox Code Playgroud)
如何将文件读入元组?
var reader = new StreamReader(File.OpenRead(@"C:\MyFile.txt"));
while (!reader.EndOfStream)
{
var line = reader.ReadLine();
var values = line.Split(',');
var val1 = decimal.Parse(values[0], System.Globalization.NumberStyles.Float);
var val2 = decimal.Parse(values[1], System.Globalization.NumberStyles.Float);
var val3 = values[2];
Tuple<decimal, decimal, string> myTuple = Tuple.Create<decimal, decimal, string>(val1, val2, val3);
}
Run Code Online (Sandbox Code Playgroud) 谁能告诉我在Delphi中这个vb代码的等价物是什么?
我需要使用:
ResetMyEvent: THandle; //??
Run Code Online (Sandbox Code Playgroud)
这些VB行从一个小型控制台应用程序复制.没有可视组件.
谢谢.
Module MyModule
Private WithEvents Obj As MyInterface
Private WaitForStartLibrary As AutoResetEvent = New AutoResetEvent(False)
Sub Main()
Obj.StartLibrary(param1, param2,...)
If WaitForStartLibrary.WaitOne(5000) = False Then//How can I do this w/out timer comp ?
Throw New Exception("Operation timed out")
End If
End Sub
//Event
Private Sub StartLibraryCallBack() Handles Obj.StartLibraryCallBack
WaitForStartLibrary.Set()
End Sub
Run Code Online (Sandbox Code Playgroud)