請問大大誰知道怎麼寫入文字檔而已可以一行一行記錄下來 我是知道有一個辨法可是很麻煩 char buff[65535]; int f; String temp; ifstream infile; infile.open("12.txt"); if(!infile) return;while(!infile.eof()) { infile.getline(buff,sizeof(buff)); temp=buff; //if (Trim(temp)=="") continue; //StrToInt(temp)+2; temp="tyyff";//IntToStr(f); } infile.close() ; ofstream outfile("12.txt"); outfile<

kraen4468您好: 請參考下面連結版規說明,讓您的程式碼更方便閱讀 < href="http://delphi.ktop.com.tw/topic.php?TOPIC_ID=42706">http://delphi.ktop.com.tw/topic.php?TOPIC_ID=42706 順心

可能我表答方試不好~請大大多多包容 我想要寫的是可以touch按鈕就寫入.txt 例如vb寫的一樣意思

    Open "c:\test.txt" For Append As #1        
        Write #1, Now()         
    Close #1 

kraen4468您好:

引言: 我想要寫的是可以touch按鈕就寫入.txt

您可以參考下面的code

void __fastcall TForm1::Button1Click(TObject *Sender)
{
 TStringList* TXT = new TStringList();
 TXT->Add("1");
 TXT->Add("2");
 TXT->Add("3");
 TXT->SaveToFile("文字檔.txt");
 delete TXT;
}

順心

請問大大: 可以寫像這樣的嗎 "2004/1/5 上午 10:59:35 === Audio Test Passed === " "2004/1/5 上午 11:00:40 === Audio Test Passed === " "2004/1/5 下午 03:05:59 === Audio Test Passed === " "2004/1/5 下午 03:06:08 === Audio Test Passed === " 因為我想記錄下來所以不能洗掉之前的 還有加日期跟時間 謝謝大大~

kraen4468您好: 那試試下面的code

void __fastcall TForm1::Button4Click(TObject *Sender)
{
 AnsiString Data = Date() Time();
 Data = Data "===Audio Test Passed===";
 TStringList* TXT = new TStringList();
 if (FileExists("文字檔.txt"))
 {
   TXT->LoadFromFile("文字檔.txt");
   TXT->Add(Data);
   TXT->SaveToFile("文字檔.txt");
 }
 else
 {
   TXT->Add(Data);
   TXT->SaveToFile("文字檔.txt");
 }
 delete TXT;
}

順心 <>～我也是在學習的階段,回答的不好請您多多見諒與指教～

謝謝Taishyang 我可以了 以後希望多多跟您學習

kraen4468您好:

引言: 以後希望多多跟您學習

我很嫩的,站上有相當多資料供您學習