GetCurrentDir()

 
Memo1->Clear();
Memo1->Lines->Add(GetCurrentDir());
Memo1->Lines->Add(Application->ExeName);




原文地址:https://www.cnblogs.com/xe2011/p/0dbe9dde9670d7827ec23e5c5b72adbc.html