외부선언
function MyThread(P:pointer):LongInt;StdCall;
호출
var
hThread:THandle;
ThreadID:DWORD;
hThread:=CreateThread(nil,0,@MyThread,nil,0,ThreadID);
function MyThread(P:pointer):LongInt;StdCall;
var
strlst1 : TStringList;
begin
strlst1.LoadFromFile(Main_F.OpenDialog1.FileName); //access violation 이 터지는데?
end;