In the header file plus #include "inifiles.hpp" // read and write text file // - write text file // --------------------- ------------------------------- void __fastcall tform1 :: button1click (TOBJECT * Sender) {char dir [max_path]; char DIR [MAX_PATH]; char DIR * TFILE = "/nei.txt" ;// The program is now entering this character) :: getCurrentDirectory; // Plus the current directory plus STRCAT (DIR, TFILE); // Open text files obtained handleHANDLE hFile = :: CreateFile (dir, GENERIC_WRITE, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL); if (hFile == INVALID_HANDLE_VALUE) {ShowMessage ( "Unable to open a new file"); return;} DWORD BytesWritten; char Thetext [MAX_PATH] = "You want to write in text files!"; // 将: t t t i (::: tf) in the Nei.txt file in the contents of the Thet population, "::: t ((h het, het) ), & Byteswritten, null || sizeof (ttest) {showMessage ("Write file success!");} :: closehandle (hfile);} //--------- ------------------------------------------ // Read and write INI configuration File instance // read the contents of the INI file / / ----------------------------- ------------------------ Void __fastcall tform1 :: forml2-> caption = "server name:"; label3-> CAPTION = "Database Name:"; label4-> caption = "User Name:"; Label5-> CAPTION = "Password:"; // ---- Get the runtime directory Start char DIR [MAX_PATH]; char * tfile = "/Config.ini";// Enter the program Now the program is now the number of this character :: getCurrentDirectory (max_path, dir); // Put the current directory with the specified file name STRCAT (Dir, TFile); // --- - Get the directory of the running program End Tinifile * ini = new tinifile (dir); try {edit1-> text = ini-> readstring ("Database", "Servername", "Default"); Edit2-> Text = Ini -> ReadString ("Database", "DatabaseName", 100); Edit3-> text =
